类可以有公有（Public）和私有（Private）字段：
（1）公有的字段可以外部访问，私有的不能：
（2）可以定义数组字段，且此数组字段可以是动态数组
类可以有公有或者私有的属性：
（1）公有的属性可以外部调用，私有的属性不能
（2）用Property Get定义读属性，用Property Set和Property Let来定义写属性
（3）当定义写属性时，如果此属性封装的是对象字段，则此写属性必须是Property Set
（4）属性不必是成对出现，这样就可以造成只读或只写属性，当然Private任意一方也可以造成这种情况
| Set MyUser = New User MyUser.MyAge = "22" '设置对象的MyAge属性值 MyUser.Myname = "john" '设置对象的Myname属性值 MyUser.ToString '调用对象的ToString方法 Class User Private Str_Name '声明变量Str_Name Private Int_Age '声明变量Int_Age 'Property Get语句，获取属性值或对象引用，Default只与Public一起使用，表示该属性为类的默认属性 Public Property Get Myname Myname = Str_Name End Property Public Property Get MyAge MyAge = Int_Age End Property 'Property Let语句，设置属性值 Public Property Let Myname(New_Name) Str_Name = New_Name End Property Public Property Let MyAge(New_Age) Int_Age = new_age End Property '类方法 Public Sub ToString() MsgBox "姓名："+Myname+" 年龄："+MyAge End Sub End Class |
这篇文章就介绍到这了，需要的朋友可以参考一下。
