module1.bas

来自「菜谱管理系统。比较简单的VB代码」· BAS 代码 · 共 25 行

Attribute VB_Name = "Module1"
Public fMainForm As frmMain
' Programed by James Letner 2003 (J-SOFT)


Sub Main()
    
'displays the splash screen

frmSplash.Show
frmSplash.Refresh
    
'Disabled because spash screen opens and closes so fast
'That the user cannot see it the disabled code is
'located in frmSplash and is ran off a timer
    
    'Set fMainForm = New frmMain
    'Load fMainForm
    'Unload frmSplash
    'fMainForm.Show
    
End Sub