【单选题】在窗体中建立一个文本框text1和一个命令按钮command1,编写下面程序: Private Sub Command1_Click( ) Dim I As Integer If Text1.Text 'Gong' Then I = MsgBox('密码错误', 5 + vbExclamation, '输入密码') If I 4 Then End Else Text1.Text = '' Te...
【单选题】在窗体中建立一个文本框text1和一个命令按钮command1,编写下面程序: Private Sub Command1_Click( ) Dim I As Integer If Text1.Text "Gong" Then I = MsgBox("密码错误", 5 + vbExclamation, "输入密码") If I 4 Then End Else Text1.Text = "" Tex...