VB中，如何定义 Sub Main

来源：百度知道 编辑：UC知道 时间：2024/05/04 23:52:10
用VB做了一个图书馆管理系统，现在我想用 Sub Main 指定 main_Startup（main_Startup.frm） 、frmLogin (frmLogin.frm )这两个窗体 在进入系统的主界面之前启动，
该如何定义 Sub Main ？！
两个窗体如下图所示：
依照以下提供的三种方法，还是解决不了问题；是不是我的 main_Startup 模块 代码有问题：
main_Startup 模块的代码：
Private Sub Timer1_Timer()
frmLogin.Show
Unload Me
End Sub

sub main函数只需要
main_Startup这个form启动,如果这个form的name属性就是main_Startup的话

模块里
Sub Main()
main_Startup.Show
End Sub

main_Startup窗体看你有个timer,可以做成splash,
用timer决定,等到定时一到,卸载本窗体,加载login窗体

Sub Timer1_Timer()
Me.Hide
frmLogin.Show
Unload main_Startup
End Sub

sub main 中加入

load main_startup
main_startup.show

sub main函数只需要
main_Startup这个form启动,如果这个form的name属性就是main_Startup的话

模块里
Sub Main()
main_Startup.Show
End Sub

main_Startup窗体看你有个timer,可以做成splash,
用timer决定,等到定时一到,卸载本窗体,加载login窗体

Sub Timer1_Timer()
Me.Hide
frmLogin.Show
Unload main_Startup
End Sub

sub main 中加入

load main_startup
main_startup.show