ActiveForm 问题,急!!!!!!!
Dim child As Form
Set child = FrmLog.ActiveForm
If (Not child Is Nothing) Then
Unload child
End If
FrmLog为主窗体,即MDIForm类型.
其它字窗体为普通的Form
我想每次只能运行一个子窗口,但程序一运行就会出错,提示"只允许一个MDI窗体."现在的情况是子窗体还没调用就出错了.
如何改正此错误呢??
还有如何调整子窗体的大小呢??
[解决办法]
运行子窗体方法:(假设要装入的子窗体的窗体名为frmview, frmview的caption值为: "子窗体 ")
当前Frmlog窗体(MDI窗体)上,加入一command控件,在其click事件中加入如下代码:
Dim frm As Form
For Each frm In Forms
If frm.Caption = "子窗体 " Then
Unload frm
End If
Next frm
frmview.show
若有疑问:QQ:398175615
[解决办法]
路过~~