UC知道请大家帮忙看一下为什么在VB中会出现
来源：百度知道 编辑：UC知道 时间：2024/07/02 04:14:23
我把代码写上，大家帮忙看一下
Private Sub Image1_Click()
Dim Response4 As Integer
If txtPassword1 <> txtPassword2 Then
Response4 = MsgBox("两次输入密码不一致", vbOKOnly, "重新输入")
Else
Form1.Show
End If
End Sub
Private Sub Image1_Click()
Dim Response4 As Integer
If txtPassword1 <> txtPassword2 Then
Response4 = MsgBox("两次输入密码不一致", vbOKOnly, "重新输入")
Else
Form1.Show
End If
End Sub
Response4 = MsgBox("两次输入密码不一致", vbOKOnly, "重新输入")
为什么要写成这样？况且Response4 是一个整型变量，为什么要将msgbox赋值值给它？（如果是inputbox的话可以，因为Response4 可以有inputbox的值赋给它，而msgbox只有一个OK按钮，没有值可以赋给Response4 ）
希望我说的话对你有帮助。
会出现什么？？ 这段程序没什么问题哪。
这是一个密码输入程序。如果两次密码相同，则打开Form1窗体，否则提示两次密码不一致。