Instrução With

Executa uma série de instruções em um único objeto.

Sintaxe

With object  
      statements
End With

Argumentos:

Object: Obrigatório. Nome de um objeto.
Statements: Obrigatório. Uma ou mais instruções a serem executadas no objeto.

Comentários

A instrução With permite executar uma série de instruções em um objeto especificado sem requalificar o nome do objeto. Por exemplo, para alterar várias propriedades diferentes em um único objeto, coloque as instruções de atribuição de propriedade dentro da estrutura de controle With e faça referência ao objeto uma vez, em vez de referenciá-lo em cada atribuição de propriedade. O exemplo a seguir ilustra o uso da instrução With para atribuir valores a várias propriedades do mesmo objeto.

Exemplo 1:

With MyLabel
   .Height = 2000
   .Width = 2000
   .Caption = "This is MyLabel"
End With

Embora seja importante, a manipulação de propriedades não é o único caso de uso da funcionalidade With. Qualquer código legal pode ser usado dentro de um bloco With.

Note:

Quando um bloco With é usado, o objeto não pode ser alterado. Como resultado, não é possível usar uma única instrução With para afetar vários objetos diferentes.

Você pode aninhar instruções With colocando um bloco With dentro de outro. No entanto, como os membros dos blocos With externos são mascarados dentro dos blocos With internos, você deve fornecer uma referência de objeto totalmente qualificada em um bloco With interno a qualquer membro de um objeto em um bloco With externo.

Importante: Não efetue saltos para dentro ou para fora de blocos With. Se as instruções em um bloco With forem executadas, mas a instrução With ou End não for executada, poderão ocorrer erros ou um comportamento imprevisível.

Recomendação: A menos que seja necessário, não use o bloco With. É sempre melhor fazer uso de objetos explícitos.