Red Function
Tagastab antud värvikoodi punase komponendi.
SĂźntaks:
Red (ColorNumber As Long)
Tagastusväärtus:
Täisarv
Parameeter:
ColorNumber: pikk täisarvavaldis, mis määrab värvikoodi, mille jaoks punane komponent tagastatakse.
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