Clears the Pattern Canvas
Syntax:
Sub Clear()
Remarks:
The Clear method clears a pattern canvas by filling it with white.
Examples:
The following VBA example creates a new pattern fill in a 64 × 64 bitmap and then applies the fill to a newly created rectangle.
Sub Test()
Dim c As New PatternCanvas
Dim n As Long
c.Size = cdrPatternCanvas64x64
c.Clear
For n = 2 To 63 Step 2
  c.Line (0, 0)-(n, n), , B
Next n
With ActiveLayer.CreateRectangle(0, 0, 2, 2)
  .Fill.ApplyPatternFill cdrTwoColorPattern
  .Fill.Pattern.Canvas = c
End With 
End Sub