Instrução Using (Visual Basic)

Declara o início de um bloco Using e opcionalmente adquire os recursos do sistema que o bloco controla.

Using { resourcelist | resourceexpression }
    [ statements ]
End Using

Partes

Cada recurso na parte resourcelist possui a seguinte sintaxe e partes:

resourcename As New resourcetype [ ( [ arglist ] ) ]

-  ou  -

resourcename As resourcetype = resourceexpression

Partes resourcelist

Comentários

Às vezes, seu código requer um recurso não gerenciado, como um identificador de arquivo, um wrapper COM ou uma conexão SQL. Um bloco Usinggarante a disposição de um ou mais dos tais recursos quando seu código estiver finalizado com eles. Isso torna-os disponíveis para uso por outros códigos.

Recursos gerenciados são descartados pela coletor de lixo .NET Framework (GC) sem qualquer codificação extra de sua parte. Você não precisa de um bloco Usingpara recursos gerenciados. Em o entanto, você ainda pode usar um bloco de Using para forçar a disponibilidade de um recurso gerenciado em vez de espera o coletor de lixo.

Um bloco Usingpossui três partes: a aquisição, uso e descarte.

• Aquisição significa criar uma variável e inicializá-la para se referir ao recurso do sistema. A instrução Using pode adquirir um ou mais recursos, ou você pode adquirir exatamente um recurso antes de inserir o bloco e fornece-lo para a instrução Using. Se você fornecer resourceexpression, você deve adquirir o recurso antes de passar controle para a instrução Using.

• Usage significa acessar os recursos e executar ações com eles. As instruções entre Using e End Using representam o uso de recursos.

• Descarte significa chamar o método Dispose no objeto em resourcename. Isso permite que o objeto libere corretamente seus recursos. A instrução End Using libera os recursos sob o bloco de controle Using.

Comportamento

Um bloco Usingse comporta como uma construção Try... Finally em que o bloco Try usa os recursos e o bloco Finally os libera. Devido a isso, o bloco Using garante a liberação dos recursos, não importando como você sai do bloco. Isso é verdadeiro mesmo no caso de uma exceção sem tratamento, exceto por StackOverflowException.

O escopo de cada recurso variável adquirido pela instrução Using é limitado para o bloco Using.

Se você especificar mais de um recurso do sistema na instrução Using, o efeito é o mesmo como se você tivesse blocos Using aninhados, um dentro do outro.

Se resourcename é Nothing, nenhuma chamada a Dispose é feito, e nenhuma exceção é lançada.

Tratamento de exceções estruturado num bloco Using

Se você precisar manipular uma exceção que pode ocorrer dentro de um bloco Using, é possível adicionar uma construção Try ... Finally concluída a ela. Se você precisar manipular o caso em que a instrução Using não for bem-sucedida em adquirir um recurso, você pode testar para verificar se resourcename é Nothing.

Tratamento de Exceção Estruturado em ves de usar um bloco Using

Se você precisar exercer um melhor controle sobre a aquisição dos recursos, ou se precisar de código adicional no bloco Finally , você pode reescrever o bloco Using como uma construção Try. .. Finally. O exemplo a seguir mostra construções Try esqueleto e Using que são equivalentes na aquisição e liberação de resource.

Using resource As New resourceType 
    ' Insert code to work with resource.
End Using

' For the acquisition and disposal of resource, the following
' Try construction is equivalent to the Using block.
Dim resource As New resourceType
Try 
    ' Insert code to work with resource.
Finally 
    If resource IsNot Nothing Then
        resource.Dispose() 
    End If
End Try 

Exemplo

O exemplo a seguir cria um arquivo chamado log.txt e grava duas linhas de texto para o arquivo. O exemplo também ler o mesmo arquivo e exibe as linhas de texto.

Porque as classes de TextWriter e de TextReader implementam a interface de IDisposable , o código pode usar instruções de Using para garantir que o arquivo é encerrado corretamente após a gravação e operações de leitura.

Private Sub WriteFile()
    Using writer As System.IO.TextWriter = System.IO.File.CreateText("log.txt")
        writer.WriteLine("This is line one.")
        writer.WriteLine("This is line two.")
    End Using 
End Sub 

Private Sub ReadFile()
    Using reader As System.IO.TextReader = System.IO.File.OpenText("log.txt")
        Dim line As String

        line = reader.ReadLine()
        Do Until line Is Nothing
            Console.WriteLine(line)
            line = reader.ReadLine()
        Loop 
    End Using 
End Sub

Consulte também

Tarefas

Como descartar um recurso do sistema (Visual Basic)

Referência

IDisposable

Instrução Try...Catch...Finally (Visual Basic)