Typing error in ListBoxW:
Code:
Public Property Let ItemHeight(Optional ByVal Index As Long, ByVal Value As Single)
   '...
   If PropDrawMode <> CboDrawModeOwnerDrawVariable Then  -> LstDrawModeOwnerDrawVariable
   '...
End Property
One headache is that ListBox does't have modem themed Selection.