机房收费系统之子窗体显示的那些事儿
情景回顾一：当要到资料后，就开始自己的机房收费系统，当时没想那么多，就在MDI窗体上加了资料的图片，然后就开始各种添加控件，当所有窗体都弄好的时候，就开始对自己窗体显示的位置有些不满意了，然后就把MDIChild的属性改成TRUE问题就出现了--
1、如果picure够大的话就出现在最上方
2、如果不能铺满整个电脑屏幕的话就出现在下面
问题解决：
1、首先声明SetParent函数
Public Declare Function SetParent Lib "user32" (ByVal hWndChild As Long, ByVal hWndNewParent As Long) As Long
'调用API函数 改变子窗体的父窗体
（API函数）
2、在主窗体的设计模式下click事件下面添加以下代码（以关于为例）
<span style="font-size:18px;"> Private Sub aboutMenu_Click()
SetParent frmAbout.hwnd, Picture1.hwnd '改变子窗体的父窗体
frmAbout.Show '显示关于
End Sub
</span>
picture1为控件的Name frmAbout为窗体的名称，这样的话窗体就能完美的显示在主窗体上了。
情景回顾二：1、最大化最小化按钮显示不出来
2、无法把窗体最小化到左下角，没办法自动最小化。
问题解决：
1、为了不让我的窗体在运行模式下被别人改动，我就把窗体的borderstyle设置成了3，结果改变MaxButton和MinButton属性为TRUE后没什么变化，后来仔细研究后把属 性改成了1，最小化和最大化的按钮是显示出来了。
2、因为当时为了美观，就把picture铺满了整个全屏，但是相应的问题也就出来了，这就是无法最小化到左下角的根源。让picuture最下方的横线显示在电脑屏幕上就ok了。 想让它自动最小化，看下面的代码：
Private Sub Form_Deactivate()
<span style="font-size:18px;"> '不在是活动窗口时发生
' （0-正常，1-最小化，2-最大化）
If Me.WindowState <> 1 Then
Me.WindowState = 1
End If
End Sub</span>
这样你就能自动最小化窗体了。
问题越多越让人思考，越让人兴奋。