6种方法使MDI父窗体调用子窗体（子窗体同时只能显示一个）

种方法使MDI父窗体调用子窗体（子窗体同时只能显示一个）

有一个ＭＤＩ窗体叫MainForm，多个 子窗体，如Form1,Form2…… 要使子窗体同时只能显示一个，那么 方法1 dim Form1 as new form1 Form1.showDialog() 此方法一个 MDI窗体同时只能显示一个, 方法2 在每一个子窗体的应用 单态 设计模式 在每一个子窗体上声明 private sub new() end sub Public Shared NewMe…… MDI窗体调用时 dim form1 as form1=form1.NewME form1.show() 这种方法每一个子窗体都要应用单态，代码重复多，不好 方法3 是方法2的改良 先写一个ChildForm继承Form 在窗体上声明 private sub new() end sub Public Shared NewMe…… 再把所有的子窗体继承它 MDI窗体调用时 dim form1 as form1=form1.NewME form1.show() 这种方法很好，代码也少 方法4 利用MDI窗体的Controls属性 循环检测当是否以存在所需子窗体 存在则 .show .Activate 不存在则new了再.show 方法5 在MDI窗体上     Dim Form1 as form1     Friend Sub ShowForm1()                 If Form1 Is Nothing OrElse Form1.IsDisposed Then                     Form1 = New Form1                     Form1.MdiParent = Me                 End If                                Form1.Show()                 Form1.Activate()       End Sub 这种方法的缺点，每一个子窗体都要写一个这样的方法 方法6 利用 泛型改良方法5 先写一个ChildFormManager类 ''' <summary> ''' 调用子窗口 ''' </summary> ''' <typeparam name="T"></typeparam> ''' <remarks></remarks> Public Class ChildFormManager(Of T As {Form, New})     Public Shared Sub show(ByVal myform As T,  ByVal Mdi As Form)                 If myform Is Nothing OrElse myform.IsDisposed Then                     myform = New T                     myform.MdiParent = Mdi                 End If                 myform.Show()                 myform.Activate()     End Sub End Class 在MDI窗体中这样调用 dim Form1 as Form1 form1=ChildFormManager(of Form1).show(form1,Me)