Συνάρτηση RGB

Επιστρέφει τιμή χρώματος ακεραίου Long που αποτελείται από κόκκινο, πράσινο και γαλάζιο συστατικό.

Σύνταξη:


RGB (κόκκινο, πράσινο, γαλάζιο)

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

Μεγάλου μήκους

Παράμετρος:

Κόκκινο: Κάθε παράσταση ακέραιου που αντιπροσωπεύει το κόκκινο συστατικό (0-255) του σύνθετου χρώματος.

Πράσινο: Κάθε παράσταση ακέραιου που αντιπροσωπεύει το πράσινο συστατικό (0-255) του σύνθετου χρώματος.

Γαλάζιο: Κάθε παράσταση ακέραιου που αντιπροσωπεύει το γαλάζιο συστατικό (0-255) του σύνθετου χρώματος.

tip

Ο διάλογος επιλογέα χρώματος βοηθά τον υπολογισμό του κόκκινου, πράσινου και του γαλάζιου συστατικού σύνθετου χρώματος. Η Αλλαγή χρώματος κειμένου και η επιλογή Προσαρμοσμένου χρώματος εμφανίζει τον διάλογο επιλογέα χρώματος.


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

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

Παρακαλούμε, υποστηρίξτε μας!