编辑: 静看花开花落 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........

下载(注:源文件不在本站服务器,都将跳转到源网站下载)
备用下载
发帖评论
相关话题
发布一个新话题