呵呵 这个我再了解不过了
在父窗口(frmMain)中点击子窗口(frmChild)
用如下方法可达目的
frmChild.show vbsysmodal
在子窗体中 父窗体.Hide,退出子窗体是 父窗体.show
应该可以用主窗口的enabled属性,如在子窗口中:
private sub form_load()
main.enabled=false
end sub
'下面这个是子窗口关闭的代码
Private Sub Form_QueryUnload(Cancel As Integer, UnloadMode As Integer)
main.enabled=ture
End Sub
至于具体的编码你自己调试吧。
使用窗体Form的Show方法:Fomr1.Show 模式
将模式设置为1即可实现你需要的功能,即:
Form1.Show 1
(这里设置成1即表示窗体是模式的,除了模式窗体之外的其它对象不允许进行输入(包括键盘与鼠标单击))
Form2.show vbmodal
或者 Form2.show vbsysmodal
子界面的窗体名称.Show vbModal