Red Function [Runtime]

Red Function [Runtime] /text/sbasic/shared/03010303.xhp

Red function Red Function [Runtime] Returns the Red component of the specified color code.

Syntax: Red (ColorNumber As Long) Return value: Integer Parameter: ColorNumber: Long integer expression that specifies any color code for which to return the Red component.

Example: Sub ExampleColor Dim lVar As Long lVar = rgb(128,0,200) MsgBox "The color " & lVar & " consists of:" & Chr(13) &_ "red= " & red(lVar) & Chr(13)&_ "green= " & green(lVar) & Chr(13)&_ "blue= " & blue(lVar) & Chr(13) , 64,"colors" End Sub