Objetos de clase VBScript
La clase es una construcción que se usa para definir un tipo único. Al igual que la programación orientada a objetos, VbScript 5.0 admite la creación de clases y es muy similar a escribir objetos COM con VB.
La clase es simplemente la plantilla para un objeto y creamos una instancia de un objeto para acceder a sus propiedades y métodos. Las clases pueden contener variables, propiedades, métodos o eventos.
Sintaxis
Las clases de VBScript se incluyen en Class .... End Class
'Defining the Class
Class classname 'Declare the object name
...
End Class
' Instantiation of the Class
Set objectname = new classname
Variables de clase
Las clases pueden contener variables, que pueden ser privadas o públicas. Las variables dentro de las clases deben seguir las convenciones de nomenclatura de VBScript. Por defecto, las variables en clase sonPublic. Por eso se puede acceder a ellos fuera de la clase.
Dim var1 , var2.
Private var1 , var2.
Public var1 , var2.
Propiedades de clase
Propiedades de clase, como Property Let, que maneja el proceso de validación de datos y asigna el nuevo valor a la variable privada. Conjunto de propiedades, que asigna el nuevo valor de propiedad a la variable de objeto privado.
Las propiedades de solo lectura tienen solo un procedimiento Property Get mientras que las propiedades de solo escritura (que son raras) tienen solo un procedimiento Property Let o Property Set.
Ejemplo
En el siguiente ejemplo, estamos usando Propiedades para envolver variables privadas.
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
Métodos de clase
Los métodos permiten que la clase realice la operación que desea el desarrollador. Los métodos no son más que funciones o subrutinas.
Ejemplo
En el siguiente ejemplo, estamos usando Propiedades para envolver variables privadas.
Class Car
Private Model
Private Year
Public Start()
Fuel = 2.45
Pressure = 4.15
End Function
End Class
Eventos de clase
Hay dos eventos que se asocian automáticamente con cada clase de forma predeterminada. Class_Initialize y Class_Terminate.
Class_Initialize se activa cada vez que crea una instancia de un objeto basado en la clase. Class_Terminate El evento se activa cuando el objeto sale del alcance o cuando el objeto se establece en Nothing.
Ejemplo
En el siguiente ejemplo, le haremos entender cómo funcionan los eventos en 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