Class 对象
使用 Class 语句创建的对象。提供了对类的各种事件的访问。
说明
不允许显式地将一个变量声明为 Class 类型。在 VBScript 的上下文中,“类对象”一词指的是用 VBScript Class 语句定义的任何对象。
在使用 Class 语句建立了类定义之后,可以用下面的形式创建类的一个实例:
Dim X
Set X = New classname
由于 VBScript 是一种后期约束型语言,下面的做法是不允许的:
Dim X as New classname
-或-
Dim X
X = New classname
-或-
Set X = New Scripting.FileSystemObject
Class 对象的事件
Class 对象提供对类的事件的访问。
Initialize 事件
在创建类的实例时发生此事件。
Private Sub Class_Initialize()
语句
End Sub
当类初始化时,statements部分由零个或多个将要运行的代码语句组成。
说明
下面的例子演示了 Initialize 事件的用法。
Class TestClass
Private Sub Class_Initialize ' 设置 Initialize 事件。
MsgBox("TestClass started")
End Sub
Private Sub Class_Terminate ' 设置 Terminate 事件。
MsgBox("TestClass terminated")
End Sub
End Class
Set X = New TestClass ' 创建一个 TestClass 实例。
Set X = Nothing ' 删除实例。
Terminate 事件
在所关联的类的实例终止时发生此事件。
Private Sub Class_Terminate()
语句
End Sub
当类初始化时,statements 部分由零个或多个将要运行的代码语句组成。
说明
下面的例子演示了 Terminate 事件的用法。
Class TestClass
Private Sub Class_Initialize ' 设置 Initialize 事件。
MsgBox("TestClass started")
End Sub
Private Sub Class_Terminate ' 设置 Terminate 事件。
MsgBox("TestClass terminated")
End Sub
End Class
Set X = New TestClass ' 创建一个 TestClass 实例。
Set X = Nothing ' 删除实例。
Class 语句
声明一个类的名称,以及组成该类的变量、属性和方法的定义。
Class name
statements
End Class
参数
name 必选项。Class 的名称;遵照标准的变量命名规则。
statements 必选项。一个或多个语句,定义了 Class 的变量、属性和方法。
ASP中类Class相关内容的整理资料
内容版权声明:除非注明,否则皆为本站原创文章。