帮我看看这段代码，我VB初学。

Question

Private Sub Command1_Click()
Dim user, pass
user = Text1.Text
pass = Text2.Text
If Text2.Text = pass Then
MsBox "你好" & user & "，欢迎进入XXX系统", vbOKOnly, "进入系统"
Form2.Show
Else
MsBox "密码或用户名错误，请重新输入", vbOKOnly, "验证失败"
End SubPrivate Sub Command2_Click()
End
End Sub

Answer 1

dim user,pass --后面要有数据类型
pass 变量没有初始化，你输入的密码和谁比较呀！？
MSbox  --msgbox

Answer 2

dim user,pass --后面要有数据类型
pass 变量没有初始化，你输入的密码和谁比较呀！？
MSbox  --msgbox

Answer 3

dim user,pass --后面要有数据类型
pass 变量没有初始化，你输入的密码和谁比较呀！？
MSbox  --msgbox

Answer 4

pass = Text2.Text
If Text2.Text = pass Then自己看下这两个值是不是永远都是相等的?