vb.net2008 启动画面专用类

Namespace My
''' <summary>
''' MyApplication
''' </summary>
''' <remarks>MyApplicationクラス</remarks>
''' <history>
''' []2011/11/01Created
''' </history>
Partial Friend Class MyApplication

Protected Overrides Sub OnCreateMainForm()

Try
'Configファイルからシステムの情報を保存する
Configuration.PSb_SaveSystemInfo()

'起動画面を選択する
If Utility.PFn_NullToString(Configuration.PSb_GetTestWindowFlg()).Equals("1") Then
Me.MainForm = Global.GRP.TestForm
Else
Me.MainForm = Global.GRP.メインメニュー_Flash
End If

Catch ex As Exception
'LOGファイルを出力する
Global.GRP.Utility.PSb_WriteLOGFile(3,ex.Message)

Me.MainForm = Global.GRP.メインメニュー_Gif End Try End Sub End Class End Namespace

（编辑：李大同）

【声明】本站内容均来自网络，其相关言论仅代表作者个人观点，不代表本站立场。若无意侵犯到您的权利，请及时与联系站长删除相关内容!