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/12/01 11:18:10

x��)�sz>�%3��O��/��{�hF@QfYbI�Bpi��s~nnb^�a�sNfr��g�BHjE��BHFj�[~Q��^pF~�k^��g�kNq*�B�*��t�� Sf�X�^Q�LG��wχ(A�I��x6e�ӽ��m{6}�Įb�]0�';z��X�F�DI��6IE�8<��`X�,�0�)*��t � !fÃ��f(�$�5O�f��ٌ�D0��?m�xڱ�ٴ�Ov�z�r��3��#%(�R+2K�� 4�iSK��^4�R��%�TXz'�7��~qAb�(��'

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