其实,这个问题没什么技术含量,可是偏偏许多人不知道,于是有了这篇文章。
首先,新建一个ActiveX Control工程,在界面上放一个TextBox,然后,打开代码窗口,输入如下代码:
Public a As String
Public Property Get Value() As String
a = Text1.Text
本文介绍了如何在VB6的ActiveX Control工程中为自定义控件设置默认属性。通过创建`Value`属性并实现`Get`和`Let`过程,结合控件的`UserControl_ReadProperties`和`UserControl_WriteProperties`事件,可以实现属性的读写。此外,通过工具菜单的过程属性设置或直接编辑ctl文件,可以将`Value`属性设为缺省属性。
其实,这个问题没什么技术含量,可是偏偏许多人不知道,于是有了这篇文章。
首先,新建一个ActiveX Control工程,在界面上放一个TextBox,然后,打开代码窗口,输入如下代码:
Public a As String
Public Property Get Value() As String
a = Text1.Text
1235

被折叠的 条评论
为什么被折叠?