SiePortal

The integrated platform for your product selection, buying and support workflow - bringing together Industry Mall and Online Support.

Products & Services
- Menu temporary not available
- Menue temporary not available
- {{item.title}}
Support Support
{{(apiData.Support | filter:{'rank':1}:true)[0].title}} Support
- Menu temporary not available
- Menue temporary not available
- {{item.title}}
MySiePortal MySiePortal
{{(apiData.MySiePortal | filter:{'rank':1}:true)[0].title}} MySiePortal
- Menu temporary not available
- Menue temporary not available
- {{item.title}}
Cart ({{apiData.CartCount}})

Navigation

Insert Delay Time to VB scrips Sub on WINCC V17

11/16/2022 4:45 AM	Rate (0)
Dung922 Member Joined: 5/21/2022 Last visit: 4/10/2024 Posts: 5 Rating: (0)	Hello Everyone, I created 01 small Script to convert data on WINNCC After i write value 0 to the tags . Need the time for delay to next step ( Make sure job write value 0 was finished) Next step i will write new value to the tags But i don't know how to insert delay time to this scripts Please help to take a look and guide for me Many thanks Dim TagSetString Dim DecText Dim SetVal Dim j Set TagSetString = HMIRuntime.Tags.CreateTagSet '--- Byte Tags ATTRIB----------------------------------------------------------------------- TagSetString.Add pszTagPrefix & "MES.DATA.MSG" 'Read TagsSetByte TagSetString.Read DecText=STR2DEC(TagSetString.Item(pszTagPrefix & "MES.DATA.MSG").Value) HMIRuntime.Trace "MSGString:= " & TagSetString.Item(pszTagPrefix & "MES.DATA.MSG").Value & vbNewLine For j = 1 To 15 ' Number of bytes HMIRuntime.Tags(pszTagPrefix & "MES.DATA.MSG_" & j).Write 0 Next -------Insert Delay Time Dim i For i = 1 To 15 ' Number of bytes HMIRuntime.Trace "DecText(" & i & "):= " & DecText(i-1) & vbNewLine HMIRuntime.Tags(pszTagPrefix & "MES.DATA.MSG_" & i).Write DecText(i-1) Next
	Last edited by: Dung922 at: 11/16/2022 04:47:11
Suggestion To thank Quote Answer

11/16/2022 3:39 PM	Rate (0)
Hazard_7 Bronze Member Joined: 5/30/2022 Last visit: 1/19/2026 Posts: 634 Rating: (103)	Hi Dung922, Check this example which is valid for what you are asking for as it is Visual Script: How do you implement a wait function (delay) in a Visual Basic script in WinCC flexible?
	If this information really helps, you could use the Rate function. Best Regards.
Suggestion To thank Quote Answer

11/18/2022 1:01 PM	Rate (0)
Murof Platinum Expert Joined: 8/3/2009 Last visit: 1/19/2026 Posts: 16644 Rating: (1944)	Hello Dung922 I suppose you use WInCC Professinoal RT -> Here you can also use a synchronus writing, with this your script waits until the value is written into the PLC with a feedback. The same you can do with reading here a few information about an an example in the help system: https://support.industry.siemens.com/cs/ww/en/view/109798671/36120923147 This should be a better option than using a wait/sleep function Bye Murof
	Last edited by: Murof at: 11/18/2022 13:03:07 If this Information really helps, you could use the Rate function
Suggestion To thank Quote Answer