Wincc的VBS脚本使用.docxVIP

变量读写： Write和Read方法的语法： 读 ： 1 Dim objTag Set objTag=HMIRunTime.Tags(变量名) objTag.Read 2 HMIRunTime.Tags(变量名).Read 写： 1 Dim objTag Set objTag=HMIRunTime.Tags(变量名) objTag.Write 1 向变量写入数值1 2 HMIRunTime.Tags(变量名).Write 1 中间变量的值写入 ：Dim objTag,val Set objTag=HMIRunTime.Tags(变量名) objTag.Read val=objTag.Value 中间变量val存放了变量的值 VBS 语言使用方法 概述： VBScript的全称是:Microsoft Visual Basic Script Editon.(微软公司可视化BASIC脚本版). 正如其字面所透露的信息, VBS(VBScript的进一步简写)是基于Visual Basic的脚本语言. 我进一步解释一下, Microsoft Visual Basic是微软公司出品的一套可视化编程工具, 语基于Basic. 脚本语言, 就是不编译成二进制文件, 直接由宿主(host)解释源代码并执行, 简单点说就是你写的程序不需要编译成.exe, 而是直接给用户发送.vbs的源程序, 用户就能执行了. 一、入门 : 1) 注释(以REM或开头)行在程序中不起作用, 但能让别人更容易读懂你的程序 . 2) 变量好像一个盒子, 或一个代号, 可以代表你想代表的东西. 变量赋值使用 = 以包裹起来的字符称之为字符串 函数像一个黑箱, 有参数和返回值, 用=左边的变量可以接住返回值 Inputbox函数弹出一个输入对话框,Msgbox则用于输出 例： REM 输入并回显你的名字 使用InputBox和Msgbox函数 Dim name,msg msg=请输入你的名字: name=Inputbox(msg,名称) Msgbox(name) 上例中，Dim用来声明一个变量, 在VBS中, 变量类型并不是那么重要, 就是说VBS中你不用考虑name储存的是一个整数还是一个小数(学名叫浮点数), 也不用考虑是不是字符串(一串字符, 比如:Hello World), VBS会自动帮你搞定. 所以第三行语句可以删除, 效果不会变. 常量： 格式是:const 常量名=常量值. 例如 : const PI=3.1415926 const NAME=记忆碎片 二、进阶 数据类型转换： 1） Dim a,b,c a=inputbox(a是:,输入半径) b=Inputbox(b是:,输入半径) c=a*2+b*2 Msgbox(c) 这个输入1、2时是6 Dim a,b,c a=inputbox(a是:,输入半径) b=Inputbox(b是:,输入半径) c=(a+b)*2 Msgbox(c) 这个输入1、2时是24 为什么会不一样呢? 在数学上c=(a+b)*2 和 c=a*2+b*2是等价的, 在VBS中也是如此. 问题出在+上, 在VBS中, +不仅仅是加号的意思还表示把两个字符串连接起来, 例如Hello+World=HelloWorld have you understood? 你还记得InoutBox函数的返回值吗? 是字符串! 这就看出问题了吧, 在编程中1不等于()1, 1是一个字符, 而1是一个数, 所以a,b都是字符串变量, 1+2=12, 这就好像我们小时跟伙伴开玩笑问他们1+1=?一样, 我们总是笑着说错啦,应该是11.但为什么, a可以*2却不发生错误呢? 这时 VBS比较智能的一个表现, 如果这个字符串的内容是一个数且对他进行数学运算, 则把字符串强制转换成数参与运算如果字符串代表一个数, 但不参加数学运算, 而是参加字符串运算(合并)则当作字符串处理, 所以你看到a+b=12, 这时候a+b的结果是一个字符串, 当它要乘以2的时候就被强制转换成了数字12, 这样我就得到了结果24 怎么修改这个程序呢? 我们需要用到另一个内建的函数:int, int函数的功能是将输入值转成整数值, 我们这样修改: c=(int(a)+int(b))*2 四、循环结构 for....next dim i,j for i=1 to 9 for i=1 to 9 str=str i * j 是和并字符串的符号 next 每个next对应一个for next 1）do..loop和exit d