Funzione Red
Restituisce il componente rosso del codice di colore composito specificato.
Sintassi:
Red (ColorNumber As Long)
Valore restituito:
Integer
Parametro:
ColorNumber: numero intero lungo che specifica un codice di colore composito per il quale deve essere restituito il componente rosso.
The color picker dialog details the red, green and blue components of a composite color code, as well as its hexadecimal expression. Changing the color of text and selecting Custom color displays the color picker dialog.
Esempio:
Sub ExampleColor
Dim lVar As Long
lVar = rgb(128,0,200)
MsgBox "Il colore " & lVar & " è formato da:" & Chr(13) &_
"rosso= " & red(lVar) & Chr(13)&_
"verde= " & green(lVar) & Chr(13)&_
"blu= " & blue(lVar) & Chr(13) , 64,"colori"
End Sub