Evaluate Method
Description
Evaluates an expression.
Syntax
| Visual Basic |
|---|
Public Function Evaluate( _ ByVal objectType As Integer, _ ByVal nObject As Long, _ ByVal formula As String _ ) As Variant |
Parameters
- objectType
-
SIS_OT_COMMANDChanges the properties/mode of the current command. SIS_OT_CURITEM The current open Item. SIS_OT_DEFITEMThe default Item. SIS_OT_DATASETDatasets. SIS_OT_OVERLAYOverlays. SIS_OT_WINDOWThe window. SIS_OT_NOLNamed Object Libraries. SIS_OT_FTABLEThe current Feature Table. SIS_OT_SCHEMAThe current Schema. SIS_OT_SCHEMACOLUMNA column in the current Schema. SIS_OT_THEMEThe current Theme. SIS_OT_THEMECOMPONENTA component in the current Theme. SIS_OT_PRINTERPrinter. SIS_OT_SYSTEMSystem variables. SIS_OT_OPTIONSystem wide Boolean options. - nObject
- The index of the object type.
- formula
- The expression to evaluate. See Property Expression Syntax for details.
Return Type
The evaluated value of the given expression.
Remarks
The following expression function enables you to find out what data type an attribute is.
VarType(...)
which returns an enumeration, e.g. VarType(‘my_date@’) returns 7. Use it as part of Sis.Evaluate (for @ datatypes) and Sis.EvaluateInt (for $&# datatypes).
The following expression translates these numbers into descriptive types:
Choose(VarType('attr@'),'Null','Short','Long (&)','Float','Double(#)','Currency','Date','String($)','','','Boolean','','','Decimal','Byte'.'Unsigned Byte','Unsigned Short','Unsigned Long','Long Long Integer','Unsigned Long Long')
Substitute attr@ for your attribute name (including the $&#@ suffix).
VarType({...}) will also work with any lambda expression inside the {}.
For example:
VarType({DATE@})
The returned value will determine the data type for the queried column:
| vbEmpty | 0 | Empty (uninitialized) |
| vbNull | 1 | Null (no valid data) |
| vbInteger | 2 | Integer |
| vbLong | 3 | Long Integer |
| vbSingle | 4 | Single |
| vbDouble | 5 | Double |
| vbCurrency | 6 | Currency value |
| vbDate | 7 | Date value |
| vbString | 8 | String |
| vbObject | 9 | Object |
| vbError | 10 | Error value |
| vbBoolean | 11 | Boolean value (Zero and Non-zero) |
| vbVariant | 12 | Variant (Array only) |
| vbDataObject | 13 | A data access object |
| vbByte | 17 | Byte |
| vbUserDefinedType | 36 | Variants that contain user-defined types |
Available: GEO D OD OM OV SISpy
Group:
Example
sis.Evaluate ( SIS_OT_CURITEM , 0, "Area@" )