一个问题——在MDI窗体中添加控件后显示子窗体

在机房收费系统中,各种纠结,正如上篇博客中说的那样——机房收费系统就是来还债的!刚开始做得时候,就遇到一个问题:MDI窗体不能添加控件!这个不是问题,添加一个图片框,在图片框上添加控件!问题又出来了,子窗体显示不了(被图片框挡住了!)怎么整?

通过了解,用API函数setParent可以解决这个问题:

首先:在模块中声明函数 SetParent      

PublicDeclare Function SetParent Lib "user32" (ByVal hWndChild As Long,ByVal hWndNewParent As Long) As Long

其次,在MDI窗体的下拉菜单单击事件中编写代码:

SetParent欲显示的子窗体名称.hWnd, frmMain.hWnd

这时还是不能看到想要显示的子窗体,还需一步:在欲显示的窗体加载事件中编写代码:

Me.Width=7000
Me.heigh=7000

其中的7000以适合窗体大小的值为准, OK

你可能感兴趣的:(一个问题——在MDI窗体中添加控件后显示子窗体)