Compartir a través de


Función QBColor

Devuelve una variante Long que representa el código de color RGB correspondiente al número de color determinado.

Sintaxis

QBColor(color)

El argumento de color necesario es un número entero en el intervalo 0-15.

Configuración

El argumento de color tiene esta configuración:

Número Color Número Color
0 Negro 8 Gris
1 Azul 9 Azul claro
2 Verde 10 Verde claro
3 Aguamarina 11 Cian claro
4 Rojo 12 Rojo claro
5 Magenta 13 Magenta claro
6 Amarillo 14 Amarillo claro
7 Blanco 15 Blanco brillante

Comentarios

El argumento de color representa los valores de color que usan las versiones anteriores de Basic (como Microsoft Visual Basic para MS-DOS y el compilador de Visual Basic). Empezando por el byte menos significativo, el valor devuelto especifica los valores rojo, verde y azul que se usan para establecer el color apropiado en el sistema RGB que usa Visual Basic para Aplicaciones.

Ejemplo

En este ejemplo se usa la función QBColor para cambiar la propiedad BackColor del formulario pasado en cuanto MyForm al color indicado por ColorCode. QBColor acepta valores enteros entre 0 y 15.

Sub ChangeBackColor (ColorCode As Integer, MyForm As Form)
    MyForm.BackColor = QBColor(ColorCode)
End Sub

Vea también

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.