Public Property Get MouseIcon() As Picture
  Set MouseIcon = UserControl.MouseIcon
End Property
 
Public Property Set MouseIcon(ByVal vNewValue As Picture)
  Set UserControl.MouseIcon = vNewValue
  PropertyChanged "MouseIcon"
End Property