Brush Object Example

The following example sets a bold vertical line pattern for the chart backdrop using the Brush object.

Private Sub Command1_Click()
   ' Sets Backdrop to Fill - Brush Style.
   MSChart1.Backdrop.Fill.Style = VtFillStyleBrush
   ' Sets a pattern for the chart backdrop using the 
   ' Brush object.
   With MSChart1.Backdrop.Fill.Brush
      .Style = VtBrushStylePattern
      .Index = VtBrushPatternBoldVertical
   ' Sets Pattern to Bold Vertical lines.
      .FillColor.Set 255, 0, 0   ' Fill Color = Red.
      .PatternColor.Set 0, 0, 255   ' Pattern Color = 
                                 ' Blue.
   End With
End Sub