求VB编写一个简单的登录程序

界面里一个提交按钮，一个退出按钮。
单击提交按钮后弹出一个对话框：上面写着登录成功。

---

Private Sub Command1_Click() '耐弯提交按钮
If Text1 = "vb" And Text2 = "1234" Then
MsgBox ("登录成庆烂功")
Else
MsgBox ("你的输入不正确，请重新输入")
End If
End Sub
Private Sub Command2_Click() '退出按誉亩漏钮
End
End Sub

---