1.为什么vbs脚本编译总是出现错误，怎么能知道是哪行有错误
2.都是官网上的例子程序，仔细检查也没发现输入错误问题，应该是使用问题吧
3.求大神指导
问题补充：
就是下面一段代码
Function ActualPointLeft_Trigger(ByVal Item)
Dim poly,lft,speed
Set poly=HMIRuntime.ActiveScreen.ActiveScreenItems("polyline01"）
poly. Index=1
lft=poly.ActualPointLeft
speed=HMIRuntime.SmartTags("WaterFlowSpeed")
If HMIRuntime.SmartTags("WaterFlowDirection")=False Then
If speed=2 Then
ActualPointLeft_Trigger=lft+3
Elseif speed=1 Then
ActualPointLeft_Trigger=lft+2
Else
ActualPointLeft_Trigger=lft+1
End If
If lft>=58 Then
poly.ActualPointLeft=40
ActualPointLeft_Trigger=40
End If
Else
If speed=2 Then
ActualPointLeft_Trigger=lft-3
Elseif speed=1 Then
ActualPointLeft_Trigger=Lft-2
Else
ActualPointLeft_Trigger=lft-1
End If
If lft<=40 Then
poly.ActualPointLeft=58
ActualPointLeft_Trigger=58
End If
End If
End Function
钻石用户推荐最佳答案
1、使用脚本诊断功能，在脚本前面不要有on error resume next这一行，然后出错的话，再诊断窗口里面有提示哪一行出现问题的
参考：WINCC脚本学习-一-脚本调试
http://www.ad.siemens.com.cn/club/bbs/post_recommend.aspx?b_id=5&a_id=1449765
2、仔细检查是不是有中文符号 多的空格之类的
补充：
右键–检查 在下面的输出窗口有提示那一行有错误的
看附图
图片说明：
提问者对于答案的评价：
原创文章，作者：more0621，如若转载，请注明出处：https://www.zhaoplc.com/plc316486.html
微信扫一扫 
支付宝扫一扫