ore
            ElseIf l = &amp;H1FE And (r = 0 Or g = 0 Or b = 0) Then
               ' ignore
            ElseIf l = &amp;HFF And ((r = 0 And g = 0) Or (r = 0 And b = 0) Or (g =
             0 And b = 0)) Then
               ' ignore
            Else
               ' add
               lIndex = lIndex + 1
               With m_tPal(lIndex)
                  .rgbRed = r: .rgbGreen = g: .rgbBlue = b
               End With
            End If
         Next
      Next
   Next
   ' Fill the remain entries with