ZigZag Example for Visual Basic

Dim RasterProc As New LEADRasterProcess
Dim XCenter As Integer
Dim YCenter As Integer
XCenter = LEADRasterView1.Raster.BitmapWidth / 2
YCenter = LEADRasterView1.Raster.BitmapHeight / 2
RasterProc.ZigZag LEADRasterView1.Raster, _
                                50, _
                                1000, _
                                10, _
                                0, _
                                XCenter, _
                                YCenter, _
                                0, _
                                FILL_RPT Or _
                                ZG_POND