module1.bas

来自「一个完整的HTML编辑器」· BAS 代码 · 共 15 行

Attribute VB_Name = "Module1"
Public fMainForm As frmMain


Sub Main()
    'frmSplash.Show
    'frmSplash.Refresh
    Set fMainForm = New frmMain
    'Unload frmSplash
    Load fMainForm

    fMainForm.Show
End Sub