Συνάρτηση Red
Επιστρέφει το κόκκινο συστατικό του καθορισμένου κωδικού σύνθετου χρώματος.
Σύνταξη:
Red (ColorNumber As Long)
Τιμή επιστροφής:
Ακέραιος
Παράμετρος:
ColorNumber: Έκφραση μεγάλου ακεραίου που καθορίζει οποιονδήποτε κωδικό σύνθετου χρώματος για τον οποίο επιστρέφεται το κόκκινο συστατικό.
Ο διάλογος επιλογέα χρώματος αναφέρει το κόκκινο, πράσινο και γαλάζιο συστατικό κωδικό σύνθετου χρώματος, καθώς και τη δεκαεξαδική του έκφραση. Η Αλλαγή χρώματος κειμένου και η επιλογή Προσαρμοσμένου χρώματος εμφανίζει τον διάλογο επιλογέα χρώματος.
Παράδειγμα:
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