{{item.C_Name}}

问题

wincc水流动画

精

奖

官

4277 产品版区：WinCC基本系统

文档类型：问题类别：产品选型问题类别：产品使用问题类别：故障诊断

官方实例是按钮触发，但是我想要做根据外部二进制变量触发。vbs语句不会编了，求大神指导，感激不尽，新年快乐。

问题补充：感觉3L大神，但是我想问一下那你这个修改之后我触发器应该设置成什么，用不用在全局脚本里面做，我现在试了一下不动。

扫码小程序：

一键登录查看全部问答

Fyy? 新生

被采纳率低

问题为何被关闭

分享

手机扫码追踪该问题，
觉得实用，立即去分享！

点击复制链接
举报

去论坛讨论

「找答案」盛夏活动火热开启！邀请工控同行注册，赢取西推币、1847会员畅学卡等盛夏福利。新人提问、分享经验均有好礼，回答奖励最高享10倍暴击。快来与真人工程师搭子一起寻找项目实战中的真实答案！

在官方事例上做了修改，脚本如下，用实际变量替换a即可：
Dim poly,lft,Val
Set poly=HMIRuntime.ActiveScreen.ScreenItems("polyline1")
poly.Index=1
lft=poly.ActualPointLeft

Set val =HMIRuntime.Tags("a")
  Val.Read
If val.Value = 1 Then
   ActualPointLeft_Trigger=lft+2
  If lft>=598 Then
   poly.ActualPointLeft=580
   ActualPointLeft_Trigger=580
  End If
     poly.Visible=True
  poly.ActivateDynamic "ActualPointLeft","CycleTime125ms"
    Else
     poly.Visible=False
    End If

你以为你是谁资深顾问

被采纳率 22.76% 2019-02-12 16:55 本回答有8位钻石用户推荐

提问者对于答案的评价

暂无评价

Fyy?

被采纳率低 2019-02-12 11:17

最佳答案作者回复

在画面对象-其它-打开画面，添加以下ＶＢＳ脚本：
　　Dim poly1
Set poly1=HMIRuntime.ActiveScreen.ScreenItems("polyline1")
''poly1.Visible=True
poly1.ActivateDynamic "ActualPointLeft","CycleTime125ms"

你以为你是谁资深顾问

被采纳率 22.76% 2019-02-12 16:55