第1个回答 2011-08-19
窗体一代码:
Private Sub Command1_Click()
Form2.Show
Unload Me
End Sub
Private Sub Command2_Click()
Form3.Show
Unload Me
End Sub
Private Sub Form_Load()
Command1.Caption = "窗体2"
Command2.Caption = "窗体3"
End Sub
窗体二和窗体三代码都是:
Private Sub Form_Unload(Cancel As Integer)
Form1.Show
End Sub