Help for this page

Select Code to Download


  1. or download this
    With myDocument.Shapes.AddShape(Type:=msoShapeRectangle, _
        Top:=144, Left:=144, Width:=72, Height:=72)
...
    .Fill.ForeColor.RGB = RGB(255, 0, 0)
    .Line.DashStyle = msoLineDashDot
End With
  2. or download this
    print RGB(0,0,0)
 0 
...
 65280 
print RGB(0,0,255)
 16711680
  3. or download this
    sub RGB {
  my ($red,$green,$blue) = @_;
...
print RGB(255,0,0) . "\n";
print RGB(0,255,0) . "\n";
print RGB(0,0,255) . "\n";
  4. or download this
    0
16777215
255
65280
16711680