WinCC趋势跨度设置(时间范围)

控件:输入输出域、组合框、按钮、实时趋势控件

输入输出域

对象名称:IOI

域类型:输入

组合框

对象名称:cb

索引与文本一一对应





按钮VB

Sub OnClick(Byval Item)                                                                       

Dim ctrltxt
Dim ctrltrend,ctrlcb

Dim TimeRangFactor,TimeRangBase

Dim mylistindex

Set ctrltxt=ScreenItems("IOI")

Set ctrltrend=ScreenItems("ctrltrend")

Set ctrlcb=ScreenItems("cb")

If ctrlcb.SelText ="500毫秒" Then

ctrltrend.TimeAxisTimeRangeBase=0.5*1000

End If

If ctrlcb.SelText ="1秒" Then

ctrltrend.TimeAxisTimeRangeBase=1*1000

End If

If ctrlcb.SelText ="1分钟" Then

ctrltrend.TimeAxisTimeRangeBase=60*1*1000

End If

If ctrlcb.SelText ="1小时" Then

ctrltrend.TimeAxisTimeRangeBase=60*60*1000

End If

If ctrlcb.SelText ="1天" Then

ctrltrend.TimeAxisTimeRangeBase=24*60*60*1000

End If

'ctrltrend.TimeAxisTimeRangeFactor = 5
ctrltrend.TimeAxisTimeRangeFactor = ctrltxt.InputValue

'Msgbox ctrltxt.InputValue
End Sub

项目地址:https://download.csdn.net/download/weixin_37928884/88463004

相关推荐
巨控王工2_153074839693 个月前
如何使用EXCEL访问WinCC中的实时数据实现报表
wincc
B_lack0265 个月前
C脚本实现用键盘按键控制Wincc某按钮动作
计算机外设·wincc·c脚本
gongkongxiaozhou9 个月前
西门子S7-1500作为智能设备共享功能
网络·智能路由器·wincc·博途wincc·西门子wincc·wincc发短信
gongkongxiaozhou10 个月前
WINCC读写EXCEL-VBS
wincc·博途wincc·西门子wincc·博途·西门子1200plc