如果是2个from那好办,下面代码供参考
Private Sub form1_Command1_Click()
Form1.Visible = False'关闭窗体1
Form2.Show
'显示窗体2
End Sub
Private Sub form2_Command1_Click()
Form2.Visible = False
'关闭窗体2
Form1.Check1.Enabled = True '第二个界面控制第一个界面的控件
Form1.Visible = True
'显示窗体1
End Sub
[此贴子已经被作者于2018-5-11 15:32编辑过]