Funkcija Red

Vrne rdeči delež navedene kode sestavljene barve.

Skladnja:


Red (BarvnoŠtevilo As Long)

Vrnjena vrednost:

Integer

Parametri:

BarvnoŠtevilo: izraz vrste Long integer, ki določa kodo sestavljene barve, za katero želimo izvedeti delež rdeče.

warning

Če je omogočen združljivostni način VBA (Option VBASupport 1), funkcija Red() ni združljiva z barvami VBA, če je podana barva iz prejšnjega klica funkcije RGB [VBA].


Kode napak:

5 Neveljaven klic procedure

tip

Pogovorno okno Izberi barvo podrobno izpiše rdečo, zeleno in modro komponento kode sestavljene barve kot tudi njen šestnajstiški izraz. S spreminjanjem barve besedila in izbiro Barva po meri odprete pogovorno okno izbirnika barv.


Primer:


Sub ExampleColor
Dim lVar As Long
    lVar = rgb(128,0,200)
    MsgBox "Barvo " & lVar & " sestavljajo:" & Chr(13) &_
        "rdeča barva= " & Red(lVar) & Chr(13)&_
        "zelena barva= " & Red(lVar) & Chr(13)&_
        "in modra barva = " & Red(lVar) & Chr(13), 64,"barve"
End Sub

Podprite nas!