脚本心得.docx

Vbs 画面脚本总结
一: 不使用变量单纯的操作界面
(总窗体) 下的画面窗口2(画面窗口)
Sub OnClick(ByVal Item)
Dim objCircle
Dim screenname
Dim pwname
Set objCircle= ScreenItems("圆1" )
= 60
Set screenname=("Home1") //获取要操作的窗体
Set pwname=("画面窗口2") //获取要操作的控件,这里填入你要操作的控件名
MsgBox() //输出圆的半径
MsgBox () //输出当前画面窗口2的名字
End Sub
注意当调用某窗体下的某控件的某个属性时,需要声明两个对象,一个接纳这个控件,一个接纳值例如
Dim object
Dim value
Set object =("Home1").ScreenItems("画面窗口2")
Set value=

Sub OnClick(Byval Item)
Dim opObject
Set opObject= ("Home1").ScreenItems("画面窗口2")
=""
End Sub

Set titleTxt= ("Home1").ScreenItems("静态文本2")
=+"EF" //获取文本的值并追加字符
字符串函数
VB的字符串截取函数有Left(字符串,n),返回字符串前N个字符;Mid(字符串,p,n),从第p个字符开始,向后截取N个字符;right(字符串,n),返回字符串的最后n个字符。
获取下标
VB中的InStr()函数与InStrRev()函数:
都是在主字符串当中搜寻寻找子字符串,返回找到的子字符串在主字符串中出现的位置;
不同在于;
InStr()函数,从左开始向右寻找,InStrRev()函数,从右开始向左寻找。
截取 right 和left 获取长度 Len
二:操作变量
1. Dim objTag
Dim AText
Set objTag = ("a") //获取变量
//执行读取
Set AText=ScreenItems("静态文本2") //获取控件
= //给控件写入值
=100 //给目标变量写入值
//执行写入
2. vb 中 Switch 语句的变体
Dim objTag
Dim AText
Set objTag = HMIRunti