Type example for Visual Basic

  Dim RasterProc As New LEADRasterProcess
  Dim strOut As String
   
   RasterProc.GetOverlayAttributes LEADRasterView1.Raster, 0, OVERLAYATTRIBUTES_FLAGS
   MsgBox "Type = " + RasterProc.OverlayAttributes.Type + Chr(13) + _
          "BitsAllocated  = " + Str(RasterProc.OverlayAttributes.BitsAllocated) + Chr(13) + _
          "Description =" + RasterProc.OverlayAttributes.Description + Chr(13) + _
          "Subtype =" + RasterProc.OverlayAttributes.Subtype + Chr(13) + _
          "Label =" + RasterProc.OverlayAttributes.Label + Chr(13)