7,788
社区成员
发帖
与我相关
我的任务
分享请发表友善的回复…
发表回复
jiangshan1203 2003-01-15
- 打赏
- 举报
谢谢你们啊！好了！
yefm 2003-01-15
- 打赏
- 举报
同意楼上
pirateRocy 2003-01-15
- 打赏
- 举报
关闭所有的子窗体，但是不关闭父窗体。代码如下：
dim frm as form
for each frm in forms
if frm.MDIChild then unload frm
next frm
dim frm as form
for each frm in forms
if frm.MDIChild then unload frm
next frm
twinking 2003-01-15
- 打赏
- 举报
同意
不过好象有点麻烦
不过好象有点麻烦
koa3000 2003-01-15
- 打赏
- 举报
For Each Form In Forms
If Form.Name <> "MDIForm1" Then
unload Form
End If
Next
