VB的if语句的问题Private Sub Command1_Click()If Text1 = "111" ThenForm3.ShowEnd IfElseIf Text1 = "" ThenMsgBox "错误!"6,"系统错误"End IfEnd Sub怎么改当Text1=111时 Form3.show当Text1不是111时 MsgBox "错误",6,"系统错误"怎么
来源:学生作业帮助网 编辑:作业帮 时间:2024/06/27 12:52:12
![VB的if语句的问题Private Sub Command1_Click()If Text1 =](/uploads/image/z/2722086-54-6.jpg?t=VB%E7%9A%84if%E8%AF%AD%E5%8F%A5%E7%9A%84%E9%97%AE%E9%A2%98Private+Sub+Command1_Click%28%29If+Text1+%3D+%22111%22+ThenForm3.ShowEnd+IfElseIf+Text1+%3D+%22%22+ThenMsgBox+%22%E9%94%99%E8%AF%AF%21%226%2C%22%E7%B3%BB%E7%BB%9F%E9%94%99%E8%AF%AF%22End+IfEnd+Sub%E6%80%8E%E4%B9%88%E6%94%B9%E5%BD%93Text1%3D111%E6%97%B6+Form3.show%E5%BD%93Text1%E4%B8%8D%E6%98%AF111%E6%97%B6+MsgBox+%22%E9%94%99%E8%AF%AF%22%2C6%2C%22%E7%B3%BB%E7%BB%9F%E9%94%99%E8%AF%AF%22%E6%80%8E%E4%B9%88)
VB的if语句的问题Private Sub Command1_Click()If Text1 = "111" ThenForm3.ShowEnd IfElseIf Text1 = "" ThenMsgBox "错误!"6,"系统错误"End IfEnd Sub怎么改当Text1=111时 Form3.show当Text1不是111时 MsgBox "错误",6,"系统错误"怎么
VB的if语句的问题
Private Sub Command1_Click()
If Text1 = "111" Then
Form3.Show
End If
Else
If Text1 = "" Then
MsgBox "错误!"6,"系统错误"
End If
End Sub
怎么改
当Text1=111时 Form3.show
当Text1不是111时 MsgBox "错误",6,"系统错误"
怎么写?
VB的if语句的问题Private Sub Command1_Click()If Text1 = "111" ThenForm3.ShowEnd IfElseIf Text1 = "" ThenMsgBox "错误!"6,"系统错误"End IfEnd Sub怎么改当Text1=111时 Form3.show当Text1不是111时 MsgBox "错误",6,"系统错误"怎么
Private Sub Command1_Click()
'先判断为空时则出错
If Text1 = "" Then
MsgBox "错误!"6,"系统错误"
exit sub
end if
If Text1 = "111" Then Form3.Show
End Sub
或者
Private Sub Command1_Click()
If Text1 = "111" Then
Form3.Show
else
MsgBox "错误!"6,"系统错误"
end if
End Sub