WinCC 使用VBS脚本操作变量、控件总结

WinCC的VBS脚本，变量的读写不用定义变量类型。

自读自写

Dim objvar
Set objvar = HMIRuntime.Tags('WinCC_Tag')
objvar.Read
objvar.Value = objvar.Value + 1
objvar.Write

写入变量WinCC_Tag数值100

方法一

HMIRuntime.Tags('WinCC_Tag').Write 100

方法二

Dim objvar
Set objvar = HMIRuntime.Tags('WinCC_Tag')
objvar .Write 100

获取控件

全局函数形式

Dim obj
'有画面窗口
Set obj = HMIRuntime.Screens("画面.画面窗口:趋势画面").ScreenItems("控件")
'无画面窗口
Set obj = HMIRuntime.Screens("画面").ScreenItems("控件")

当前画面形式

Dim obj
Set obj = ScreenItems("控件")

通过“obj.属性”来获取控件相关属性，例如：“obj.Value”、“obj.Text”、“obj.Iterm(i).Value”等等。

调试

MsgBox obj, vbOK, "提示"
MsgBox obj.Value, vbOK, "提示"
MsgBox obj.Text, vbOK, "提示"

Sub OnClick(Byval Item)
Dim obj
Dim CurrentTime
Dim m
Set obj = ScreenItems(".NET 控件5")
'Call obj.AddSource("",12)
'CurrentTime=Hour(Now)&":"&Minute(Now)&":"&Second(Now)
CurrentTime=Minute(Now)&":"&Second(Now)
'm = "当前时间"& CurrentTime
'msgbox m
Call obj.AddSource(CurrentTime,12)
'MsgBox obj.WaveWidth, vbOK, "提示"
'MsgBox obj.AddSource(), vbOK, "提示" 'max(12.5,16)
'MsgBox obj.AddSource("",12), vbOK, "提示" 'max(12.5,16)End Sub

Option Explicit
Function action
Dim obj
Dim CurrentTime
Dim m
Set obj = HMIRuntime.Screens("A Math Model.画面窗口8:数据统计").ScreenItems(".NET 控件t1")
'Call obj.AddSource("",12)
'CurrentTime=Hour(Now)&":"&Minute(Now)&":"&Second(Now)
'CurrentTime=Minute(Now)&":"&Second(Now)
CurrentTime=Hour(Now)&":"&Minute(Now)
'm = "当前时间"& CurrentTime
'Msgbox objCall obj.AddSource(CurrentTime,50)
'Call obj.AddSource("",50)'MsgBox obj.WaveWidth, vbOK, "提示"
'MsgBox obj.AddSource(), vbOK, "提示" 'max(12.5,16)
'MsgBox obj.AddSource("",12), vbOK, "提示" 'max(12.5,16)
End Function

注意

有一些自定义控件WinCC可能识别不出来属性，通过MsgBox 调试可以显示出来。

调用过程（sub）时，有两种写法vb的特点：
1.fun name,0,“hai” '不要加括号；
2.call fun(name,0,“hai”) '加上call关键字。
因为fun函数有返回值而没有变量收它的返回值，所以会报错，解决方法如上，要么不加括号，要么加上call关键字。
参考网址：https://www.cnblogs.com/lonelyshy/p/12706320.html

获取当前日期方法一：
Currentdate1=date() msgbox Currentdate1
获取当前日期方法二：

Currentdate2=year(Now)&“-”&Month(Now)&“-”&day(Now) msgbox Currentdate2
获取当前时间：

CurrentTime=Hour(Now)&“:”&Minute(Now)&“:”&Second(Now)
m = “当前时间”& CurrentTime msgbox m
参考网址：https://www.gxlcms.com/JavaScript-236409.html

WinCC 使用VBS脚本操作变量、控件总结相关推荐

关于VBS调用MSWinsock控件
关于VBS调用MSWinsock控件分类: f2005-04-30 12:14 1115人阅读评论(0) 收藏举报 vbwindowslicensingdatagridc脚本 Windows脚本 ...
WinCC笔记：01.TreeView控件 —— (2)连接数据库创建节点
目录一.最终效果图二.数据库一览三.代码四.代码分析一.最终效果图二.数据库一览这里使用的是SQL Server Tools 18,可以链接到WinCC自动生成的数据库.首先使用WinC ...
wincc里vbs脚本
各位大佬好,初学代码,有很多疑问请教 wincc里变量从别的地方录入后,它的数值是在不断变化的,在变量归档后可以在表格控件里显示, 如果我想对表格里的某列数据进行运算操作,实际就是把某个变量的历史值做 ...
wincc按钮控制的vb脚本_关于wincc professinal v15里使用vb脚本操作控件listview的问题-工业支持中心-西门子中国...
在wincc professinal v15里使用vb脚本操作listview没有效果. 图1为在wincc professinal v15的运行效果图2为在wincc 7.2下的运行效果图3为按 ...
WINCC如何利用报警记录控件实现操作员操作记录功能（上）
本次内容也是我们工程师经常会忽略掉的,要不是有的甲方专门有这样的要求,都很难遇到这类的项目, 提出这种要求的大部分都是涉及到计算机验证和各种审计要求会提出此项内容,如GMP/FDA/BRC等等. 一旦 ...
工控随笔_10_西门子_WinCC的VBS脚本_01_基础入门
很多人都认为VB语言或者VBS脚本语言是一种很low的语言,从心里看不起VB或者VBS, 但是其实VBS不仅可以做为系统管理员的利器,同样在工控领域VBS语言大有用武之地. 西门子的WinCC提供了两 ...
hmi服务器在宽限期下运行,通过HMI/SCADA 系统(如 WinCC)中的 SNMP OPC服务器，使用 ActiveX控件监测SIMATIC NET系列的SNMP兼容设备...
n 问题: 如何通过HMI/SCADA 系统(如 WinCC)中的 SNMP OPC服务器,使用ActiveX控件来监测 SIMATIC NET系列的SNMP兼容设备?n 解答: 通过SIMATIC ...
【android免root脚本制作】基于控件的操作——auto.js进阶
在[android免root脚本制作]自动坐标操作手机--京东金融程序金果摇钱树自动收金果之后,想要做进一步优化,因为基于坐标点击如何屏幕被移动之类就会点击错位,不同手机还需去适配坐标,甚是麻烦,所 ...
在用户控件中撰写JS时控件的客户端ID问题
其实有两种方法,一是在代码中生成JS脚本第二种办法,就是直接在ASPX文件里撰写JS脚本,对于控件ID的问题,可以用<%# this.ID+"_"+控件ID %>的方 ...

WinCC 使用VBS脚本操作变量、控件总结

自读自写

写入变量WinCC_Tag数值100

获取控件

调试

注意

WinCC 使用VBS脚本操作变量、控件总结相关推荐

最新文章

热门文章