Red Function

Red palauttaa määrätyn värikoodin punaisen komponentin.

Syntaksi:

Red (color_number1 As Long)

Palautusarvo:

Integer-tyypin kokonaisluku

Parametri:

Color_number1: pitkä kokonaislukulauseke, joka määrittelee värikoodin, josta palautetaan punainen komponentti.

Error codes:

5 Virheellinen proseduurikutsu

Esimerkki:

Sub ExampleColor

Dim lVar As Long

    lVar = rgb(128,0,200)

    MsgBox "Värin " & lVar & " koostumus:" & Chr(13) &_

        "punaista = " & Red(lVar) & Chr(13)&_

        "vihreää = " & Green(lVar) & Chr(13)&_

        "sinistä = " & Blue(lVar) & Chr(13) , 64,"Osavärit"

End Sub