求助，熟悉VB语言的请进！

由一个界面进入另一个界面，要输入用户名和密码才能进入，请问这段程怎样编？用户名是“管理员”，密码是“000000”
下拉菜单 养护管理
路面养护管理
路基养护管理
桥涵隧道养护管理
沿路设施养护管理
绿化管理
菜单的编写程序以及点击任意个下拉菜单，进入另一个界面的程序，谢谢高人

Private Sub Command1_Click()
If Text1.Text = "管理员" Then
If Text2.Text = "000000" Then
Me.Hide
form2.Show
Else
MsgBox "密码错误"
End If
Else
MsgBox "用户名错误"
End If

End Sub

das

Private Sub Command1_Click()
If Text1.Text = "管理员" And Text2.Text = "00000" Then
Form2.Show
End If

End Sub

Private Sub Form_Load()
Text1.Text = ""
Text2.Text = ""
Text2.PasswordChar = "*"

End Sub

假设你有两个窗体为form1,form2,在form1建立两个text控件和一个command控件
Private Sub Command1_Click()
If Text1.Text = "管理员" And Text2.Text = "000000" Then
Form2.Show '如果用户和密码正确就显示第二个窗体
Unload Me '卸掉当前的密码窗口，释放资源
Else
MsgBox "用户名或者密码错误！", 16, "Error"
End If