QTP VBScript 基础(一)

在 ExpertView 视图中直接进行 VBScript 的相关学习

1. 弹出提示框 (类似Js 中的 alert)

MsgBox("小毛子")

2. 声明变量:Dim   Public  Private

这里 Option Explicit 表示强制声明所有变量

Option Explicit
Dim MyName
Public YouName
Private HisName

MyName = "小毛子"
YouName = "大毛子"
HisName = "老毛子"

3. 变量赋值：

A:等号赋值   B:变量为对象引用级别使用Set语句

Dim I, Y, H
I = 0
Set Y = createobject("xxxxxx")
Set H = New XXXXX

4. 标量与数组

Dim Person(5), Table(2,3)

Person(0) = "小一"
Person(1) = "小二"
Person(3) = "小三"

MsgBox(Person(3))

Table(0,0) = "00"
Table(0,1) = "01"
Table(1,2) = "12"

MsgBox(Table(1,2))

5. 动态数组  ReDim

Dim countA, Person()
countA = 5

ReDim Person(countA)
ReDim Preserve Person(10)

6. 常数 Const

Const  MyName = "小毛子"
Private Const YouName = "小莉莉"

7. 算数运算符：

8. 逻辑运算符

9. 比较运算符