|
ED
|
avaliable
|
RT
|
avaliable
|
This method returns -1 when the datatype is a simple datatype and 0 when it is a complex datatype.
Sub IsSimple() Dim zVarTypes As VarTypes 'Object from type VarTypes Dim zVarType As VarType 'Child object from type VarTypes Dim zDrivers As Drivers 'Object from type Drivers 'Fill the objects Set zVarTypes = MyWorkspace.ActiveDocument.VarTypes Set zDrivers = MyWorkspace.ActiveDocument.Drivers 'Read the datatype INT from the list. Set zVarType = zVarTypes.Item("INT") 'Check if it is a simple or a complex datatype Debug.Print "Is Simple = " & zVarType.IsSimple End Sub