… = ReportBrush[…] (gb.report2)
Dim hReportBrush
As ReportBrush
hReportBrush
= ReportBrush
[ sValue As String ]
Creates a new ReportBrush object from a brush description and returns it.
The
Value is a description of the Brush.
Examples
'To set a color
MyBrush = ReportBrush["#00FF00"]
'To set an image
MyBrush = ReportBrush["image(\"icon.png\")"]
'or
MyBrush = ReportBrush["image(icon.png)"]
'To set a linear gradient
'all values are relative between 0 and 1 even for size and gradient stop
'LinearGradient(relleft,reltop,relwidth,relheight,[colorstop1,colorstop2,...],[colorstopRelPos1,colorstopRelPos2,...])
MyBrush = ReportBrush["LinearGradient(0,0,1,1,[#000000,#FFFFFF,#0000FF],[0,1,0.5])"]
'To set a Radial gradient
'all values are relative between 0 and 1 even for size and gradient stop
'LinearGradient(relCenterX,relCenterY,relRadius,relFX,RelFY,[colorstop1,colorstop2,...],[colorstopRelPos1,colorstopRelPos2,...])
MyBrush = ReportBrush["RadialGradient(0.53,0.53,0.5,0.88,0.18,[#000000,#FFFFFF,#0000FF],[0,1,0.5])