QTP第五天学习

'如果有打开的ie浏览器，直接进行关闭
SystemUtil.CloseProcessByName "iexplore.exe"
'Wait (30)
'重新打开百度页面
SystemUtil.Run "iexplore.exe", "http://www.baidu.com"
'Action的调用学习
RunAction "Action1 [虚拟对象的描述]", oneIteration
'***************************************************************************************
'字符串拼接
'*************************************************************************************
Dim str
str="test"
str=str & "andy"
print str


'*************************************************************************************
'for 循环和select语句的学习
'************************************************************************************
Dim i
For i=0 to 3
Dim j
j=RandomNumber(0,3)
print "j="&j
Select Case j
Case "0"
print "我是：0"
Case "1"
print "我是：1"
Case "2"
print "我是：2"
Case else
print "我是：3"
End Select
Next


'*************************************************************************************
'for 循环和if语句的学习
'************************************************************************************
Dim k
For k=0 to 3
Dim num
num=RandomNumber(0,3)
print "num="&num
If num="0" Then
print "我应该是：0"
elseif num="1" then
print"我应该是：1"
elseif num="2"then
print"我应该是：2"
else
print"我应该是：3"
End If
Next