Skip to Content

Register Login

Industry Online Support

Technical Forum

Navigation

comboBox in vbs

Created by: mef3000 at: 6/8/2010 9:43 PM (5 Replies)

Rating (1)

Thanks 3

6 Entries

6/8/2010 9:43 PM	Rate (0)
mef3000 Posts: 81 Rating: (1)	hi all i have 7 different page in my project and to change pages iwana use a comboBox .is it posible to do it in vbs ?if it s, can you give a small example?
mef3000 Posts: 81 Rating: (1)
Suggestion To thank Quote Answer

6/9/2010 8:49 AM	Rate (1)
Romulus Silver Member Joined: 1/4/2010 Last visit: 9/25/2024 Posts: 650 Rating: (40)	Hi Select the combo box>Object properties>Event>Property Topics>Miscellanious>Selected box>change Example script: Sub SelIndex_OnPropertyChanged(ByVal Item, ByVal value) Dim objScrWindow Set objScrWindow = ScreenItems("ScreenWindow") If value = 1 Then objScrWindow.ScreenName = "test" End If If value = 2 Then objScrWindow.ScreenName = "test1" End If If value = 3 Then objScrWindow.ScreenName = "test2" End If End Sub
	Regards Romulus Please give me answer if it works or if i can help you again. Sorry if my english isn't so comfortable.
Suggestion To thank Quote Answer
This contribution was helpful to 2 thankful Users Jazz_M pavelvn

6/9/2010 1:13 PM	Rate (0)
mef3000 Posts: 81 Rating: (1)	sorry i forgot to say it s wincc 6.0 sp4 my mistake .but is it posible to do comboBox in wincc 6.0
mef3000 Posts: 81 Rating: (1)
Suggestion To thank Quote Answer

6/11/2010 10:57 AM	Rate (0)
Romulus Silver Member Joined: 1/4/2010 Last visit: 9/25/2024 Posts: 650 Rating: (40)	Hi In WinCC V6 you can use a TextList. Put a tag on the outputvalue. Define the assignmentvalues: Select the TextList>Object properties>Event>Property Topics>Output/Input>Output Value>change Example script: Sub SelIndex_OnPropertyChanged(ByVal Item, ByVal value) Dim objScrWindow Set objScrWindow = ScreenItems("ScreenWindow") If value = 1 Then objScrWindow.ScreenName = "test" End If If value = 2 Then objScrWindow.ScreenName = "test1" End If If value = 3 Then objScrWindow.ScreenName = "test2" End If End Sub
	Regards Romulus Please give me answer if it works or if i can help you again. Sorry if my english isn't so comfortable.
Suggestion To thank Quote Answer
This contribution was helpful to 1 thankful Users Jazz_M

12/13/2016 3:33 PM	Rate (0)
Min_Moderator Platinum Member Joined: 9/3/2014 Last visit: 3/13/2019 Posts: 4766 Rating: (122)	New question published by KAMY is split to a separate thread with the subject ComboBox, text should not change with replace page. Best regards Min_Moderator

Suggestion To thank Quote Answer

12/14/2016 5:56 AM	Rate (0)
KAMY Experienced Member Joined: 10/8/2015 Last visit: 3/1/2023 Posts: 59 Rating: (4)	Many thanks

Suggestion To thank Quote Answer

|

Share this page:

Share this page on...

Related topics by keywords:

Follow us on