Nota
O acceso a esta páxina require autorización. Pode tentar iniciar sesión ou modificar os directorios.
O acceso a esta páxina require autorización. Pode tentar modificar os directorios.
Obtiene o establece el color interior del objeto especificado. Long de lectura y escritura.
Sintaxis
expresión. BackColor
expresión Variable que representa un objeto FormatCondition .
Observaciones
La propiedad BackColor contiene una expresión numérica que corresponde al color que se utiliza para rellenar el interior de un control o sección.
Puede establecer el valor predeterminado de esta propiedad mediante el estilo de control predeterminado de un control o la propiedad DefaultControl en Visual Basic.
Para utilizar la propiedad BackColor, la propiedad BackStyle, si está disponible, debe establecerse en Normal.
Ejemplo
En el ejemplo siguiente se usa la función RGB para establecer las propiedades BorderColor, BackColor y ForeColor en función del valor del cuadro de texto txtPastDue. También se puede usar la función QBColor para establecer estas propiedades. Al colocar el código siguiente en el evento Form_Current( ) , se establecen las características de visualización del control en cuanto 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
Soporte técnico y comentarios
¿Tiene preguntas o comentarios sobre VBA para Office o esta documentación? Vea Soporte técnico y comentarios sobre VBA para Office para obtener ayuda sobre las formas en las que puede recibir soporte técnico y enviar comentarios.