The following is an easy example of how to change colors using Rpv Reports.
Open
"c:\windows\temp\colors.rpv" For Output As #1
Print #1, "Report_title=Sample of colors"
Print #1, "spacing=250"
Print #1, "$col0=400"
Print #1, "[header]"
Print #1, "{f=arial;b=y;s=10}"
Print #1, "{$col0} Color samples {\n;\n}"
Print #1, "[data]"
For rtr = 0 To 15
Print #1, "{$col0;c=" & rtr & "}
This has been printed using color # " & rtr
& "{\n}"
Next rtr
Close
x = Shell("rpv c:\windows\temp\colors.rpv",
vbMaximizedFocus) |
Open VB and select "new project". After that insert a command button and paste this code for that button. After that run the program.
|
