QTP中常用的VB函数.docx
《QTP中常用的VB函数.docx》由会员分享，可在线阅读，更多相关《QTP中常用的VB函数.docx（16页珍藏版）》请在冰豆网上搜索。
QTP中常用的VB函数
Left函数
返回Variant（String），其中包含字符串中从左边算起指定数量的字符。
语法
Left（string,length）
Left函数的语法有下面的命名参数：
部分
说明
string
必要参数。
字符串表达式其中最左边的那些字符将被返回。
如果string包含Null，将返回Null。
length
必要参数；为Variant（Long）。
数值表达式，指出将返回多少个字符。
如果为0，返回零长度字符串（""）。
如果大于或等于string的字符数，则返回整个字符串。
说明
欲知string的字符数，使用Len函数。
注意 LeftB函数作用于包含在字符串中的字节数据。
所以length指定的是字节数，而不是要返回的字符数。
Mid函数
从字符串中返回指定数目的字符。
Mid（string,start[,length]）
参数
string
字符串表达式，从中返回字符。
如果string包含Null，则返回Null。
Start
string中被提取的字符部分的开始位置。
如果start超过了string中字符的数目，Mid将返回零长度字符串（""）。
Length
要返回的字符数。
如果省略或length超过文本的字符数（包括start处的字符），将返回字符串中从start到字符串结束的所有字符。
说明
要判断string中字符的数目，可使用Len函数。
下面的示例利用Mid函数返回字符串中从第四个字符开始的六个字符：
DimMyVar
MyVar=Mid（"VB脚本isfun!
",4,6）'MyVar包含"Script"。
注意 MidB函数与包含在字符串中的字节数据一起使用。
其参数不是指定字符数，而是字节数。
Len函数
返回字符串内字符的数目，或是存储一变量所需的字节数。
Len（string|varname）
参数
string
任意有效的字符串表达式。
如果string参数包含Null，则返回Null。
Varname
任意有效的变量名。
如果varname参数包含Null，则返回Null。
说明
下面的示例利用Len函数返回字符串中的字符数目：
DimMyString
MyString=Len（"VBSCRIPT"）'MyString包含8。
注意 LenB函数与包含在字符串中的字节数据一起使用。
LenB不是返回字符串中的字符数，而是返回用于代表字符串的字节数。
Right函数
从字符串右边返回指定数目的字符。
Right（string,length）
参数
string
字符串表达式，其最右边的字符被返回。
如果string参数中包含Null，则返回Null。
Length
数值表达式，指明要返回的字符数目。
如果为0，返回零长度字符串；如果此数大于或等于string参数中的所有字符数目，则返回整个字符串。
说明
要确定string参数中的字符数目，使用Len函数。
下面的示例利用Right函数从字符串右边返回指定数目的字符：
DimAnyString,MyStr
AnyString="HelloWorld"'定义字符串。
MyStr=Right（AnyString,1）'返回"d"。
MyStr=Right（AnyString,6）'返回"World"。
MyStr=Right（AnyString,20）'返回"HelloWorld"。
注意 RightB函数用于字符串中的字节数据，length参数指定返回的是字节数目，而不是字符数目。
InStr函数
返回某字符串在另一字符串中第一次出现的位置。
InStr（[start,]string1,string2[,compare]）
参数
start
可选项。
数值表达式，用于设置每次搜索的开始位置。
如果省略，将从第一个字符的位置开始搜索。
如果start包含Null，则会出现错误。
如果已指定compare，则必须要有start参数。
string1
必选项。
接受搜索的字符串表达式。
string2
必选项。
要搜索的字符串表达式。
compare
可选项。
指示在计算子字符串时使用的比较类型的数值。
有关数值，请参阅“设置”部分。
如果省略，将执行二进制比较。
设置
compare参数可以有以下值：
常数
值
描述
vbBinaryCompare
0
执行二进制比较。
vbTextCompare
1
执行文本比较。
返回值
InStr函数返回以下值：
如果
InStr返回
string1为零长度
0
string1为Null
Null
string2为零长度
start
string2为Null
Null
string2没有找到
0
在string1中找到string2
找到匹配字符串的位置
start>Len（string2）
0
说明
下面的示例利用InStr搜索字符串：
DimSearchString,SearchChar,MyPos
SearchString="XXpXXpXXPXXP"'要搜索的字符串。
SearchChar="P"'Searchfor"P".
MyPos=Instr（4,SearchString,SearchChar,1）'在位置4进行的文本比较。
返回6。
MyPos=Instr（1,SearchString,SearchChar,0）'在位置1进行的二进制比较。
返回9。
MyPos=Instr（SearchString,SearchChar）'默认情况下，进行的是二进制比较（省略了最后的参数）。
返回9。
MyPos=Instr（1,SearchString,"W"）'在位置1进行的二进制比较。
返回0（找不到"W"）。
注意 InStrB函数使用包含在字符串中的字节数据，所以InStrB返回的不是一个字符串在另一个字符串中第一次出现的字符位置，而是字节位置。
LTrim、RTrim与Trim函数
返回不带前导空格（LTrim）、后续空格（RTrim）或前导与后续空格（Trim）的字符串副本。
LTrim（string）
RTrim（string）
Trim（string）
string参数是任意有效的字符串表达式。
如果string参数中包含Null，则返回Null。
说明
下面的示例利用LTrim,RTrim,和Trim函数分别用来除去字符串开始的空格、尾部空格、开始和尾部空格：
DimMyVar
MyVar=LTrim（"vbscript"）'MyVar包含"vbscript"。
MyVar=RTrim（"vbscript"）'MyVar包含"vbscript"。
MyVar=Trim（"vbscript"）'MyVar包含"vbscript"。
Rnd函数
返回一个随机数。
Rnd[（number）]
number参数可以是任意有效的数值表达式。
说明
Rnd函数返回一个小于1但大于或等于0的值。
number的值决定了Rnd生成随机数的方式：
如果number为
Rnd生成
小于零
每次都相同的值，使用number作为种子。
大于零
序列中的下一个随机数。
等于零
最近生成的数。
省略
序列中的下一个随机数。
因每一次连续调用Rnd函数时都用序列中的前一个数作为下一个数的种子，所以对于任何最初给定的种子都会生成相同的数列。
在调用Rnd之前，先使用无参数的Randomize语句初始化随机数生成器，该生成器具有基于系统计时器的种子。
要产生指定范围的随机整数，请使用以下公式：
Int（（upperbound-lowerbound+1）*Rnd+lowerbound）
这里，upperbound是此范围的上界，而lowerbound是此范围内的下界。
注意 要重复随机数的序列，请在使用数值参数调用Randomize之前，立即用负值参数调用Rnd。
使用同样number值的Randomize不能重复先前的随机数序列。
Randomize语句
初始化随机数生成器。
语法
Randomize[number]
可选的number参数是Variant或任何有效的数值表达式。
说明
Randomize用number将Rnd函数的随机数生成器初始化，该随机数生成器给number一个新的种子值。
如果省略number，则用系统计时器返回的值作为新的种子值。
如果没有使用Randomize，则（无参数的）Rnd函数使用第一次调用Rnd函数的种子值。
注意若想得到重复的随机数序列，在使用具有数值参数的Randomize之前直接调用具有负参数值的Rnd。
使用具有同样number值的Randomize是不会得到重复的随机数序列的。
Rnd函数示例
本示例使用Rnd函数随机生成一个1到6的随机整数。
本示例用Randomize语句初始化随机数生成器。
由于忽略了数值参数，所以Randomize用Timer函数的返回值作为新的随机数种子值。
DimMyValue
Randomize'对随机数生成器做初始化的动作。
MyValue=Int（（6*Rnd）+1）'生成1到6之间的随机数值。
Split函数
描述
返回一个下标从零开始的一维数组，它包含指定数目的子字符串。
语法
Split（expression[,delimiter[,count[,compare]]]）
Split函数语法有如下几部分：
部分
描述
expression
必需的。
包含子字符串和分隔符的字符串表达式。
如果expression是一个长度为零的字符串（""），Split则返回一个空数组，即没有元素和数据的数组。
delimiter
可选的。
用于标识子字符串边界的字符串字符。
如果忽略，则使用空格字符（""）作为分隔符。
如果delimiter是一个长度为零的字符串，则返回的数组仅包含一个元素，即完整的expression字符串。
count
可选的。
要返回的子字符串数，–1表示返回所有的子字符串。
compare
可选的。
数字值，表示判别子字符串时使用的比较方式。
关于其值，请参阅“设置值”部分。
设置值
compare参数的设置值如下：
常数
值
描述
vbUseCompareOption
–1
用OptionCompare语句中的设置值执行比较。
vbBinaryCompare
0
执行二进制比较。
vbTextCompare
1
执行文字比较。
vbDatabaseCompare
2
仅用于MicrosoftAccess。
基于您的数据库的信息执行比较。
Replace函数
返回字符串，其中指定数目的某子字符串被替换为另一个子字符串。
Replace（expression,find
升级会员 