Συνάρτηση 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