Variables.CreateVar

CreateVar(strName As String,lpDriver As LPDISPATCH,kTypes As tpKanaltypes,lpVarType As LPDISPATCH) As Variable

Parameters

strName As String

Name of the new Variable object as string

lpDriver As LPDISPATCH

Needs a driver as an object. Example: zDrivers.Item(0)

kTypes As tpKanaltypes

Channel type as a constant.
List of constants: tpKanaltypes

lpVarType As LPDISPATCH

Needs the datatype of the variable as an object. Example: zVarTypes.Item("INT")

Remarks

With this method you are able to create new variables within a project.

Sample:

Sub CreateVariable()

Dim zVariables As Variables 'Object from type Variables
Dim zVariable As Variable 'Child object from type Variables
Dim zDrivers As Drivers 'Object from type Drivers
Dim zVarTypes As VarTypes 'Object from type VarTypes

'Fill the objects
Set zVariables = MyWorkspace.ActiveDocument.Variables
Set zDrivers = MyWorkspace.ActiveDocument.Drivers
Set zVarTypes = MyWorkspace.ActiveDocument.VarTypes

'Create a "intern driver" variable called "TestVariable" with object type "internal variable" and datatype "INT"
Set zVariable = zVariables.CreateVar("TestVariable", zDrivers.Item(0), 33, zVarTypes.Item("INT"))

End Sub

tpKanaltypes constants:

See Also

Variables, Variable