Röd funktion
Returnerar den röda komponenten i en given fÀrgkod.
Syntax:
Red (FĂ€rg As Long)
ReturvÀrde:
Integer
Parameter:
ColorNumber: HeltalsvÀrde av typen Long som definierar den fÀrgkod vars röda komponent funktionen ska returnera.
Exempel:
Sub ExampleColor
Dim lVar As Long
lVar = rgb(128,0,200)
MsgBox "FÀrgen " & lVar & " bestÄr av:" & Chr(13) &_
"röd = " & red(lVar) & Chr(13)&_
"grön= " & green(lVar) & Chr(13)&_
"blÄtt= " & blue(lVar) & Chr(13) , 64,"fÀrger"
End Sub