Applies To Bound Object Frame control, Chart control, Combo Box control, Form section, Image control, Label control, List Box control, Option Group control, Rectangle control, Report section, Text Box control, Unbound Object Frame control.
Description
You can use the BackColor property to specify the color for the interior of a control or section.
Setting
The BackColor property contains a numeric expression that corresponds to the color used to fill a control's or section's interior.
You can use the Color Builder to set this property by clicking the Build button to the right of the property box in the property sheet. Using the Color Builder enables you to define custom back colors for controls or sections. You can also set this property by using the Fill/Back Color button on the Formatting (Form/Report) toolbar, a control's or section's property sheet, a macro, or Visual Basic. In Visual Basic, use a numeric expression to set this property. This property setting has a data type of Long. You can set the default for this property by using a control's default control style or the DefaultControl method in Visual Basic. For TableDef or QueryDef objects you can set this property using the Fill/Back Color button on the Formatting (Datasheet) toolbar, or in Visual Basic by using the DatasheetBackColor property. Remarks To use the BackColor property, the BackStyle property, if available, must be set to Normal.See Also BackStyle property, BorderColor property, DatasheetBackColor, DatasheetForeColor properties, DatasheetCellsEffect property, DatasheetFontItalic, DatasheetFontUnderline properties, DatasheetFontName, DatasheetFontHeight properties, DatasheetFontWeight property, DatasheetGridlinesBehavior property, DatasheetGridlinesColor property, DrawMode property, DrawStyle property, DrawWidth property, FillColor property, ForeColor property, PSet method, QBColor function, RGB function.
Example The following example uses the RGB function to set the BorderColor, 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