Your Products have been synced, click here to refresh
For Each cmd in cmds If cmd.TypeDescription = "Assignment" Then Dim assignName as Object = cmd.GetText(PCDLRN.ENUM_FIELD_TYPES.DEST_EXPR, 0) assVal = part.GetVariableValue(assignName).StringValue MsgBox(assVal) End If Next cmd
Public Function GetText( _ ByVal DataType As ENUM_FIELD_TYPES, _ ByVal TypeIndex As Long _ ) As String |
For Each cmd in cmds If cmd.TypeDescription = "Assignment" Then Dim assignName as Object = cmd.GetText(PCDLRN.ENUM_FIELD_TYPES.DEST_EXPR, 0) assVal = part.GetVariableValue(assignName).StringValue MsgBox(assVal) End If Next cmd
Public Function GetText( _ ByVal DataType As ENUM_FIELD_TYPES, _ ByVal TypeIndex As Long _ ) As String |
© 2024 Hexagon AB and/or its subsidiaries. | Privacy Policy | Cloud Services Agreement |