vb6.0如何为用户控件添加属性并显示在右侧属性栏中？

Question

如果我想将usercontrol1里面的控件TEXT1的text属性定义为usercontrol1的一个属性并在右侧属性栏显示。我该如何做呢？我是新手，最好有源码与解释。。。多谢各位高人解答啦

Answer 1

添加代码

 Public Property Get 属性名 As String
    属性名 = Me.Text1.Text
End Property
Public Property Set 属性名(ByVal Value As String)
    Me.Text1.Text = Value
End Property