[Bug 14498] New: VB6 App problem on MouseIcon property

http://bugs.winehq.org/show_bug.cgi?id=14498

Summary: VB6 App problem on MouseIcon property
           Product: Wine
           Version: 1.1.1
          Platform: PC
        OS/Version: Linux
            Status: UNCONFIRMED
          Severity: normal
          Priority: P2
         Component: oleaut32
        AssignedTo: [e-mail]
        ReportedBy: [e-mail]

Created an attachment (id=14824)
 --> (http://bugs.winehq.org/attachment.cgi?id=14824)
Test for VB6 App problem on MouseIcon property

This is VB6 example program that work fine in Win Xp (and 2000,Vista...)
but in wine there is a problem in the WriteProperties of the morphbutton
object:

Private Sub UserControl_WriteProperties(PropBag As PropertyBag)
...
    Call .WriteProperty("MICON", UserControl.MouseIcon)     (*)
...
doesn't work in wine!

The problem is here(*). If I write
    Call .WriteProperty("MICON", UserControl.MouseIcon, Nothing)
it works in wine!

Maybe is a problem related to the variants...

NOTE:
The WriteProperties event is a standard VB6 event utilized for storing
properties values.