作者 | 主题 |
---|---|
手机用户20200604914420 游民 经验值: 96 发帖数: 1 精华帖: 0 |
楼主 2020-12-08 15:29:10
主题:博图WINCC 水流动画和电机风叶旋转 电机风叶旋转 Dim A,B Set A=HMIRuntime.Screens("画面_1").ScreenItems("扇形_3") Set B=HMIRuntime.Tags("Tag_1") If B.Read Then A.EndAngle=A.EndAngle+20 A.StartAngle=A.StartAngle+20 Else A.EndAngle=0 A.StartAngle=315 End If 水流动画 Dim A,B Set A=HMIRuntime.Screens("画面_1").ScreenItems("AAA1") Set B=HMIRuntime.Tags("Tag_1") A.ActualPointIndex=1 If B.Read Then A.ActualPointLeft=A.ActualPointLeft+5 If A.ActualPointLeft>=380 Then A.ActualPointLeft=369 End If End If
西门子永远学不完的知识,加油
|
2022年应届生 侠客 经验值: 777 发帖数: 105 精华帖: 0 |
5楼 2020-12-10 14:45:11
主题:回复:博图WINCC 水流动画和电机风叶旋转 |