机房收费系统—— 一堆小问题2

 

        首先有好东西给大家分享一下（请用力地点击下面那幅图）。即使已经把机房做完了，看看它，也绝不会后悔。它可以用来复习从提高班入学到现在的大部分知识。有图有真相。

        接下来说说我遇到的问题。

        1、点击右上角图标弹出提示对话框。

<span style="font-size:24px;">'点击右上角的叉，退出程序
Private Sub mdiForm_QueryUnload(Cancel As Integer, UnloadMode As Integer)
    If MsgBox("是否要退出", vbYesNo + vbDefaultButton2, "提示") = vbNo Then
        Cancel = True    '组织窗体被卸载
    Else
        End         '卸载窗体，退出程序
    End If
End Sub</span>

        窗体的QueryUnload事件发生在Unload事件之前。用来做些善后，比如询问你文件是否保存，询问是否退出等。它有个Cancel参数，设为True后就会阻止窗体被卸载。

     Unload   事件是当窗体从屏幕上删除时发生。将   cancel   设置为任何非零的值可防止窗体被删除，但不能阻止其它事件，诸如从   Microsoft   Windows   操作环境中退出等。可用   QueryUnload   事件阻止从   Windows   中的退出。

        有一些解释还有些不理解。比如它不能阻止的那些“其它事件”是什么东西？

    2、MDI父窗体调用子窗体，子窗体无法显示。  ——被picturebox挡住了

    解决办法：马康的博客

    3、重新认识subMain函数。原来它是程序的入口。啊啊。在敲学生的时候，修改了启动窗体，直接把它跳过去了。我说怎么按照源码，主窗体调不出来呢，害的我又自己加的显示主窗体。

    4、把窗体作为类，实例化。不知道有什么好处。理解的很浅，有理解的同学，求留言，求解说。

    随着问题被一个一个地解决，机房有雏形的雏形，我知道问题会不断地冒出来。但是解决问题会让自己越来越能耐下性子来，越来越有执行力。接下来，拥抱问题，成长。