机房重构——父窗体、子窗体的显示

第一次机房重构的时候就遇到这个问题，这是VB6.0时写的方法 机房收费系统—MDI窗体与子窗体

在机房重构的时候是用的VB.NET写的，其实还是可以利用原先的代码的。只是不能再用PictureBox控件了，因为它不是容器，在它上面放置的控件就会在子窗体上面出现。

●所以接下来就选择用另一个容器Panel

在模块中写上如下代码：

Declare Function SetParent Lib "user32" Alias "SetParent" (ByVal hWndChild As Integer, ByVal hWndNewParent As Integer) As Integer

在需要的地方写上：

Private Sub 学生信息ToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles 学生信息ToolStripMenuItem.Click

SetParent(frmStudent.Handle, Panel1.Handle) '以Panel为父窗体，FrmStudent为子窗体
frmStudent.Show()

End Sub

这样就OK了

●上面的方法没有用单例模式，但是同时达到了单例模式的效果，如果用单例模式的话， 

Private Sub 学生信息ToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles 学生信息ToolStripMenuItem.Click

'SetParent(frmStudent.Handle, Panel1.Handle) '没有用单例模式
'frmStudent.Show()

Dim from As frmStudent = frmStudent.GetInstance() '用了单例模式
from.Show()
SetParent(from.Handle, Panel1.Handle)

End Sub
Public Class frmStudent

Private Shared mdfstudent As frmStudent = Nothing
Private Sub New()

' 此调用是设计器所必需的。
InitializeComponent()

' 在 InitializeComponent() 调用之后添加任何初始化。

End Sub
Public Shared Function GetInstance() As frmStudent
If mdfstudent Is Nothing OrElse mdfstudent.IsDisposed Then
mdfstudent = New frmStudent

End If

Return mdfstudent
End Function
End classMDI——单例模式
用了单例模式感觉反而没有用单例模式来的简单，以后还是要继续研究单例模式。

●其实还有另一种方法也可以，不用任何控件，直接把frmMain窗体设置为父窗体就可以了，上面可以添加PictureBox控件来设置界面。

●在.NET中，还可以直接把FrmMain的BackgroundImage属性中插入一张图片。

【总结】

其实要达到一种效果有很多种的方法。