   Rectangle hdc, rcCurrent.left, rcCurrent.top, rcCurrent.right,
       rcCurrent.bottom
   End If
   
   If Not (bLast) Then
      '// Draw the new rectangle
      Rectangle hdc, rcNew.left, rcNew.top, rcNew.right, rcNew.bottom
   End If
   
   ' Store this position so we can erase it next time:
   LSet rcCurrent = rcNew
   
   ' Free the reference to the Desktop DC we got (make sure you do this!)
   DeleteDC hdc
    
End Sub

''' &lt;summary&gt;
''' Draws an image from an image list using the
''' specifi