第一次机房收费——问题合集（一）

站在巨人的肩膀上（通过师哥师姐的博客），遇到的问题都迎刃而解，太棒了！

1.子窗体被覆盖问题

（1）使用API函数：SetParent，在模块中声明这个函数，声明代码：

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

（2）在MDIform窗体中的窗体点击事件中写入：

例：Private Sub StuDemCash_Click()
    frmStuDemCash.Show  '学生查看余额
    SetParent frmStuDemCash.hWnd, Picture1.hWnd
    frmStuDemCash.Width = 10000
    frmStuDemCash.Height = 8000
    End Sub

这样就可以正常显示子窗体了，具体说明请看：子窗体被覆盖问题

2.工程-引用里面没有Microsoft Excel 14.0 Object Library 问题

（1）打开工程-引用，点击浏览

（2）找到office文件，文件名输入excel.exe，点击打开，引用添加完成。这一步的前提是：电脑必须安装了0ffice（wpsOfiice不能使用）。

这样该问题便解决了，具体说明请看：VB6导出Excel

3.实时错误381——下标越界

详情如下：该问题是MHSFlexGrid控件的问题，问题出在了哪里？？下标越界——顾名思义就是溢出问题。

解决这个问题，一步即可。打开该控件的属性，修改它的行或列即可。