Private Sub Form_Load() MsgBox "Form1" End Sub Private Sub Command1_Click() Form2.Show Unload Me End Sub
Private Sub Form_Load() MsgBox "Form2" End Sub Private Sub Command1_Click() Form1.Show Unload Me End Sub