VB简单的一个小问题

来源：百度知道 编辑：UC知道 时间：2024/05/14 11:12:51
输入Text1里面 123456 会弹出 您的帐号 是我事先添加进去的号
输入Text1里面 521452 会弹出 您的帐号 也是我事先添加进去的号 不相同的 如何验证啊

Private Sub Command1_Click()
If Text1.Text = "123456" Then
Msgbox "您的帐号：1(123456)"
ElseIf Text1.Text = "521452" Then
Msgbox "您的帐号：2(521452)
End If
End sub

是这样的么？

if text1.text=123456 then
msgbox"您的帐号 是我事先添加进去的号",vbokonly+vbinformation+0,"提示"
elseif text1.text=521452 then
msgbox"您的帐号 也是我事先添加进去的号",vbokonly+vbinformation+0,"提示"
end if

稍微改正了前面的仁兄的答案：
Private Sub Command1_Click()
If Text1.Text = "123456" Then
Msgbox="您的帐号：1(123456)"
Text1.Text = "521452" Then
Msgbox ="您的帐号：2(521452)
End If
End sub

加上了两个==号以及去掉了一个ElseIf 这样你运行一下看