VB 利用Tag属性存储用户名 If Text1.Text = "" Or Text2.Text = "" Then MsgBox "用户名或密码不能为空", vbCritical, "信息提示" Exit Sub Else If Text1.Text = "TSoft" And Text2.Text = "111" Then Me.Tag = Text1.Text Frm_Main.Show 1 Unload Me Else MsgBox "输入的名户名或密