机房收费系统之Sub Main

前言：
在敲机房的时候，碰到的第一个解决不了的问题就是登陆进去之后什么都不显示，然后在别人的帮助下终于解决了这一问题，然后发现这一错误别人也会犯，然后查了一下，现在跟大家分享一下。

首先解释一下公共模块里面Sub Main这一过程的基本的作用。 在缺省情况下，应用程序中的第一个窗体被指定为启动窗体。应用程序开始运行时，此窗体就被显示出来（因而最先执行的代码是该窗体的 Form_Initialize 事件中的代码）。就像我们敲的学生和机房，他们的默认的启动窗体是frmLogin。然后登录窗体结束之后又不会有新的一个窗体来运行，所以就会出现登录进去之后什么都不显示的情况。如果我们想让主窗体在登录进去之后显示的话就需要用到Sub Main来改变运行登录进去之后运行的窗体，首先我们需要再公共模块的代码里面写出以下的几行代码。

Sub Main 

frmLogin.Show vbModal 

If Not frmLogin.OK Then 
    End 
End If 

Unload frmLogin 
frmMain.Show 

End Sub

这几行代码的大致思路就是先显示登录窗体，登录成功之后将登录窗体卸载，然后显示主窗体。

其次需要修改的就是改变启动窗体，从“工程”菜单中，选取“工程属性”。 选取“通用”。 在“启动对象”中，选取要作为新启动窗体的窗体即Sub Main。

这样我们就可以在显示登录窗体之后自动显示主窗体了。

一点愚见，希望大家可以指出不足之处。