BackColor (propiedad)

Se aplica a

Puede usar la propiedad BackColor para especificar el color del interior de un control o sección. Valor Long de lectura y escritura.

expresión.BackColor

expresión Requerido. Una expresión que devuelve uno de los objetos de la lista Se aplica a.

Configuración

La propiedad BackColor contiene una expresión numérica que se corresponde con el color usado para rellenar el interior de un control o sección.

Puede usar el Generador de color para establecer esta propiedad haciendo clic en el botón Generador situado a la derecha del cuadro de propiedades en la hoja de propiedades. Usar el Generador de color permite definir colores de fondo personalizados para los controles o secciones.

También puede establecer esta propiedad mediante la hoja de propiedades de un control o sección, una macro o código de Visual Basic para Aplicaciones (VBA), o bien mediante el comando Color de relleno bajo Fuente (en la pestaña Diseño o Formato, en función de si se encuentra en la vista Diseño o Presentación).

En código de Visual Basic para Aplicaciones (VBA), use una expresión numérica para establecer esta propiedad. El valor de esta propiedad tiene un tipo de datos de Largo.

Puede establecer el valor predeterminado de esta propiedad mediante la estilo de control predeterminado de un control o la propiedad DefaultControl en código de VBA.

Para los objetos Table puede establecer esta propiedad mediante el comando Color de relleno bajo Fuente en la pestaña Datos, o bien mediante código de VBA con la propiedad DatasheetBackColor.

Observaciones

Para usar la propiedad BackColor, la propiedad BackStyle debe establecerse en Normal, si está disponible.

Ejemplo

En el ejemplo siguiente se usa la función RGB para establecer las propiedades BorderColor, BackColor y ForeColor según el valor del cuadro de texto txtPastDue. También puede usar la función QBColor para configurar estas propiedades. Al incluir el código siguiente en el evento Form_Current( ) se establecen las características de visualización de controles tan pronto como el usuario abre un formulario o se mueve a un nuevo registro.

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