Συνάρτηση RGB

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

Σύνταξη:

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

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

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

Παράμετρος:

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

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

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

Παράδειγμα:

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