'在vb6属性栏里添加修改属性
Private Sub UserControl_ReadProperties(PropBag As PropertyBag)
   SizeGrip = PropBag.ReadProperty("SizeGrip", True)
   Set Font = PropBag.ReadProperty("Font", m_oFont)
   SimpleMode = PropBag.ReadProperty("UnicodeFormat", False)
   SimpleMode = PropBag.ReadProperty("SimpleMode", False)
End Sub

Private Sub UserControl_WriteProperties(PropBag As PropertyBag)
   PropBag.WriteProperty "SizeGrip", SizeGrip, True
   PropBag.WriteProperty "Font", Font, m_oFont
   PropBag.WriteProperty "UnicodeFormat", UnicodeFormat, False
   PropBag.WriteProperty "SimpleMode", SimpleMode, False
End Sub

'问题: 自定义控件属性的提示信息怎么设置?