首页 诗词 字典 板报 句子 名言 友答 励志 学校 网站地图
当前位置: 首页 > 教程频道 > 开发语言 > VB >

怎么设置类模块的默认成员

2012-02-02 
如何设置类模块的默认成员?比如TextBox控件,默认Text属性,那么类模块如何自己定义默认成员呢?[解决办法]ht

如何设置类模块的默认成员?
比如TextBox控件,默认Text属性,那么类模块如何自己定义默认成员呢?

[解决办法]
http://blog.csdn.net/rainstormmaster/archive/2007/04/15/1565580.aspx
暴风雨讲的是控件,同样适用于类

类模块:
Private mText As String
Public Property Get Text() As Variant
Text = mText
End Property

Public Property Let Text(ByVal vNewValue As Variant)
mText = vNewValue
End Property

窗体:
Private Sub Command1_Click()
Dim x As New Class1
x = "123 "
Print x.Text
End Sub

热点排行