QTP学习笔记----2013.05.06

常用函数
1、Date函数
作用：返回当前系统日期
示例：
Dim MyDate
MyDate=Date
MsgBox MyDate
结果图：
2、Now函数
作用：返回当前系统时间
示例：
Dim MyNow
MyNow=Now
MsgBox MyNow
结果图：
备注：如果写Log文件，推荐本函数，因为具体的时间不仅仅精确到日期，而且还精确到时间，
3、DateDiff函数
作用：返回两个日期之间的间隔
语法：DateDiff(interval,date1,date2)
interval是一个时间单位，单位的取值如下表
Setting Description
yyyy Year
q Quarter
m Month
yyyy Day of year
d Day
w Weekday
ww Week of year
h Hour
n Minute
s Second
示例：
Dim tDateDiff,date1,date2
Date1=Now
Date2=Date
tDateDiff=DateDiff(tDateDiff,Date1,Date2)
MsgBox tDateDiff
结果图：
4、Left函数
作用：返回字符串最左边的指定数量的字符
语法：Left(string,length)
string：字符串表达式，其最左边的字符被返回。如果string参数中包含Null，则返回Null
length：数值表达式，指明要返回的字符数目
示例：
Dim myString,leftString
myString="VBScript"
LeftString=left (myString,3)
MsgBox leftString
结果图：
5、Right函数
作用：返回字符串最右边的指定数量的字符
语法：Right(string,length)
string：字符串表达式，其最左边的字符被返回。如果string参数中包含Null，则返回Null
length：数值表达式，指明要返回的字符数目
示例：
Dim myString,rightString
myString="VBScript"
rightString=right(myString,3)
MsgBox rightString
结果图：
6、Len函数
作用：返回字符串内字符的数目
语法：Len(string)
示例：
Dim myString
myString=Len("VBScript")
MsgBox myString
结果图：
7、Mid函数
作用：从字符串中返回指定数目的字符
语法：Mid(string,start,length)
start：string中被提取的字符部分的开始位置
length：要返回字符数的长度
示例：
Dim myVar
myVar=Mid("Hello World!",7,6)
MsgBox myVar
结果图：
8、LTrim、RTrim、Trim函数
作用：分别返回不带前面的空格、后面的空格、所有的空格
示例：
Dim myVar
myVar=LTrim(" VBScript ") ---1
myVar=RTrim(" VBScript ") ----2
myVar=Trim(" VBScript ") ----3
MsgBox myVar
结果分析：
示例中1的部分会显示为"VBScript "，示例中2的部分会显示为" VBScript"，示例中3的部分会显示为"VBScript"
9、Replace函数
作用：返回字符串，其中指定数目的某字符串被替换为另一个子字符串
语法：Replace(expression,find,replacewith[,compare[,count[,start]]])
expression:必选项，字符串表达式；find：必选项，被搜索的子字符串；replacewith：必选项，用于替换的子字符串
start：可选项，expression中开始搜索子字符串的位置，如果省略默认为1。在和count关联时必须用
count：可选项，执行子字符串替换的数目，如果省略，默认值为-1，表示进行所有可能的替换，在和start关联时必须用
compare：可选项，计算子字符串时使用比较类型的数值。如果省略，缺省值为0，代表执行二进制比较，如果数值是1，代表文本比较。
示例：
Dim myString
myString=Replace("XXpXXPXXp","p","Y")
MsgBox myString
结果图：