机房收费系统——问题一

        继学生信息系统之后，我又开始了机房收费系统的学习，这是学习数据库内容的又一个重要的系统。该系统与信息系统不同的是，此系统没有源码，都需要靠自己根据以往所学以及查找资料去编写。而且，从开始接触机房收费系统，发现不仅仅是没有源码，同时相对于学生信息系统来说，它的复杂性更强，涉及到表与表之间的相互联系，网上搜资料时还发现一个陌生词汇——报表。看来，这次的任务相当艰巨啊，不过我有信心。

      先将系统所有的窗体建好

         窗体建立初期就遇到了各种问题，最主要的问题是各窗体中的控件的属性不是很熟悉，而且原程序运行过程也有问题，所以有些控件属性不是很熟悉，无法准确设置，还需要自己进一步的对此系统熟悉之后完善。

        遇到的主要问题：

        一、主窗体需要用MDIForm，这样的话窗体上是无法添加command、label、textbox等控件，所以就在窗体上放置了一个picturebox，然后把需要的控件放置在picturebox里。可是，问题也就随之而来了。此时，picturebox和其他子窗体属于同级，会把其他子窗体覆盖住。经过上网查找资料，知道setparent函数可以解决此问题。代码如下：

<pre name="code" class="vb"><span style="font-size:18px;">Private Declare Function SetParent Lib "user32" _
       (ByVal hWndChild As Long, _
       ByVal hWndNewParent As Long) As Long

</span>

<span style="font-size:18px;">Private Sub checkyueMenu_Click()
  SetParent frm1Checkyue.hwnd, Picture1.hwnd
  frm1Checkyue.Show
End Sub</span>

我想说，这样虽然是解决了picturebox覆盖子窗体的问题，但是其他窗体的MDIChild属性设置为True。会出现下面的问题：

这是怎么回事呢？后来从别人那取得真经，把窗体的BorderStyle设置为1，此问题就解决了