Συνάρτηση Red

Επιστρέφει το κόκκινο μέρος του καθορισμένου κώδικα χρώματος.

Σύνταξη:


Red (ColorNumber As Long)

Τιμή επιστροφής:

Ακέραιος

Παράμετρος:

ColorNumber: Παράσταση ακέραιου μεγάλου μήκους που καθορίζει τον κώδικα χρώματος για τον οποίο επιστρέφεται το κόκκινο μέρος του.

Κωδικοί σφάλματος:

5 Άκυρη κλήση διαδικασίας

Παράδειγμα:


Sub ExampleColor
Dim lVar As Long
    lVar = rgb(128,0,200)
    Πλαίσιο μηνύματος "Το χρώμα " & lVar & " αποτελείται από:" & Chr(13) &_
        "red= " & red(lVar) & Chr(13)&_
        "green= " & green(lVar) & Chr(13)&_
        "blue= " & blue(lVar) & Chr(13) , 64,"χρώματα"
End Sub