Como: Ativar um modo de lote para aplicativos do janela Forms

Este exemplo usa o evento My.Application.Startup para verificar se o aplicativo foi iniciado tendo a sequência de caracteres /batch como um argumento.

Para ativar um modo em lotes para um aplicativo do Window Forms

1. Tenha um projeto selecionado no Solution Explorer.No menu Project, clique em Properties..

2. Na guia Application, clique em View Application Events para abrir o Editor de Códigos.

3. Crie o método que manipula a Evento My.Application.Startup.Para obter mais informações, consulte Como: Manipular eventos de aplicativo (Visual Basic).

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

   End Sub
   

4. Faça iterações através dos argumentos de linha de comando do aplicativo, e defina a propriedade Cancel do objeto e como True se um dos argumentos for /batch.

   Quando a propriedade Cancel é configurada True, a forma de inicialização não é iniciada.

   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. Se a propriedade Cancel do objeto e estiver definida como True, chame a rotina principal para operação sem-janelas.

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

Exemplo

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

Consulte também

Tarefas

Como: Acesso a argumentos de linha de comando (Visual Basic)

Conceitos

Visão Geral Sobre o Modelo do Aplicativo Visual Basic

Referência

Objeto My.Application

Propriedade My.Application.CommandLineArgs