startup.vb

来自「这是一个飞机订票的软件」· VB 代码 · 共 25 行

'
' Chapter 02 - Completed Solution
' 
' MCSD Guide to Developing Desktop Applications 
' with Microsoft Visual Basic .NET
'
' Copyright (C) 2004 Course Technology
' All rights reserved.

Option Strict On
Option Explicit On 

' This module is designated as the startup model. Thus, the statements
' in the Sub Main procedure will execute when the program starts. 
Module Startup

    Public Sub Main()
        Dim frmSplashNew As New frmSplash()
        Dim frmMainNew As New frmMain()
        frmSplashNew.ShowDialog()
        frmMainNew.ShowDialog()
    End Sub

End Module