Propriedade TextBox.OldBorderStyle (Access)

Utilize esta propriedade para definir ou devolver o valor não editado da propriedade BorderStyle para um formulário ou controlo. 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 TextBox .

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

Exemplo

O exemplo seguinte demonstra o efeito da alteração da propriedade BorderStyle de um controlo ao deixar o OldBorderStyle desafectado. 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.