Dear friends,

I'm using WinCC RT Professional V14 SP1.

I have one VB script (Sub) with 2 variables, both of them transferred  by reference (ByRef). I was wandering if there was any way to get tag name from ByRef inside this funciton?

Rough example of what I'm trying to accomplish:

MyFunction("RuntimeTag01")

Sub MyFunction(ByRef variable)

HMIRuntime.Trace(variable.Name)

End Sub

I want my output window to show "RuntimeTag01" (variable name).

Any help?

Thanks in advance.

Regards.

Hi MHest,

I split your question, because it differs from crazyCow question. The reason why I closed the split one is because you already created your own thread here: VBS write tag with ByRef parameter


Best regards,
Jen_Moderator

Finally, I found a way to use ByRef in Sub Procedures.

Try to give the Sub the WinCC Variable as an Array of something.
Inside the Sub, choose the array element index and fill the value into that index.
Directly the variable gets its new value before the Sub Procedure finished its call.


Sub test (ByRef test)
Dim cnt
For cnt = 0 To 10
test(0) = test(0) + 1
Next
End Sub


Example:
myVariable_1 : Array[0..10] of Int

Then use a HMI screen and put an EA field on that screen. Connect the EA field to the root array element of the variable.

Example:
myVariable_1[0]

Add a Button to the screen where you can fire up that script.

Use a WinCC internal variable as an Array(!!!) of Int (for example) and put it inside the parameters of the test function.

Example:
test SmartTags("myVariable_1")

As you push the button you will see the value inside the EA field on the screen counting up from 0 to 10 (!!!!) :)

So... it looks like SIEMENS need to do something here...
ByRef is definetly wrong implemented. It would be very nice if ByRef could be used as normal here and not only with arrays.