<%
Class Demo '声明一个名为Demo的类
Public jordan
Private Sub Class_Initialize'初始化类
jordan="My Name is jordan."
End Sub
Private Sub Class_Terminate()'类的结束
End Sub
Public Property get YName'YName函数是获得jordan的值
YName=jordan
End Property
public property let MName(x)'MName函数是设置jordan属性的值
jordan=x
end property
End Class
Set obj=New jordan '新建Demo的obj对象
obj.MName="jordan is 23"'调用MName函数,设置jordan的值
Response.Write(obj.YName)'返回YName函数的值,就是获得jordan的值
%>
其中Get和Let的区别在于,Get是获得jordan的值,而Let是设置
jordan的值
关键字“Property”,告知了编译器如同调用属性一样在外部调用函数。
例如:obj.YName调用,就跟类属性调用的方式是一样的