VBScript高级:VBScript类对象

类是用于定义唯一类型的构造。与面向对象编程一样,VbScript 5.0支持类的创建,它与使用VB编写COM对象非常相似。

类只是对象的模板,我们实例化一个对象以访问其属性和方法。类可以包含变量,属性,方法或事件。

语法

VBScript类包含在Class …中。End类

'Defining the Class
Class classname 'Declare the object name
...
End Class

' Instantiation of the Class
Set objectname = new classname

类变量

类可以包含变量,可以是私有的也可以是公共的。类中的变量应遵循VBScript命名约定。默认情况下,class中的变量是Public。这就是为什么可以在课外访问它们的原因。

Dim var1 , var2.
Private var1 , var2.
Public var1 , var2.

类属性

类属性,例如Property Let,它处理数据验证过程并将新值分配给私有变量。属性集,它将新的属性值分配给私有对象变量。

只读属性只有一个“属性获取”过程,而只读属性(很少有)只有一个“属性让”或“属性集”过程。

在下面的示例中,我们使用“属性”包装私有变量。

Class Comp
   
   Private modStrType
   Private OS
 
   Public Property Let ComputerType(strType)
      modStrType = strType
   End Property
 
   Public Property Get ComputerType()
      ComputerType = modStrType
   End Property
 
   Public Property Set OperatingSystem(oObj)
      Set OS = oObj
   End Property
 
   Public Property Get OperatingSystem()
      Set OperatingSystem = OS
   End Property
 
End Class

类方法

方法允许类执行开发人员想要的操作。方法不过是函数或子例程。

在下面的示例中,我们使用“属性”包装私有变量。

Class Car
   
   Private Model
   Private Year
 
   Public Start()
      Fuel = 2.45
	   Pressure =  4.15
   End Function
 
End Class

课堂活动

默认情况下,有两个事件自动与每个类关联。Class_Initialize和Class_Terminate。

每当您基于类实例化对象时,都会触发Class_Initialize。当对象超出范围或将对象设置为Nothing时,将引发Class_Terminate事件。

在下面的示例中,我们将使您了解事件在VBScript中的工作方式。

'Instantation of the Object
Set objectname = New classname 
   
Private Sub Class_Initialize(  )
	Initalization code goes here
End Sub

'When Object is Set to Nothing
Private Sub Class_Terminate(  )
	Termination code goes here
End Sub

作者:terry,如若转载,请注明出处:https://www.web176.com/vbscript/1117.html

(0)
打赏 支付宝 支付宝 微信 微信
terryterry
上一篇 2020年12月7日 上午11:39
下一篇 2020年12月7日 下午12:30

相关推荐

发表回复

登录后才能评论