编辑: 静看花开花落 | 2019-07-02 |
若条件都不满足,且有Else子句,则执行该语句块,否则什么也不执行.. ElseIf不能写成 Else If. Private Sub Command1_Click()Dim x, yPicture1.Clsx = Val(Text1.Text)将文本转换为数值型后赋值给变量x,yy = Val(Text2.Text)IF x <
90 And y <
60 Then Picture1.Print 血压偏低 ElseIF x maxa Then maxa = x IF x <
mina Then mina = x Next iPr........