Propriedade TextBox.BorderColor (Access)

Utilize a propriedade BorderColor para especificar a cor do limite de um controlo. Long de leitura/gravação.

Sintaxe

expressão. BorderColor

expressão Uma variável que representa um objeto TextBox .

Comentários

A definição da propriedade BorderColor é uma expressão numérica que corresponde à cor que pretende utilizar para o limite de um controlo.

Pode predefinir esta propriedade ao utilizar o estilo de controlo predefinido de um controlo ou a propriedade DefaultControl no Visual Basic.

Cor da borda de um controle é visível apenas quando sua propriedade SpecialEffect for definida como plano ou sombreado. Se a propriedade SpecialEffect for definida como algo diferente de plano ou sombreado, a configuração da propriedade BorderColor alterará a configuração da propriedade SpecialEffect para plano.

Exemplo

O exemplo a seguir usa a função RGB para definir as propriedades BorderColor, BackColor e ForeColor, dependendo do valor da caixa de texto txtPastDue. Você também pode usar a função QBColor para definir essas propriedades.

Colocar o seguinte código no evento Form_Current( ) define as características de apresentação do controlo assim que o utilizador abre um formulário ou se move para um novo registo.

Sub Form_Current() 
 Dim curAmntDue As Currency, lngBlack As Long 
 Dim lngRed As Long, lngYellow As Long, lngWhite As Long 
 
 If Not IsNull(Me!txtPastDue.Value) Then 
 curAmntDue = Me!txtPastDue.Value 
 Else 
 Exit Sub 
 End If 
 lngRed = RGB(255, 0, 0) 
 lngBlack = RGB(0, 0, 0) 
 lngYellow = RGB(255, 255, 0) 
 lngWhite = RGB(255, 255, 255) 
 If curAmntDue > 100 Then 
 Me!txtPastDue.BorderColor = lngRed 
 Me!txtPastDue.ForeColor = lngRed 
 Me!txtPastDue.BackColor = lngYellow 
 Else 
 Me!txtPastDue.BorderColor = lngBlack 
 Me!txtPastDue.ForeColor = lngBlack 
 Me!txtPastDue.BackColor = lngWhite 
 End If 
End Sub

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.