Class

Description

Declares a Class Module.

NOTE: In Commando Script you use the IDE to create Functions, Subs and Classes and Classes are always Public

Syntax

[Scope] Class [ClassName]

End Class

Example:

Private Sub TraceTomorrow()

Dim MC1

MC1 = New MyClass

SMEvent.Raise "Trace", "Tomorrow is: " & oUTILITIES.VBFormat(MC1.Tomorrow,"dd mmm yyyy")

MC1 = Nothing

End Sub

Public Class MyClass

'Private Variables

'Initialization Code

'Public Properties / Methods

 Public Property Get Tomorrow()

   Tomorrow = DateAdd("d", 1, Now)

 End Property

 Private Sub Class_Initialize()

   'This Code is called when you create the class

 End Sub

 Private Sub Class_Terminate()

   'This Code is called when you destroy the class or the script stops

 End Sub

End Class