RGB Function

Tagastab pika täisarvulise värviväärtuse, mis sisaldab punase, rohelise ja sinise komponenti.

SĂźntaks:

RGB (Red, Green, Blue)

Tagastusväärtus:

Long

Parameeter:

Red: suvaline täisarvavaldis, mis tähistab liitvärvi punase komponenti (0-255).

Green: suvaline täisarvavaldis, mis tähistab liitvärvi rohelise komponenti (0-255).

Blue: suvaline täisarvavaldis, mis tähistab liitvärvi sinise komponenti (0-255).

Error codes:

5 Vigane protseduuri väljakutse

Näide:

Sub ExampleColor

Dim lVar As Long

    lVar = rgb(128,0,200)

    MsgBox "Värv " & lVar & " koosneb:" & Chr(13) &_

        "punasest= " & red(lVar) & Chr(13)&_

        "rohelisest= " & green(lVar) & Chr(13)&_

        "sinisest= " & blue(lVar) & Chr(13) , 64,"värvist"

End Sub