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.

Codici di errore:

5 Richiamo di procedura non valido

tip

La finestra di dialogo per la scelta del colore specifica i componenti rosso, verde e blu di un codice colore composito e anche il suo valore in formato esadecimale. La modifica del colore del testo e la selezione di un colore personalizzato richiama la finestra di dialogo per la scelta del colore.


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

Sosteneteci!