■  いろいろなMain関数

.NETではVOIDタイプだけじゃありません。

【引数付Main】

    Sub Main(ByVal CmdArgs() As String)

        'コマンドライン引数チェック
        If CmdArgs.Length = 3 Then
            MessageBox.Show(CmdArgs(0) & CmdArgs(1) & CmdArgs(2))
        Else
            MessageBox.Show("不正な起動です")
            Exit Sub
        End If

        Application.Run(New ULA00)           'フォーム起動

    End Sub

※VB6のようにCommand関数を使う必要はありません。

【値を返すMain】

    Function Main() As Integer

        Application.Run(New Form1)
        Return 4

    End Function

※値を返すMain関数は、バッチファイルの中でERRORLEVELで拾うことができます。


BEFORE PAGE

TOP PAGE