BooleanItemValue example for Visual Basic

   Dim RasterVariant As New LEADRasterVariant_U

   RasterVariant.Type = VALUE_ARRAY_BOOLEAN
   RasterVariant.ItemCount = 2
   RasterVariant.BooleanItemValue(0) = True
   RasterVariant.BooleanItemValue(1) = False