Função QBColor
Devolve um Valor Longo representando o código de cor RGB correspondente ao número de cor especificado.
Sintaxe
QBColor(cor)
O argumento de cor necessário é um número inteiro no intervalo 0-15.
Configurações
O argumento de cor tem estas definições:
| Número | Cor | Número | Cor |
|---|---|---|---|
| 0 | Preto | 8 | Cinza |
| 1 | Azul | 9 | Azul Claro |
| 2 | Verde | 10 | Verde Claro |
| 3 | Ciano | 11 | Ciano Claro |
| 4 | Vermelho | 12 | Vermelho Claro |
| 5 | Magenta | 13 | Magenta Claro |
| 6 | Amarelo | 14 | Amarelo Claro |
| 7 | Branco | 15 | Branco Brilhante |
Comentários
O argumento de cor representa valores de cor utilizados por versões anteriores do Básico (como o Microsoft Visual Basic para MS-DOS e o Compilador Básico). A partir do byte menos significativo, o valor devolvido especifica os valores vermelho, verde e azul utilizados para definir a cor adequada no sistema RGB utilizado pelo Visual Basic for Applications.
Exemplo
Este exemplo utiliza a função QBColor para alterar a propriedade BackColor do formulário transmitido quanto MyForm à cor indicada por ColorCode.
QBColor aceita valores inteiros entre 0 e 15.
Sub ChangeBackColor (ColorCode As Integer, MyForm As Form)
MyForm.BackColor = QBColor(ColorCode)
End Sub
Confira também
Suporte e comentários
Tem dúvidas ou quer enviar comentários sobre o VBA para Office ou sobre esta documentação? Confira Suporte e comentários sobre o VBA para Office a fim de obter orientação sobre as maneiras pelas quais você pode receber suporte e fornecer comentários.