贵州硕升智能科技有限公司
Guizhou Kedi Automation Technology Engineering
首页
关于我们
产品中心
新闻中心
职位招聘
售后服务
联系我们
公司名称
当前位置:首页 > 新闻中心 > 新闻详情
动态控制WinCC趋势控件
选择参数组名称(
变量组
),添加多条曲线
设定各曲线的颜色
设定曲线显示的时间范围
WinCC查询画面
添加画面对象
本例中需要选择查询的参数以及查询的时间段,然后通过一个按钮来执行数据查询脚本,并把历史数据加载到在线表格控件上。
因此,需要在画面中添加以下对象:
- 选项组控件:用来选择所查询的参数,其对应的所有归档变量将会被加载到在线趋势控件中
-
时间选择控件:用来设定曲线的开始和结束时间
-
在线趋势控件:显示参数曲线
-
按钮:执行查询事件
具体的VBS脚本如下:
Dim OP1,myTrend
Dim TrendName(9),TrendCount
Set myTrend =ScreenItems("myTrend") '在线趋势控件名称
Dim i
For i=1 To myTrend.TrendCount
myTrend.TrendIndex=i
myTrend.TrendRemove=myTrend.TrendName'添加曲线前先删除所有曲线
Next
Set OP1=ScreenItems("OP1")'曲线选择选项组控件名称
Select Case OP1.Process'根据选择项设定曲线条数及各个归档变量名称
Case 1'选择第1项
TrendName(0)="flow\flow1"
......
TrendName(7)="flow\flow8"
TrendCount=8
Case 2'选择第2项
TrendName(0)="level\level1"
TrendName(1)="level\level2"
TrendName(2)="level\level3"
TrendCount=3
Case 4'选择第3项
TrendName(0)="press\press1"
......
TrendName(5)="press\press6"
TrendCount=6
Case 8'选择第4项
TrendName(0)="quality\quality1"
......
TrendName(6)="quality\quality7"
TrendCount=7
Case 16'选择第5项
TrendName(0)="temp\temp1"
......
TrendName(5)="temp\temp6"
TrendCount=6
End Select
For i=1 To TrendCount'添加趋势并设定曲线的属性
myTrend.TrendAdd= TrendName(i-1)
myTrend.TrendTagName= TrendName(i-1)'曲线名称
myTrend.TrendTrendWindow= "Trend window 1"'曲线窗口名称
myTrend.TrendTimeAxis= "Time axis 1"'时间轴
myTrend.TrendValueAxis= "Value axis 1"'数值轴
Select Casei '设定各曲线颜色
Case1
myTrend.TrendColor= RGb(0,0,0)'黑色
Case2
myTrend.TrendColor= RGb(255,0,0)'红色
Case3
myTrend.TrendColor= RGb(0,255,0)'绿色
Case4
myTrend.TrendColor= RGb(0,0,255)'蓝色
Case5
myTrend.TrendColor= RGb(255,255,0)'黄色
Case6
myTrend.TrendColor= RGb(0,255,255)'青色
Case7
myTrend.TrendColor= RGb(120,36,36)'棕色
Case8
myTrend.TrendColor= RGb(255,0,255)'深红
End Select
Next
'设置曲线开始时间和结束时间
Dim BeginTime,endTime
Set BeginTime=ScreenItems("BeginTime")
Set endTime=ScreenItems("endTime")
myTrend.TimeAxisIndex =0 '时间轴索引
myTrend.Online =0
myTrend.TimeAxisRangeType =1 '时间轴类型-时间范围
myTrend.TimeAxisBeginTime = BeginTime.value '起始时间
myTrend.TimeAxisEndTime =endtime.value '结束时间
2021年12月14日 10:00
公司名称
地址:贵州省贵阳市南明区花果园M区第1栋1单元16层20号
E-mail:kdnetceo@163.com
联系电话:18685666676 杨先生
合作电话:18685672476 张先生
传真:0851-84109823
售后电话:18685672476 张先生
备案号 黔ICP备2021010992号-1