@H_301_0@问题一：无可用的MDI窗体可加载
@H_301_0@这个问题在敲学生的时候侥幸逃过，是因为在敲学生的时候没有建立子窗体，然而在这里建立了子窗体，加载子窗体的时候提示无可用的MDI窗体，因为我根本就没有创建主窗体，只是添加了个form窗体。 @H_301_0@
@H_301_0@知道了这个问题之后就点击工程——添加MDI窗体选项，添加了个主窗体，这个过程满眼的泪啊，以前在form窗体中建的菜单，控件都得重新再来。 @H_301_0@不过通过这个问题，我就明白了，有些坑是必须跳的，前面侥幸逃过了，现在就得跳，踏实走好每一步吧。。。。。 @H_301_0@添加了主窗体，这个问题解决了，但是向主窗体上添加控件的时候。接着新的朋友又来了。 @H_301_0@
@H_301_0@问题二：无对齐属性的控件不能直接放置在MDI窗体上
@H_301_0@
@H_301_0@问题三：子窗体被pictureBox遮挡 @H_301_0@当我们把pictureBox添加好之后，这样可以添加控件了，但是show不出子窗体，于是接着找度娘，用上了setparent函数。 @H_301_0@
@H_301_0@步骤一：在模块中添加setparent函数
<span style="font-size:18px;">Public Declare Function SetParent Lib "user32" (ByVal hWndChild As Long,ByVal hWndNewParent As Long) As Long </span>
函数功能：改变某个子窗口的父窗口，也就是说需要把子窗口放到另一个窗口或容器中显示，这样就不会出现子窗口被pictureBox遮挡的情况了参数： @H_301_0@参数：hwndchild 子窗口句柄 @H_301_0@ hwndnewparent 新的父窗口句柄 @H_301_0@
@H_301_0@步骤二：编写代码 @H_301_0@
<span style="font-size:18px;">Private Sub registermenu_Click(Index As Integer)
SetParent frmregister.hWnd,frmmain.hWnd
frmregister.Show
End Sub</span>
@H_301_0@
@H_301_0@frmregister为子窗体，frmmain为新的父窗体，本以为这样就可以给子窗体换一个新的父窗体，可是提示如下错误：
@H_301_0@
@H_301_0@于是接着找度娘，原因是：程序只允许一个主窗体。 @H_301_0@可想而知我的程序不只是一个主窗体，于是看代码，恍然所悟，我们可以看到下面的sub main过程，登录成功后，会实例化主窗体frmmain,最后fmainform会显示出来，通过上面的给子窗体换显示的父窗体的代码可知，我们设置的新的父窗体是frmmain，而frmmain就是主窗体，这样程序就会出现两个主窗体，他也不知道该显示那个主窗体了，于是就会报错。 @H_301_0@
'定义一个过程，设置登录窗体为启动窗体 Sub main() Dim flogin As New frmlogin '实例化登录窗体 flogin.Show vbModal '显示登录窗体 If Not flogin.ok Then End End If Unload flogin Set fmainform = New frmmain '实例化主窗体 fmainform.Show '显示主窗体 End Sub@H_301_0@
@H_301_0@
于是我想可不可以在程序中添加一个一般的form窗体作为新的父窗体，让子窗体在他上面显示，接着给孩子换爹
<span style="font-size:18px;">Private Sub registermenu_Click(Index As Integer)
Form1.Show
SetParent frmregister.hWnd,Form1.hWnd
frmregister.Show
End Sub</span>
这下子不会出现上面的错误了，因为没有要加载的主窗体了，同时子窗体可以在form里显示出来，可是form窗体和frmmain窗体是独立的，当拖动frmmain窗体的时候，子窗体不会跟着拖动，当关闭主窗体是，子窗体照样可以咋form里显示，这种方法看来还是有缺陷，没有把子窗体融入到frmmain里。 @H_301_0@
@H_301_0@通过上面的两处错误，我知道了，新的父窗体不可以是主窗体，同时又不能是与frmmain脱离的一般的窗体，那该让谁来当新的父窗体呢？？？ @H_301_0@
@H_301_0@于是接着百度，发现一句话，父窗体严格来说可以是一个容器，看到这句话，才明白我前面的理解有多么局限了，从刚开的以为新的父窗体只能是主窗体，到后来的可以是一般的form窗体，到现在我可以理解成一个pictureBox控件也可以当作新的父窗体，让子窗体在上面显示，理解到这，就像发现一百万一样开心哈哈 @H_301_0@picture1不是主窗体，然而picture1又在主窗上，这样就可以让picture1当作新的父窗体，让子窗体在上面显示。 @H_301_0@编写代码：
<span style="font-size:18px;">Private Sub registermenu_Click(Index As Integer)
SetParent frmregister.hWnd,Picture1.hWnd
frmregister.Show
End Sub</span>
结果成功地显示了子窗体，困扰我三天的问题就这样迎韧而解了，在一步步解决问题的过程中收获才是最多的。 @H_301_0@
@H_301_0@总结： @H_301_0@通过这个问题，对盲人摸象又有了深刻的理解，有些问题刚开始即使百度，也理解不了问题的全貌，只是可以看到一个角度，就像刚开始我以为新的父窗体只能是主窗体，到后来理解可以是一般的form窗体，到最后理解可以是一个pictureBox控件，只有不断地学习才可以看清楚全貌，有些坑是必须跳的，遇到问题自己不断解决的过程，收获的不仅仅是解决了的问题，更多的是心灵上的满足。 原文链接：https://www.f2er.com/vb/256956.html