如何知道MDI窗体是否有子窗体打开着呢？20分呀？

Question

判断Forms.Count没有看见我的回复么？呵呵

Answer 1

嘻嘻，刚才没看到你的回复。可FORMS.COUNT好像要用到FORM数组吧？

Answer 2

这个集合是MDIForm的一个属性阿，属于MDIForm的啊，应该可以，我用过

Answer 3

有代码吗？
我怎么试了半天也没有看到FORMS这个属性呀？我用的VISUAL BAsIc 6.0
帮帮忙。

Answer 4

直接引用Forms就行Private Sub MDIForm_Load()
    MsgBox Forms.Count
End Sub

Answer 5

如果Count>1就表示有子窗体    Dim a As Form
    For Each a In Forms
        msgbox a.caption
    Next