方法 : Windows フォーム アプリケーションのバッチ モードを有効にする
更新 : 2007 年 11 月
この例では、My.Application.Startup イベントを使用して、アプリケーションの起動時に文字列 /batch が引数に指定されたかどうかをチェックします。
Windows フォーム アプリケーションのバッチモードを有効にするには
ソリューション エクスプローラでプロジェクトを選択します。[プロジェクト] メニューの [プロパティ] をクリックします。
[アプリケーション] タブの [アプリケーション イベントの表示] をクリックして、コード エディタを開きます。
My.Application.Startup イベントを処理するメソッドを作成します。詳細については、「方法 : アプリケーション イベントを処理する (Visual Basic)」を参照してください。
Private Sub MyApplication_Startup( _ ByVal sender As Object, _ ByVal e As Microsoft.VisualBasic.ApplicationServices.StartupEventArgs _ ) Handles Me.Startup
End Sub
アプリケーションの各コマンド ライン引数に対して反復処理を行い、いずれかの引数が /batch の場合に、e オブジェクトの Cancel プロパティを True に設定します。
Cancel プロパティが True に設定されている場合、スタートアップ フォームは開始されません。
For Each s As String In My.Application.CommandLineArgs If s.ToLower = "/batch" Then ' Stop the start form from loading. e.Cancel = True End If Next
e オブジェクトの Cancel プロパティが True に設定されている場合、ウィンドウなしの操作用のメイン ルーチンを呼び出します。
If e.Cancel Then ' Call the main routine for windowless operation. Dim c As New BatchApplication c.Main() End If
使用例
Private Sub MyApplication_Startup( _
ByVal sender As Object, _
ByVal e As Microsoft.VisualBasic.ApplicationServices.StartupEventArgs _
) Handles Me.Startup
For Each s As String In My.Application.CommandLineArgs
If s.ToLower = "/batch" Then
' Stop the start form from loading.
e.Cancel = True
End If
Next
If e.Cancel Then
' Call the main routine for windowless operation.
Dim c As New BatchApplication
c.Main()
End If
End Sub
Class BatchApplication
Sub Main()
' Insert code to run without a graphical user interface.
End Sub
End Class
参照
処理手順
方法 : コマンド ライン引数にアクセスする (Visual Basic)