机房收费系统问题集锦（一）

</pre><pre name="code" class="vb"><span style="font-size:18px;">现在的我们正在完成机房收费系统9（这是我们第一个没有源码的项目），在其中遇到好多的问题，在接下来的文章中我将为大家一一展示：</span>
           

<span style="color:#ff0000;">一、</span>子窗体被遮盖，不能显示
           

解决方法如下：
           

Private Declare Function SetParent Lib "user32" (ByVal hWndCHild As Long, ByVal hWndNewParent As Long) As Long
           

Private Sub About_Click()
          SetParent frmAbout.hWnd, Picture1.hWnd
          <span style="font-family: Arial, Helvetica, sans-serif; font-size: 12px;">frmAbout.Show    ‘这只是其中的一个窗体名</span>
           

End Sub
           

最后在子窗体中编写<pre name="code" class="vb">  Private Sub Form_Load()
          frmAbout.Width = 11730
          frmAbout.Height = 6435
  End Sub
           

二、

      这个问题的解决其实也很简单：方法之一：在该工程的代码编写中不涉及MDI窗体内容的编写；方法二：把模块中        的“Set fMainform = New frmmain”后面的一句"fMainform.Show"改成"frmmain.Show"

三、

    该错误的产生绝对是细心的问题，只要仔细仔细再仔细，这个问题绝对是非常容易解决的，问题就出在对表格的写入语句上，错误语句为“.Rows=Rows+1”试问Rows怎么会独立存在呢？正确语句为“.Rows=.Rows+1”

好了，这篇文章就写这么多了，我们明天精彩继续！