QTP中常用的VB函数Word格式.docx
《QTP中常用的VB函数Word格式.docx》由会员分享，可在线阅读，更多相关《QTP中常用的VB函数Word格式.docx（18页珍藏版）》请在冰点文库上搜索。
Script"
。
注意
MidB函数与包含在字符串中的字节数据一起使用。
其参数不是指定字符数，而是字节数。
Len函数
返回字符串内字符的数目，或是存储一变量所需的字节数。
Len（string|varname）
任意有效的字符串表达式。
如果string参数包含Null，则返回Null。
Varname
任意有效的变量名。
如果varname参数包含Null，则返回Null。
下面的示例利用Len函数返回字符串中的字符数目：
DimMyString
MyString=Len（"
VBSCRIPT"
）'
MyString包含8。
LenB函数与包含在字符串中的字节数据一起使用。
LenB不是返回字符串中的字符数，而是返回用于代表字符串的字节数。
Right函数
从字符串右边返回指定数目的字符。
Right（string,length）
字符串表达式，其最右边的字符被返回。
如果string参数中包含Null，则返回Null。
数值表达式，指明要返回的字符数目。
如果为0，返回零长度字符串；
如果此数大于或等于string参数中的所有字符数目，则返回整个字符串。
要确定string参数中的字符数目，使用Len函数。
下面的示例利用Right函数从字符串右边返回指定数目的字符：
DimAnyString,MyStr
AnyString="
HelloWorld"
'
定义字符串。
MyStr=Right（AnyString,1）'
返回"
d"
MyStr=Right（AnyString,6）'
World"
MyStr=Right（AnyString,20）'
RightB函数用于字符串中的字节数据，length参数指定返回的是字节数目，而不是字符数目。
InStr函数
返回某字符串在另一字符串中第一次出现的位置。
InStr（[start,]string1,string2[,compare]）
start
可选项。
数值表达式，用于设置每次搜索的开始位置。
如果省略，将从第一个字符的位置开始搜索。
如果start包含Null，则会出现错误。
如果已指定compare，则必须要有start参数。
string1
必选项。
接受搜索的字符串表达式。
string2
要搜索的字符串表达式。
compare
指示在计算子字符串时使用的比较类型的数值。
有关数值，请参阅“设置”部分。
如果省略，将执行二进制比较。
设置
compare参数可以有以下值：
常数
值
描述
vbBinaryCompare
执行二进制比较。
vbTextCompare
1
执行文本比较。
返回值
InStr函数返回以下值：
如果
InStr返回
string1为零长度
string1为Null
Null
string2为零长度
start
string2为Null
string2没有找到
在string1中找到string2
找到匹配字符串的位置
start>
Len（string2）
下面的示例利用InStr搜索字符串：
DimSearchString,SearchChar,MyPos
SearchString="
XXpXXpXXPXXP"
要搜索的字符串。
SearchChar="
P"
Searchfor"
.
MyPos=Instr（4,SearchString,SearchChar,1）'
在位置4进行的文本比较。
返回6。
MyPos=Instr（1,SearchString,SearchChar,0）'
在位置1进行的二进制比较。
返回9。
MyPos=Instr（SearchString,SearchChar）'
默认情况下，进行的是二进制比较（省略了最后的参数）。
MyPos=Instr（1,SearchString,"
W"
返回0（找不到"
InStrB函数使用包含在字符串中的字节数据，所以InStrB返回的不是一个字符串在另一个字符串中第一次出现的字符位置，而是字节位置。
LTrim、RTrim与Trim函数
返回不带前导空格（LTrim）、后续空格（RTrim）或前导与后续空格（Trim）的字符串副本。
LTrim（string）
RTrim（string）
Trim（string）
string参数是任意有效的字符串表达式。
下面的示例利用LTrim,RTrim,和Trim函数分别用来除去字符串开始的空格、尾部空格、开始和尾部空格：
MyVar=LTrim（"
vbscript"
vbscript"
MyVar=RTrim（"
vbscript"
MyVar=Trim（"
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语句中的设置值执行比较。
执行文字比较。
vbDatabaseCompare
2
仅用于MicrosoftAccess。
基于您的数据库的信息执行比较。
Replace函数
返回字符串，其中指定数目的某子字符串被替换为另一个子字符串。
Replace（expression,find,replacewith[,compare[,count[,start]]]）
expression
字符串表达式包含要替代的子字符串。
Find
被搜索的子字符串。
Replacewith
用于替换的子字符串。
expression中开始搜索子字符串的位置。
如果省略，默认值为1。
在和count关联时必须用
count
执行子字符串替换的数目。
如果省略，默认值为-1，表示进行所有可能的替换。
在和start关联时必须用。
Compare
如果省略,缺省值为0,这意味着必须进行二进制比较。
Replace返回以下值：
Replace返回
expression为零长度
零长度字符串（"
expression为Null
错误。
find为零长度
expression的副本。
replacewith为零长度
expression的副本，其中删除了所有由find参数指定的内容。
Len（expression）
零长度字符串。
count为0
Replace函数的返回值是经过替换（从由start指定的位置开始到expression字符串的结尾）后的字符串，而不是原始字符串从开始至结尾的副本。
下面的示例利用Replace函数返回字符串：
MyString=Replace（"
XXpXXPXXp"
"
p"
Y"
二进制比较从字符串左端开始。
返回"
XXYXXPXXY"
3,-1,1）'
文本比较从第三个字符开始。
YXXYXXY"
StrComp函数
返回一个表明字符串比较结果的值。
StrComp（string1,string2[,compare]）
指示在计算字符串时使用的比较类型的数值。
如果省略，则执行二进制比较。
StrComp函数有以下返回值：
StrComp返回
string1小于string2
-1
string1等于string2
string1大于string2
string1或string2为Null
下面的示例利用StrComp函数返回字符串比较的结果。
如果第三个参数为1执行文本比较；
如果第三个参数为0或者省略执行二进制比较。
DimMyStr1,MyStr2,MyComp
MyStr1="
ABCD"
:
MyStr2="
abcd"
定义变量。
MyComp=StrComp（MyStr1,MyStr2,1）'
返回0。
MyComp=StrComp（MyStr1,MyStr2,0）'
返回-1。
MyComp=StrComp（MyStr2,MyStr1）'
返回1。
CInt函数
返回表达式，此表达式已被转换为Integer子类型的Variant。
CInt（expression）
expression参数是任意有效的表达式。
通常，可以使用子类型转换函数书写代码，以显示某些操作的结果应被表示为特定的数据类型，而不是默认类型。
例如，在出现货币、单精度或双精度运算的情况下，使用CInt或CLng强制执行整数运算。
CInt函数用于进行从其他数据类型到Integer子类型的国际公认的格式转换。
例如对十进制分隔符（如千分符）的识别，可能取决于系统的区域设置。
如果expression在Integer子类型可接受的范围之外，则发生错误。
下面的示例利用CInt函数把值转换为Integer:
DimMyDouble,MyInt
MyDouble=2345.5678'
MyDouble是Double。
MyInt=CInt（MyDouble）'
MyInt包含2346。
CInt不同于Fix和Int函数删除数值的小数部分，而是采用四舍五入的方式。
当小数部分正好等于0.5时,CInt总是将其四舍五入成最接近该数的偶数。
例如，0.5四舍五入为0,以及1.5四舍五入为2.
CStr函数
返回表达式，该表达式已被转换为String子类型的Variant。
CStr（expression）
例如，使用CStr强制将结果表示为String。
CStr函数用于替代Str函数来进行从其他数据类型到String子类型的国际公认的格式转换。
例如对十进制分隔符的识别取决于系统的区域设置。
expression根据下表决定返回的数据：
如果expression为
CStr返回
Boolean
字符串，包含True或False。
Date
字符串，包含系统的短日期格式日期。
运行时错误。
Empty
Error
字符串，包含跟随有错误号码的单词Error。
其他数值
字符串，包含此数字。
下面的示例利用CStr函数把数字转换为String:
DimMyDouble,MyString
MyDouble=437.324'
MyDouble是双精度值。
MyString=CStr（MyDouble）'
MyString包含"
437.324"
LCase函数
返回字符串的小写形式。
LCase（string）
仅大写字母转换成小写字母；
所有小写字母和非字母字符保持不变。
下面的示例利用LCase函数把大写字母转换为小写字母：
DimLCaseString
MyString="
VBSCript"
LCaseString=LCase（MyString）'
LCaseString包含"
UCase函数
返回字符串的大写形式。
UCase（string）
只有小写字母被转换成大写字母；
所有大写字母和非字母字符均保持不变。
下面的示例利用UCase函数返回字符串的大写形式：
DimMyWord
MyWord=UCase（"
返回"
HELLOWORLD"
MsgBox函数
在对话框中显示消息，等待用户单击按钮，并返回一个值指示用户单击的按钮。
MsgBox（prompt[,buttons][,title][,helpfile,context]）
prompt
作为消息显示在对话框中的字符串表达式。
prompt的最大长度大约是1024个字符，这取决于所使用的字符的宽度。
如果prompt中包含多个行，则可在各行之间用回车符（Chr（13））、换行符（Chr（10））或回车换行符的组合（Chr（13）&
Chr（10））分隔各行。
Buttons
数值表达式，是表示指定显示按钮的数目和类型、使用的图标样式，默认按钮的标识以及消息框样式的数值的总和。
如果省略，则buttons的默认值为0。
Title
显示在对话框标题栏中的字符串表达式。
如果省略title，则将应用程序的名称显示在标题栏中。
Helpfile
字符串表达式，用于标识为对话框提供上下文相关帮助的帮助文件。
如果已提供helpfile，则必须提供context。
在16位系统平台上不可用。
Context
数值表达式，用于标识由帮助文件的作者指定给某个帮助主题的上下文编号。
如果已提供context，则必须提供helpfile。
buttons参数可以有以下值：
vbOKOnly
只显示确定按钮。
vbOKCancel
显示确定和取消按钮。
vbAbortRetryIgnore
显示放弃、重试和忽略按钮。
vbYesNoCancel
3
显示是、否和取消按钮。
vbYesNo
4
显示是和否按钮。
vbRetryCancel
5
显示重试和取消按钮。
vbCritical
16
显示临界信息图标。
vbQuestion
32
显示警告查询图标。
vbExclamation
48
显示警告消息图标。
vbInformation
64
显示信息消息图标。
vbDefaultButton1
第一个按钮为默认按钮。
vbDefaultButton2
256
第二个按钮为默认按钮。
vbDefaultButton3
512
第三个按钮为默认按钮。
vbDefaultButton4
768
第四个按钮为默认按钮。
vbApplicationModal
应用程序模式：
用户必须响应消息框才能继续在当前应用程序中工作。
vbSystemModal
4096
系统模式：
在用户响应消息框前，所有应用程序都被挂起。
第一组值（0-5）用于描述对话框中显示的按钮类型与数目；
第二组值（16,32,48,64）用于描述图标的样式；
第三组值（0,256,512）用于确定默认按钮；
而第四组值（0,4096）则决定消息框的样式。
在将这些数字相加以生成buttons参数值时，只能从每组值中取用一个数字。
MsgBox函数有以下返回值：
按钮
vbOK
确定
vbCancel
取消
vbAbort
放弃
vbRetry
重试
vbIgnore
忽略
vbYes
6
是
vbNo
7
否
如果同时提供了helpfile和context，则用户可以按F1键以查看与上下文相对应的帮助主题。
如果对话框显示取消按钮，则按ESC键与单击取消的效果相同。
如果对话框包含帮助按钮，则有为对话框提供的上下文相关帮助。
但是在单击其他按钮之前，不会返回任何值。
当MicroSoftInternetExplorer
升级会员 