7,762
社区成员
发帖
与我相关
我的任务
分享
Dim c As Class1 '假定这就是你的类名
Dim b As Boolean
Set c = New Class1
'下面这个属性赋值调用 Property Let,如果类中没有 Property Let,下面语句出错,即属性是只读的。
c.Locked(1,1) = True
'下面这个属性取值调用 Property Get,如果类中没有 Property Get,下面语句出错,即属性是不可读取的。
b = c.Locked(1,1)