Question

VB如何实现只有关闭当前窗体才能操作其他窗体？？？

form1上点击Command1弹出Dialog，在Dialog上不能对form1进行操作，点击OKButton关闭了Dialog，为什么它回到form1是会出现错误364“对象也被卸载”呢？
form1的源码是：
Private Sub Command1_Click()
Dialog.Show
End Sub
Dialog的源码是：
Private Sub Form_Load()
Dialog.Show 1
End Sub
Private Sub OKButton_Click()
Unload Dialog
Form1.Show
End
有什么错误呢？要怎么改啊？！

Answer 1

VB可通过Show方法将参数Staly设置为1以模式窗体显示当前窗体来实现当前窗体被关闭才能操作其他窗体。

Show 方法，用以显示 MDIForm 或 Form 对象。不支持命名参数。

说明

当 Show 在显示无模式窗体时，随后遇到的代码则要执行。当 Show 在显示模式窗体 (modal form)
时，则随后的代码直到该窗体被隐藏或卸载时才能执行。

当 Show
在显示模式窗体时，除了模式窗体中的对象之外不能进行输入（键盘或鼠标单击）。对其它窗体进行输入前程序必须隐藏或卸载模式窗体（通常是处于响应用户某些操作状态）。

Answer 2

form1上的Command1上的按钮事件这么写代码：
Dialog.Show 1

Answer 3

form1改成
Private Sub Command1_Click()
Dialog.Show vbModal
End Sub

Dialog里的
Private Sub Form_Load()
Dialog.Show 1
End Sub
这段删除