Table of contents
TOC
Recolher sumário
Expandir sumário

Propriedade Section.BackColor (Access)Section.BackColor Property (Access)

office 365 dev account|Última Atualização: 22/03/2018
|
2 Colaboradores

Obtém ou define a cor interna do objeto especificado. Long de leitura/gravação.Gets or sets the interior color of the specified object. Read/write Long.

SintaxeSyntax

expressão. Propriedade BackColorexpression. BackColor

expressão Uma variável que representa um objeto Section .expression A variable that represents a Section object.

ComentáriosRemarks

A propriedade CorDoFundo contém uma expressão numérica que corresponde à cor utilizada para preencher o interior de um controle ou de uma seção.The BackColor property contains a numeric expression that corresponds to the color used to fill a control's or section's interior.

É possível definir o padrão dessa propriedade usando o estilo de controle padrão de um controle ou a propriedade DefaultControl no Visual Basic.You can set the default for this property by using a control's default control style or the DefaultControl property in Visual Basic.

Para usar a propriedade BackColor, a propriedade BackStyle, se disponível, deve ser definida como Normal.To use the BackColor property, the BackStyle property, if available, must be set to Normal.

ExemploExample

O exemplo a seguir usa a função RGB para definir as propriedades BackColor e ForeColor, dependendo do valor da caixa de texto txtPastDue. Também é possível usar a função QBColor para definir essas propriedades. Se você colocar o seguinte código no evento Form_Current( ), serão definidas as características de exibição de controle logo que o usuário abrir um formulário ou ir para um novo registro.The following example uses the RGB function to set the , BackColor, and ForeColor properties depending on the value of the txtPastDue text box. You can also use the QBColor function to set these properties. Putting the following code in the Form_Current( ) event sets the control display characteristics as soon as the user opens a form or moves to a new record.

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

Ver tambémSee also

ConceitosConcepts

Objeto SectionSection Object

© 2018 Microsoft