Postupy: Dávkový režim povolení pro okno formuláře aplikace (Visual Basic)

Tento příklad používá událost My.Application.Startup k zkontrolování zda je aplikace spuštěna s řetězcem /batch v argumentu.

Povolení dávkového režimu v aplikacích modelu Windows Forms

1. Mějte projekt vybrán v Průzkumníku řešení. V nabídce Projekt klikněte na Vlastnosti.

2. Na záložce Aplikace, klikněte na tlačítko Zobrazení události aplikace k otevření Editoru kódu .

3. Vytvořte metodu, která zpracovává událost Startup. Další informace naleznete v tématu Postupy: Zpracování událostí aplikace (Visual Basic).

   Private Sub MyApplication_Startup( 
       ByVal sender As Object, 
       ByVal e As Microsoft.VisualBasic.ApplicationServices.StartupEventArgs 
   ) Handles Me.Startup
   

   End Sub
   

4. Iterujte argumenty příkazové řádky aplikace a nastavte vlastnost Cancel objektu e na True pokud je jeden z argumentů /batch.

   Pokud je vlastnost Cancel nastavena na True, spouštěcí formulář se nespustí.

   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
   

5. Pokud je vlastnost Cancel objektu e nastavena na True, zavolejte rutinu pro operace bez oken.

   If e.Cancel Then
       ' Call the main routine for windowless operation.
       Dim c As New BatchApplication
       c.Main()
   End If
   

Příklad

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

Viz také

Úkoly

Postupy: Přístup k argumentům příkazové řádky (Visual Basic)

Odkaz

ApplicationBase

CommandLineArgs

Koncepty

Přehled aplikačního modelu jazyka Visual Basic