WINCC V7.5入门实例教程,使用常数数组用FunctionTrendControl控件绘制趋势曲线

已锁定

塑料袋

  • 帖子

    1
  • 精华

    0
  • 被关注

    0

论坛等级:新手

注册时间:2022-04-26

普通 普通 如何晋级?

WINCC V7.5入门实例教程,使用常数数组用FunctionTrendControl控件绘制趋势曲线

2221

7

2022-04-26 13:06:08

近期在学习WINCC的应用,师傅在网上找了个实例让我自己试着弄一下看能不能达到效果,原文在下面,经过尝试我发现有很多脚本在7.5版本中已经更改,所以针对趋势曲线的练习,将更新后的脚本及整个效果分享出来,供大家参考。


首先从右侧标准栏拖出一个按钮控件,在下方属性里更改按钮的对象名称为按钮1


再从控件中找到放置一个WINCC FunctionTrendControl模块,更改对象名称为控件1


点击按钮-事件-鼠标,右键点击鼠标单击右侧的小闪电符号,选择VBS动作,写入以下脚本


Dim X_values,Y_values

Dim Key,FctTrdCtrl,objTrend,i


' "按钮1" is the name of the clicked button

' Disable operator control and force grafic output

refresh


X_values = Array(0,1,2,3,4,5,6,7,8,9,10)

Y_values = Array(0,0,40,40,40,80,80,80,80,40,0)


Set Key = ScreenItems("按钮1")

Key.Operation = vbFalse

Set FctTrdCtrl = ScreenItems("控件1")


' Set index for trend 1 and delete data

FctTrdCtrl.Trendindex = 0

FctTrdCtrl.TrendRemove = vbTrue


' X-axis property setting

FctTrdCtrl.XAxisAutorange = vbFalse

FctTrdCtrl.XAxisBeginValue = 0

FctTrdCtrl.XAxisEndValue = 12


' Y-axis property setting

FctTrdCtrl.YAxisAutorange = vbFalse

FctTrdCtrl.YAxisbeginValue = 0

FctTrdCtrl.YAxisendValue = 100


FctTrdCtrl.TrendProvider = 0

FctTrdCtrl.TrendAdd = vbTrue


Set objTrend = FctTrdCtrl.GetTrend("趋势1")

objTrend.Removedata


For i = 0 To 10

objTrend.Insertdata X_values(i),Y_values(i)

Next

Key.Operation = vbTrue

Set fctTrdCtrl=Nothing

Set objTrend=Nothing


最后添加个按钮,点击新添加的按钮,点击动态向导,点击系统函数,选择退出WINCC,安装下一步即可


如有侵权联系删除,谢谢


WINCC V7.5入门实例教程,使用常数数组用FunctionTrendControl控件绘制趋势曲线 已锁定
编辑推荐: 关闭

请填写推广理由:

本版热门话题

SIMATIC WinCC / Panel

共有30993条技术帖

相关推荐

热门标签

相关帖子推荐

guzhang

恭喜,你发布的帖子

评为精华帖!

快扫描右侧二维码晒一晒吧!

再发帖或跟帖交流2条,就能晋升VIP啦!开启更多专属权限!

top
您收到0封站内信:
×
×
信息提示
很抱歉!您所访问的页面不存在,或网址发生了变化,请稍后再试。