Propriedade ListBox.OldBorderStyle (Access)

Use essa propriedade para definir ou retornar o valor não editado da propriedade BorderStyle para um formulário ou controle. Essa propriedade é útil se você precisar reverter para um estilo de borda não editado ou preferido. Bytes de leitura/gravação.

Sintaxe

expressão. OldBorderStyle

Expressão Uma variável que representa um objeto ListBox .

Comentários

A propriedade OldBorderStyle utiliza as configurações a seguir.

Configuração Visual Basic Descrição
Transparente 0 (Padrão somente para rótulo, gráfico e sub-relatório) Transparente
Sólida 1 (Padrão) Linha sólida
Traços 2 Linha tracejada
Traços curtos 3 Linha tracejada com traços curtos
Pontos 4 Linha pontilhada
Pontos esparsos 5 Linha pontilhada com pontos esparsos
Traço ponto 6 Linha com uma combinação de traço-ponto
Traço ponto ponto 7 Linha com uma combinação de traço-ponto-ponto
Sólido duplo 8 Linha sólida dupla

Exemplo

O exemplo a seguir demonstra o efeito de alterar a propriedade BorderStyle de um controle, deixando o OldBorderStyle não afetado. O exemplo conclui com a configuração a propriedade BorderStyle para seu valor editado original.

With Forms("Order Entry").Controls("ZIP Code")
    .BorderStyle = 3 ' Short dashed border. 
  
    MsgBox "BorderStyle = " & .BorderStyle & vbCrLf & _ 
        "OldBorderStyle = " & .OldBorderStyle  ' Prints 3, 1. 
 
    .BorderStyle = 2 ' Dashed border. 
  
    MsgBox "BorderStyle = " & .BorderStyle & vbCrLf & _ 
        "OldBorderStyle = " & .OldBorderStyle  ' Prints 2, 1 
  
    .BorderStyle = .OldBorderStyle ' Solid (default) border. 
         
    MsgBox "BorderStyle = " & .BorderStyle & vbCrLf & _ 
        "OldBorderStyle = " & .OldBorderStyle  ' Prints 1, 1 
End With

Suporte e comentários

Tem dúvidas ou quer enviar comentários sobre o VBA para Office ou sobre esta documentação? Confira Suporte e comentários sobre o VBA para Office a fim de obter orientação sobre as maneiras pelas quais você pode receber suporte e fornecer comentários.