加入收藏 | 设为首页 | 会员中心 | 我要投稿 银川站长网 (https://www.0951zz.com/)- 云通信、基础存储、云上网络、机器学习、视觉智能!
当前位置: 首页 > 站长学院 > Asp教程 > 正文

ASP中类Class相关内容的整顿资料

发布时间:2023-08-12 12:50:07 所属栏目:Asp教程 来源:
导读:Class 对象使用 Class 语句创建的对象。提供了对类的各种事件的访问。说明不允许显式地将一个变量声明为 Class 类型。在 VBScript 的上下文中,“类对象”一词指的是用 VBScript Class 语句定义的任何对象

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 的变量、属性和方法。 

(编辑:银川站长网)

【声明】本站内容均来自网络,其相关言论仅代表作者个人观点,不代表本站立场。若无意侵犯到您的权利,请及时与联系站长删除相关内容!

    推荐文章