VB of WinCC problem

Hi there,

I'm relative new to VB, I got a small problem. I'm using WinCC with VBS, it's something like VBA in excel.

I've got one variable called Dummy, this var can contain three conditions namely 1,2 and 4. If it contains 1 then a tekst (Press 3)should be displayed in var Test and so on.
In fact it's a selection of 3 radio buttons, it depends on which button is clicked which tekst should be displayed.

I wrote the following code

Sub OnLButtonDown(ByVal Item, ByVal Flags, By Val x, By Val y)

Dim dummy, Test

Set Dummy = HMIRuntime.Tags(“Dummy”)
Set Test = HMIRuntime.Tags(“Test”)

If Dummy = 1 Then Test = (“Pers3”)
Else
If Dummy = 2 Then Test = (“Pers4”)
Else Test = (“Pers5”)
End IF
End IF
End Sub

What am I doing wrong ?

Fritz_frederix said:

Sub OnLButtonDown(ByVal Item, ByVal Flags, By Val x, By Val y)



  Dim dummy, Test ??



  Set Dummy = HMIRuntime.Tags(“Dummy”)

  Set Test = HMIRuntime.Tags(“Test”)



  If Dummy = 1 Then 

     Test = (“Pers3”)

  Else

     If Dummy = 2 Then 

        Test = (“Pers4”)

     Else 

        Test = (“Pers5”)

     End IF

  End IF

End Sub

Click to expand...

Is it that Capital letter 'd' in word dummy for ..Tags("Dummy")?

How are you initializing or passing data to Dummy? You have too many end if's.

Hi...

Why don´t you use select case?

Is better than use a lot of (IF, THEM)

LaRocca said:

Why don´t you use select case?

Click to expand...

How then with 100.000 to 1.000.000 cases ?
Use database, that is best for it. You can use
user defined display-text and non fixed number of
cases.