请问大家，在一个MDI主窗体中，如何确定子窗体Form1是否已被实例化，应该使用哪一个属性，谢谢。

子窗題用個 shared 變量boolean來保存是否已經被實例化

谢谢楼上。
不过还是不太明白，如果现在有很多子窗体，当点击一个按钮时相对所对应的子窗体作出判断，如果已被实例化并打开，就将其激活，如没有就将其实例化，并打开，这样的操作该如何完成呢，谢谢。

構造函數設為私有

用shared成員方法返回新的實例

中間判斷設置的shared bool

还是不太明白，是需要为每一个子窗体都设一个bool变量么

Private Function GetInstanceState(ByVal name As String) As Boolean
'获得frmMain窗体的子窗体的数量
Dim i As Integer = Me.MdiChildren.Length
'循环判断是否有名为name的子窗体实例
For i = 0 To Me.MdiChildren.Length - 1
If Me.MdiChildren(i).Name = name Then
'存在名为name的子窗体，是子窗体获得焦点并返回True
Me.MdiChildren(i).Focus()
Return True
End If
Next
'不存在名为Name的子窗体False
Return False
End Function

............

If GetInstanceState("logmonitor") Then
Exit Sub
End If

Dim frm As New logmonitor
frm.MdiParent = Me
frm.Show()

a 是任何控件包括窗体
Msgbox(Not (a Is Nothing OrElse a.IsDisposed))
True是实例化
上面实例通常是定义Form为全局变量,就不用判断是否已实例化
对VB.net感兴趣的请加入15636854讨论群

[此贴子已经被作者于2006-10-10 21:06:17编辑过]