|
ED
|
not used
|
RT
|
avaliable
|
This method sets a value in combination with a status and a timestamp.
Sub SetValue() Dim zVariables As Variables 'Object from type Variables Dim zVariable As Variable 'Child object from type Variables 'Fill the objects Set zVariables = thisProject.Variables 'Take the first variable Set zVariable = zVariables.Item(0) 'Write value 10, status I-BIT, with the actual time and 333 ms onto the variable zVariable.SetValueWithStatus 10, 262144, Now, 333 End Sub