Load example for Visual Basic

   Dim nPages As Long
   Dim RasterMrc As LEADRasterMrc
   RasterMrc.EnableMethodErrors = True
   RasterMrc.GetPagesCount "c:\temp\testT44.mrc"
   nPages = RasterMrc.MRCPagesCount
   Caption = "File has " & nPages & " pages"
   ' load last page
   RasterMrc.Load LEADRasterView1.Raster, "c:\temp\testT44.mrc", nPages