定义方法:类模块中使用 “Public 属性名称 as 数据类型” 语句即可
优点:定义方法简单,定义的属性可以随意进行读写;
缺点:当通过标准模块给属性赋值的时候,无法对所赋的值进行控制;
注意:一定是用Public语句,Dim,Private,Static赋值语句都不行;
2、定义一个可任意读写,并且可以控制将属性值控制在一个规定范围内
定义方法:分为三步
(1)定义一个私有变量“Private 变量 as 数据类型”,做为转换变量临时储存数据;
(2)使用“Property let 属性名称( 变量名 as 数据类型 )” 过程负责给属性赋值,完成属性的写功能;
(3)使用“Property get 属性名称() as 数据类型 ” 过程负责读取属性的值,完成属性读功能;
优点:灵活,便于控制
缺点:个人感觉是比较麻烦,呵呵。
注意:Property let和Property get语句都是省略了Public关键字的,实际上应该为 Public Property let 和 Public Property get
3、定义一个只读属性
定义方法:使用“Property get 属性名称() as 数据类型 ” 过程负责读取属性的值,完成属性读功能。
4、定义一个只写属性
定义方法:分为二步
(1)定义一个私有变量“Private 变量 as 数据类型”,做为转换变量临时储存数据;
(2)使用“Property let 属性名称( 变量名 as 数据类型 )” 过程负责给属性赋值,完成属性的写功能;