请问在MDI窗口中，打开可多个子窗口，怎么把下面的窗口激活？

Question

谢谢！

Answer 1

Dim testform As Form
    For Each testform In Forms
    If testform.Caption = "Document 1" Then
     testform.SetFocus
    End If
    Next

Answer 2

谢谢rainstormmaster回答了我两个问题，真是帮了我很大的忙！
再次感谢!

Answer 3

再问：For Each ...In...
        ....
      Next
是什么循环？

Answer 4

菜单点击事件或快捷键点击事件中：
If testform.Visible = True Then
testform.SetFocus
Else
Load testform
End If

Answer 5

for each 
是遍历集合的循环，
rainstormmaster(rainstormmaster）
的思路
就是
遍历
所有的窗体，
找到符合你需要的窗体，
让它获得焦点。