Question

VB怎么插入打开form2隐藏form1

在网上找了个VB代码不用，会的教教我怎么插入Private Sub Command1_Click()
If Text1 <> "123" Then
Msgbox "账号错误"
Else
If Text2 <> "123" Then
Msgbox "密码错误"
Else
Unload Me
'加载主窗口
End If
End If
End Sub
怎么打开form2 隐藏form1 我怎么添加都没进入form2 只是直接关闭程序

Answer 1

Private Sub Command1_Click()If Text1.Text = "123" Then
If Text2.Text = "123" Then
Form2.Show
Unload Me
Else
MsgBox "密码错误！请重新输入", , "提示"
End If
Else
MsgBox "帐号错误，请重新输入", , "提示"
End IfEnd Sub

Answer 2

form2.show就可以啦