RGB funkcija

Grąžina ilgąją sveikojo skaičiaus reikšmę, susidedančią iš raudonos, žalios ir mėlynos spalvos komponentų.

Sintaksė:


RGB (Raudona, žalia, mėlyna)

Grąžinama reikšmė:

Ilgas

Parametras:

Raudona: Bet kuri sveikojo skaičiaus išraiška, nurodanti raudoną sudėtinės spalvos komponentą (0–255).

Žalia: Bet kuri sveikojo skaičiaus išraiška, nurodanti žalią sudėtinės spalvos komponentą (0–255).

Mėlyna: Bet kuri sveikojo skaičiaus išraiška, nurodanti mėlyną sudėtinės spalvos komponentą (0–255).

Spalvos ėmiklio dialogo lange išsamiai aprašomi raudoni, žali ir mėlyni sudėtinio spalvų kodo komponentai. Teksto spalvos keitimas ir Vartotojo spalvos parinkimas rodo spalvos ėmiklio dialogo langą.

Klaidos kodai:

5 Neteisingas procedūros iškvietimas

Pavyzdys:


Sub ExampleColor
Dim lVar As Long
    lVar = rgb(128,0,200)
    MsgBox "Šią spalvą " & lVar & " sudaro:" & Chr(13) &_
        "red= " & red(lVar) & Chr(13)&_
        "green= " & green(lVar) & Chr(13)&_
        "blue= " & blue(lVar) & Chr(13) , 64,"colors"
End Sub