RemapTableSize example for Visual Basic

   If (LEAD1.BitmapBits = 16 And LEAD1.IsGrayscale()) _
      Or LEAD1.BitmapBits = 64 Or LEAD1.BitmapBits = 48 Then
      LEAD1.RemapTableSize = 65536
   ElseIf LEAD1.BitmapBits = 12 Then
      LEAD1.RemapTableSize = 4096
   Else
      LEAD1.RemapTableSize = 256
   End If