QTP中常用的VBS函数
上一篇 / 下一篇 2008-06-02 20:12:05 / 个人分类：QTP
%f8v$@ O{3X;f]$Kh_7u6J0转自：http://bbs.51testing.com/thread-116486-1-1.html51Testing软件测试网3T`9j q(qef vW
W4H E _
X-u F0Left 函数51Testing软件测试网#_o b:I%x5Z }
返回 Variant (String)，其中包含字符串中从左边算起指定数量的字符。
4G"Q;O,V sY0语法51Testing软件测试网yUxK cY)faIv ^9y
Left(string, length)51Testing软件测试网JVkz |
i)Ox$J;_+Z
Left 函数的语法有下面的命名参数：51Testing软件测试网.N4sW-QT#t8i H
51Testing软件测试网e]1B ~V8Q"x+}sD
部分 说明
s)v/]+@ {0_"K3M0string 必要参数。字符串表达式其中最左边的那些字符将被返回。如果 string 包含 Null，将返回 Null。 51Testing软件测试网ZL6W9{D3Q
length 必要参数；为 Variant (Long)。数值表达式，指出将返回多少个字符。如果为 0，返回零长度字符串 ("")。如果大于或等于 string 的字符数，则返回整个字符串。
'z_&h2{ j
m051Testing软件测试网 E7ny
i3`7`
说明51Testing软件测试网%P+s%L4f5y5N
欲知 string 的字符数，使用 Len 函数。51Testing软件测试网3b1C?)I)H._+|*c
注意 LeftB 函数作用于包含在字符串中的字节数据。所以 length 指定的是字节数，而不是要返回的字符数。
,}{W8U?4jP0
4c([dJ ~I3n M.o0
;C+l3Ri(r-H S0Mid 函数51Testing软件测试网 Cb3^
i\ l7F.B
从字符串中返回指定数目的字符。
8]r/X ?;o?!e+Y"DC0Mid(string, start[, length])
2MV a
d7s'r+A0参数
K&g _8b [(D$[Q6O0string51Testing软件测试网!JA~7Ff E3v wZ ~
字符串表达式，从中返回字符。如果 string 包含 Null，则返回 Null。51Testing软件测试网^
o5c5|!`/| _,{
Start
l#e,[4P:[*^:{Z0string 中被提取的字符部分的开始位置。如果 start 超过了 string 中字符的数目，Mid 将返回零长度字符串 ("")。
d{
B8p5g7BXq0Length51Testing软件测试网?/UA z@/Yao
要返回的字符数。如果省略或 length 超过文本的字符数（包括 start 处的字符），将返回字符串中从 start 到字符串结束的所有字符。51Testing软件测试网P/jz.Sc9y W
说明
xui~ f z+n0要判断 string 中字符的数目，可使用 Len 函数。
xr6m$_ g0下面的示例利用 Mid 函数返回字符串中从第四个字符开始的六个字符：51Testing软件测试网s3g%i9M WXj,nRH
{
Dim MyVar
pT9j N \ e3o0MyVar = Mid("VB脚本is fun!", 4, 6) 'MyVar 包含 "scrīpt"。
6Z:n%x7|nW"r6j _ y|0注意 MidB 函数与包含在字符串中的字节数据一起使用。其参数不是指定字符数，而是字节数。
$qb ch%hk[v8o051Testing软件测试网(MC:e U{+x!v0i!L9S
Len 函数51Testing软件测试网*}5u+wB @
返回字符串内字符的数目，或是存储一变量所需的字节数。
YB4d@X0Len(string | varname)51Testing软件测试网
z]Bb`#Ji hP
参数
y \ rrN0string
z#JHO ?Q ^w0任意有效的字符串表达式。如果 string 参数包含 Null，则返回 Null。
DE hSO-[0Varname51Testing软件测试网(`I d:t
WA
任意有效的变量名。如果 varname 参数包含 Null，则返回 Null。51Testing软件测试网!?C-jD#C e:E_ { G
说明51Testing软件测试网6E0p/K6W f/U~4I
下面的示例利用 Len 函数返回字符串中的字符数目：51Testing软件测试网Z;k3o&u#h ^ B)\ Qq"S
Dim MyString51Testing软件测试网U} z0a@-f
X0W)J;g*E
MyString = Len("VBscrīpt") 'MyString 包含 8。
3L
Rx`Z8]0注意 LenB 函数与包含在字符串中的字节数据一起使用。LenB 不是返回字符串中的字符数，而是返回用于代表字符串的字节数。51Testing软件测试网e o(x4EC6I ^ q#q P
hla qa0A/fS&W0Right 函数
%pN nTC tAz$~0从字符串右边返回指定数目的字符。51Testing软件测试网D)x-n9md}
Right(string, length)51Testing软件测试网&@QzWD#u2O/E f
参数51Testing软件测试网gX;Vw2~-l#~ ?
string51Testing软件测试网A too*L+Lk-wW
字符串表达式，其最右边的字符被返回。如果 string 参数中包含 Null，则返回 Null。51Testing软件测试网AS2tv?
w#VkG
Length
x)J K;N)u0数值表达式，指明要返回的字符数目。如果为 0，返回零长度字符串；如果此数大于或等于 string 参数中的所有字符数目，则返回整个字符串。51Testing软件测试网'P3b,` V@S+P~
说明
-P d8X#W8o:P5G"v4[0要确定 string 参数中的字符数目，使用 Len 函数。
d;Lo"E)o]8}fp0下面的示例利用 Right 函数从字符串右边返回指定数目的字符：51Testing软件测试网!w t `,Q!cAQtJ}o
Dim AnyString, MyStr
2`s(U4S}!L+J0AnyString = "Hello World" ' 定义字符串。
PU O,U(ij~U {P0MyStr = Right(AnyString, 1) ' 返回 "d"。51Testing软件测试网:y,E)vo9_7K
MyStr = Right(AnyString, 6) ' 返回 " World"。51Testing软件测试网 Zy;S v9]{V
MyStr = Right(AnyString, 20) ' 返回 "Hello World"。
,W G6bkcq
aDU3o7u0注意 RightB 函数用于字符串中的字节数据，length 参数指定返回的是字节数目，而不是字符数目。
3h?z
ia:T0
*h6^0vE:`(A\Du-E0InStr 函数
"K`!q\!U#at s6D|7n;L*|0返回某字符串在另一字符串中第一次出现的位置。51Testing软件测试网O(q;N _ OQ-G*Uw
InStr([start, ]string1, string2[, compare])51Testing软件测试网"QJ,r8ZpR
L
参数51Testing软件测试网 E o(m
^$fy
start51Testing软件测试网J i7VH r N.X6_e
可选项。数值表达式，用于设置每次搜索的开始位置。如果省略，将从第一个字符的位置开始搜索。如果 start 包含 Null，则会出现错误。如果已指定 compare，则必须要有 start 参数。51Testing软件测试网;S'Hz| qN2f ]_
string1
d1E"k6pT,E3R0必选项。接受搜索的字符串表达式。51Testing软件测试网f3WEo#ug.i
string251Testing软件测试网|/L
L)G8? {.W
必选项。要搜索的字符串表达式。51Testing软件测试网*c:PP*~1n3A4k.S5p
compare
*OeH iA*m5_1\"s0可选项。指示在计算子字符串时使用的比较类型的数值。有关数值，请参阅“设置”部分。如果省略，将执行二进制比较。
cyE [*_y^0设置51Testing软件测试网8ibo X-ac k#H
compare 参数可以有以下值：
M6Ni7q'zCL051Testing软件测试网
n|e6mY,I%E.W x"{8B
常数 值 描述
+S:Te||0UME0vbBinaryCompare 0 执行二进制比较。 51Testing软件测试网9s:iww4e(E G
vbTextCompare 1 执行文本比较。 51Testing软件测试网 H:c$R]ZC.R
返回值51Testing软件测试网\Or7f;f#a3C M
InStr 函数返回以下值：51Testing软件测试网4rR7c5g)g5bz G
S
T'h.T`0Y0如果 InStr 返回 51Testing软件测试网_s xp1|"J-f
string1 为零长度 0 51Testing软件测试网1x1CKpW,kZ0T
string1 为 Null Null
SG6LUE*d)M0string2 为零长度 start
%eRx8v;_0string2 为 Null Null
|2n4gl P
G?i0string2 没有找到 0 51Testing软件测试网G$v,Ex,C"n]]8u
在 string1 中找到 string2 找到匹配字符串的位置 51Testing软件测试网 A
A!~ }3c3@
start > Len(string2) 0 51Testing软件测试网1`(h{&zCP
说明51Testing软件测试网 g*H+aC
y u
下面的示例利用 InStr 搜索字符串：
O.p lN'?$tG0Dim SearchString, SearchChar, MyPos
R"F1o;L#WbII7i;n0SearchString ="XXpXXpXXPXXP" ' 要搜索的字符串。51Testing软件测试网S.r-E(@WlwAO7u
SearchChar = "P" ' Search for "P".
u8C'U2} m2S0MyPos = Instr(4, SearchString, SearchChar, 1) ' 在位置 4 进行的文本比较。返回 6。51Testing软件测试网8A%a$h2fy
U1_3X{
MyPos = Instr(1, SearchString, SearchChar, 0) ' 在位置 1 进行的二进制比较。返回 9。
c
F0w
k/E0MyPos = Instr(SearchString, SearchChar) ' 默认情况下，进行的是二进制比较（省略了最后的参数）。返回 9。
X!n0Q5Sa$_;Q0MyPos = Instr(1, SearchString, "W") ' 在位置 1 进行的二进制比较。返回 0（找不到 "W"）。51Testing软件测试网G(XK+pRlB-j4r4|
注意 InStrB 函数使用包含在字符串中的字节数据，所以 InStrB 返回的不是一个字符串在另一个字符串中第一次出现的字符位置，而是字节位置。
v?/l"?6?Ah8aP3B051Testing软件测试网
qwV b5E(L H r
LTrim、RTrim与 Trim 函数51Testing软件测试网 ?(Q3OUt
_7E3e6|
返回不带前导空格 (LTrim)、后续空格 (RTrim) 或前导与后续空格 (Trim) 的字符串副本。51Testing软件测试网x9m+G c(^)_-e)G1?
LTrim(string)51Testing软件测试网6X$l:R Q E
bT2s-H4o
RTrim(string)
'Il/`z+]1?5k o E0Trim(string)51Testing软件测试网I r(t!C v0C#Ms k$|
string 参数是任意有效的字符串表达式。如果 string 参数中包含 Null，则返回 Null。51Testing软件测试网
],]z%^p
说明
:};_1hVZP:Mk
Ryi k0下面的示例利用 LTrim, RTrim, 和 Trim 函数分别用来除去字符串开始的空格、尾部空格、 开始和尾部空格：
n#s'o1^*X m c|E0Dim MyVar
7pbj"s
W1k0MyVar = LTrim(" vbscrīpt ") 'MyVar 包含 "vbscrīpt "。51Testing软件测试网5d3[5O/L$W0C
MyVar = RTrim(" vbscrīpt ") 'MyVar 包含 " vbscrīpt"。
x6hs^$[A;T0MyVar = Trim(" vbscrīpt ") 'MyVar 包含 "vbscrīpt"。51Testing软件测试网 m%z#ss(`~ M7{
]-_2a;kP#n'n0?0Rnd 函数51Testing软件测试网:|y|bG{{7Y7d
返回一个随机数。51Testing软件测试网d zaR |j
Rnd[(number)]
,x3NPX+^ |-O0number 参数可以是任意有效的数值表达式。
OQ%m,j4nk#z0说明51Testing软件测试网0`v*^±o
U8y&M
Rnd 函数返回一个小于 1 但大于或等于 0 的值。number 的值决定了 Rnd 生成随机数的方式：51Testing软件测试网}^1GF B
9c x r9]a0如果 number 为 Rnd 生成
J)jjE6} a0小于零 每次都相同的值，使用 number 作为种子。
j5d
BS'g|5dz+n0大于零 序列中的下一个随机数。 51Testing软件测试网N4UB u6W
等于零 最近生成的数。 51Testing软件测试网&qp k]!W!w
省略 序列中的下一个随机数。
F0QZb/U0因每一次连续调用 Rnd 函数时都用序列中的前一个数作为下一个数的种子，所以对于任何最初给定的种子都会生成相同的数列。51Testing软件测试网 e;F,]&X%@7C
在调用 Rnd 之前，先使用无参数的 Randomize 语句初始化随机数生成器，该生成器具有基于系统计时器的种子。51Testing软件测试网.C3E
O,w7cL5m:a t N.N
要产生指定范围的随机整数，请使用以下公式：
5L)~ cZ2Ehh0Int((upperbound - lowerbound + 1) * Rnd + lowerbound)
:viIr-k$X7uL2}0这里， upperbound 是此范围的上界，而 lowerbound 是此范围内的下界。
"A M
h:@3["Cm;\"x0注意 要重复随机数的序列，请在使用数值参数调用 Randomize 之前，立即用负值参数调用 Rnd。使用同样 number 值的 Randomize 不能重复先前的随机数序列。51Testing软件测试网~ v&de(q6@
51Testing软件测试网j d-HA-v@Uw r l
Randomize 语句51Testing软件测试网U(p e O/u0u)U3~'^
初始化随机数生成器。
v MK0XU1Kb+oK6q\k0语法
7r6w3cGEg
? M0Randomize [number]
pQ(bm]8ds!H0可选的 number 参数是 Variant 或任何有效的数值表达式。
-M;m+DU'j |*S*xSB0说明
}{ T s$B0Randomize 用 number 将 Rnd 函数的随机数生成器初始化，该随机数生成器给 number 一个新的种子值。如果省略 number，则用系统计时器返回的值作为新的种子值。
3Vn1Q
p
n%N#o0如果没有使用 Randomize，则（无参数的）Rnd 函数使用第一次调用 Rnd 函数的种子值。
2h/_5ptI6U*LS4kw/{0注意 若想得到重复的随机数序列，在使用具有数值参数的 Randomize 之前直接调用具有负参数值的 Rnd。使用具有同样 number 值的 Randomize 是不会得到重复的随机数序列的。51Testing软件测试网O;q(I/|^T1az ~ e~
Rnd 函数示例
O4`M ~A$a8z.T0本示例使用 Rnd 函数随机生成一个 1 到 6 的随机整数。
b3AT
v
t3U7|0本示例用 Randomize 语句初始化随机数生成器。由于忽略了数值参数， 所以 Randomize 用 Timer 函数的返回值作为新的随机数种子值。
,M4i C`!bO \0
i.Xugg7u.^;l0Dim MyValue51Testing软件测试网`-] U_0^fW;H
Randomize ' 对随机数生成器做初始化的动作。
E6?G eCP051Testing软件测试网2f h:~@8P.f
l3a,E
MyValue = Int((6 * Rnd) + 1) ' 生成 1 到 6 之间的随机数值。51Testing软件测试网q
s
tK W
Split函数51Testing软件测试网}x4F
o4\v2qK
描述51Testing软件测试网q5tu"p/g
返回一个下标从零开始的一维数组，它包含指定数目的子字符串。51Testing软件测试网:@6P,] O!}zCX
语法51Testing软件测试网 S QTNOQG:V
Split(expression[, delimiter[, count[, compare]]])51Testing软件测试网 ~%Z\/B+}3^n
Split函数语法有如下几部分：
%LnE+[gK^0
|kz h9Y*fh,n0部分 描述 51Testing软件测试网/q$y]!^U9s_
e'|
expression 必需的。包含子字符串和分隔符的字符串表达式 。如果expression是一个长度为零的字符串("")，Split则返回一个空数组，即没有元素和数据的数组。
jP*SBp:| [0delimiter 可选的。用于标识子字符串边界的字符串字符。如果忽略，则使用空格字符(" ")作为分隔符。如果delimiter是一个长度为零的字符串，则返回的数组仅包含一个元素，即完整的 expression字符串。
8\J
B\
Q:b0X0count 可选的。要返回的子字符串数，–1表示返回所有的子字符串。
%o7j!~ e5T
F6l.C
Mt0compare 可选的。数字值，表示判别子字符串时使用的比较方式。关于其值，请参阅“设置值”部分。 51Testing软件测试网 Z t&?osB@b]
51Testing软件测试网#H+zs-JM [ EF
设置值
4c'[x R*l#w o0compare参数的设置值如下：51Testing软件测试网6zF.i3I T/\u
V!S
$p kXv.jU2H"}b _,S J0常数 值 描述 51Testing软件测试网i(H"I(z F3SC+k"@ ?a
vbUseCompareOption –1 用Option Compare语句中的设置值执行比较。
0d6@"U s?)@\
S K0vbBinaryCompare 0 执行二进制比较。 51Testing软件测试网`5N s Xi V`WK
vbTextCompare 1 执行文字比较。
P.[nFBY,k9|0vbDatabaseCompare 2 仅用于Microsoft Access。基于您的数据库的信息执行比较。
d pi NhK G ^;l:ZX0
(G*wBYQ3Q7R1b0Replace 函数
y F'm
y uJU0返回字符串，其中指定数目的某子字符串被替换为另一个子字符串。51Testing软件测试网ksD-]A
ae%H f
Replace(expression, find, replacewith[, compare[, count[, start]]])
gD\wWTM;m0参数51Testing软件测试网 q7?1[AZ"\@ P G k
expression51Testing软件测试网g I
@
k;m+GxR&Hh
必选项。字符串表达式包含要替代的子字符串。
%I6BZ7|m'Ce.zD0Find51Testing软件测试网0q-D'?WI`2RA2d
必选项。被搜索的子字符串。51Testing软件测试网9G4S A+cqQ n;~
Replacewith
x z:@%c8j
V EI0必选项。用于替换的子字符串。51Testing软件测试网3~~3e\F
l
Start51Testing软件测试网 ?c.WwU t G
可选项。expression 中开始搜索子字符串的位置。如果省略，默认值为 1。在和count 关联时必须用
5?-E5hbA
p0count51Testing软件测试网 b m Ry3@2v*T
可选项。执行子字符串替换的数目。如果省略，默认值为 -1，表示进行所有可能的替换。在和 start 关联时必须用。51Testing软件测试网'e3^MLgCf%k5p
Compare
U iAI6KJ9JO T,X$c0可选项。指示在计算子字符串时使用的比较类型的数值。有关数值，请参阅“设置”部分。如果省略,缺省值为 0 ,这意味着必须进行二进制比较。
5e |!M~'x{,A0设置51Testing软件测试网9J!t J+~+s
compare 参数可以有以下值：51Testing软件测试网%T h+z"V)nP"h` W
"O(x;c _SH eMG0常数 值 描述
|g"R3k+BSZ0vbBinaryCompare 0 执行二进制比较。 51Testing软件测试网+{TE4f^+ED/u
vbTextCompare 1 执行文本比较。
9Al9I D i0返回值51Testing软件测试网)ZLgu)J-jnL
Replace 返回以下值：
4A @2T J0N!A-`0
,_.J
^SH1t/x2L2t?0如果 Replace 返回 51Testing软件测试网5E
E6Z!OUg(?
expression 为零长度 零长度字符串 ("")。
,C!V(^ `'Z ~0expression 为 Null 错误。
V2u~*L{ K0find 为零长度 expression 的副本。 51Testing软件测试网1N
OMnnE+L%?(d
replacewith 为零长度 expression 的副本，其中删除了所有由 find 参数指定的内容。 51Testing软件测试网0T4xj{PS6i,M A
start > Len(expression) 零长度字符串。 51Testing软件测试网
Pl+l J-T*Oup^!_}
count 为 0 expression 的副本。
5F:F#S G9vU2F3c0说明51Testing软件测试网7g NL-rbh
`&Q X'f
Replace 函数的返回值是经过替换（从由 start 指定的位置开始到 expression 字符串的结尾）后的字符串，而不是原始字符串从开始至结尾的副本。51Testing软件测试网7d$Zb M C A
下面的示例利用 Replace 函数返回字符串：51Testing软件测试网E"xg7L&`
]Ki#|LE
Dim MyString
1FW$r0]1qu:T O'h"z0MyString = Replace("XXpXXPXXp", "p", "Y") '二进制比较从字符串左端开始。返回 "XXYXXPXXY"。51Testing软件测试网8V UB[,dw6g
MyString = Replace("XXpXXPXXp", "p", "Y", '文本比较从第三个字符开始。返回 "YXXYXXY"。3，, -1, 1)51Testing软件测试网'f&Q\oa sb%c5u `
ww@*D4rh0StrComp 函数
cx Y9S7r7J`-|+u0返回一个表明字符串比较结果的值。
:d Wos'C0StrComp(string1, string2[, compare])51Testing软件测试网7U f$ghA^
参数51Testing软件测试网8Gg/K,d x"Yi0Hf
string1
mf3a%N8Ps,oQ0必选项。任意有效的字符串表达式。51Testing软件测试网(Cw!ll&d.hOZ
string2
T^3u9s vh
`M0必选项。任意有效的字符串表达式。51Testing软件测试网4tI[i;^9F
Compare51Testing软件测试网 N K!Hb0I$`m6D a"s
可选项。指示在计算字符串时使用的比较类型的数值。如果省略，则执行二进制比较。有关数值，请参阅“设置”部分。51Testing软件测试网0T)e ]T:LW
设置
+Y0R ^_9WRw7g)^,R0compare 参数可以有以下值：51Testing软件测试网Q2z5~ }4b ] E$^
51Testing软件测试网 Qj/gKL,},X'\
常数 值 描述 51Testing软件测试网o
GV]\"I%t+W
vbBinaryCompare 0 执行二进制比较。 51Testing软件测试网if&T2M#E`"]uf
vbTextCompare 1 执行文本比较。
G/|,`%`1i;r0W%N0返回值51Testing软件测试网+n7y/s O.S!J
StrComp 函数有以下返回值：
#Rx-koif0
6M v@;z"fc X0如果 StrComp 返回
S? MY,J(X9v*]0string1 小于 string2 -1
"c s sf,] V0string1 等于 string2 0
Yj$~,G
gr5IY~Us8i0string1 大于 string2 1 51Testing软件测试网/T&i@6Et
string1 或 string2 为 Null Null
!X(UC0[q&V7O0说明51Testing软件测试网J0?B&Vc `@Y9~n
下面的示例利用 StrComp 函数返回字符串比较的结果。如果第三个参数为 1 执行文本比较；如果第三个参数为 0 或者省略执行二进制比较。
{9l X5{1F)U+d)m'Y L0Dim MyStr1, MyStr2, MyComp
)WwQ:k {
W'v X(B2Z5Y0MyStr1 = "ABCD": MyStr2 = "abcd" '定义变量。
&A#V;Cd;sT6o7LPeat0MyComp = StrComp(MyStr1, MyStr2, 1) ' 返回 0。51Testing软件测试网(V~"B
j E1c&eT
MyComp = StrComp(MyStr1, MyStr2, 0) ' 返回 -1。
#a7JQ K P'o0MyComp = StrComp(MyStr2, MyStr1) ' 返回 1。51Testing软件测试网W-GZ G;Y6Tp
q3O7r*d&ZIH%em Rg0CInt 函数
p M(K `2q0m S Sm0返回表达式，此表达式已被转换为 Integer 子类型的 Variant。51Testing软件测试网kl9s2D X)D;oq
CInt(expression)
r:Z9m3yc!HnlA$G @0expression 参数是任意有效的表达式。
lT2La#Z0说明
:sy4Vc k L%@0通常，可以使用子类型转换函数书写代码，以显示某些操作的结果应被表示为特定的数据类型，而不是默认类型。例如，在出现货币、单精度或双精度运算的情况下，使用 CInt 或 CLng 强制执行整数运算。51Testing软件测试网%r2Y:`,J*E
CInt 函数用于进行从其他数据类型到 Integer 子类型的国际公认的格式转换。例如对十进制分隔符（如千分符）的识别，可能取决于系统的区域设置。51Testing软件测试网W O;B)C3Tde C
如果 expression 在 Integer 子类型可接受的范围之外，则发生错误。51Testing软件测试网y7~&ox f,K IV
下面的示例利用 CInt 函数把值转换为 Integer:
h!mAD
n0Dim MyDouble, MyInt51Testing软件测试网$Xk9U
C5l l
MyDouble = 2345.5678 ' MyDouble 是 Double。51Testing软件测试网s&|9U`#M
MyInt = CInt(MyDouble) ' MyInt 包含 2346。
u6TQ2b8L/_0注意 CInt 不同于 Fix 和 Int 函数删除数值的小数部分，而是采用四舍五入的方式。当小数部分正好等于 0.5 时, CInt 总是将其四舍五入成最接近该数的偶数。例如， 0.5 四舍五入为 0, 以及 1.5 四舍五入为 2.51Testing软件测试网0m)|r%PB.o L
51Testing软件测试网!u`&w:mwG1@q
CStr 函数51Testing软件测试网;q9{K n y*HPc
返回表达式，该表达式已被转换为 String 子类型的 Variant。51Testing软件测试网&L Q8t cK$_9|Zwr Q0W
CStr(expression)51Testing软件测试网:Z7s*RyK3f6@
expression 参数是任意有效的表达式。
F~C/g-Z m? B0说明51Testing软件测试网 f
F#WV B#M
通常，可以使用子类型转换函数书写代码，以显示某些操作的结果应被表示为特定的数据类型，而不是默认类型。例如，使用 CStr 强制将结果表示为 String。
MNZ]1wVF a]]0CStr 函数用于替代 Str 函数来进行从其他数据类型到 String 子类型的国际公认的格式转换。例如对十进制分隔符的识别取决于系统的区域设置。
.g,V8m)m1D0expression 根据下表决定返回的数据：51Testing软件测试网3v-C(^j
XYcmh2C,CF
51Testing软件测试网-F5U k {,l
如果 expression 为 CStr 返回 51Testing软件测试网 P I(Z,f7J@ k!ZK5v
Boolean 字符串，包含 True 或 False。
`I9ZU
S:N0p pW {0Date 字符串，包含系统的短日期格式日期。 51Testing软件测试网4e\1z-Oi/^Q$r
Null 运行时错误。 51Testing软件测试网S~ _.uf6A
Empty 零长度字符串 ("")。 51Testing软件测试网#q*ezH$L+~
Error 字符串，包含跟随有错误号码的单词 Error。 51Testing软件测试网5?e B,i T
其他数值 字符串，包含此数字。
R(b
un+i n0下面的示例利用 CStr 函数把数字转换为 String:51Testing软件测试网 E4p8~|fNm,}0{
Dim MyDouble, MyString
8x:C5MJ.g;_0MyDouble = 437.324 ' MyDouble 是双精度值。
'\ H;VcK
^eL g0MyString = CStr(MyDouble) ' MyString 包含 "437.324"。51Testing软件测试网;Bt G&_!sk'c^!@
51Testing软件测试网iX-wg[!f#? Yb
LCase 函数51Testing软件测试网+eV%W:}|
g.YeG
返回字符串的小写形式。
j`KF F P9k,G0LCase(string)51Testing软件测试网VVZ-ODrs.Nv
string 参数是任意有效的字符串表达式。如果 string 参数中包含 Null，则返回 Null。
P&WtLoT'ibK0说明
?]$G e Ikf x }+jp0仅大写字母转换成小写字母；所有小写字母和非字母字符保持不变。
0o
?e#Ch \"I [*I051Testing软件测试网#EV%{ u5n fD m]
下面的示例利用 LCase 函数把大写字母转换为小写字母：
&Bg9g \R9p0Dim MyString
DU(L/_7I^w0Dim LCaseString
.l u's m3d*@0MyString = "VBscrīpt"
RG
OlJ0h0LCaseString = LCase(MyString) ' LCaseString 包含 "vbscrīpt"。
%N D^y$W6?$sJ f0UCase 函数
^ _[0y|+y z2_jT0返回字符串的大写形式。
d!t2a&n^u/f,N0UCase(string)51Testing软件测试网{V7g%y h|#o
string 参数是任意有效的字符串表达式。如果 string 参数中包含 Null，则返回 Null。
Ar!C#n,WFE0说明51Testing软件测试网
K D*X3L;|u @
只有小写字母被转换成大写字母；所有大写字母和非字母字符均保持不变。
Qq8LM _z0下面的示例利用 UCase 函数返回字符串的大写形式：51Testing软件测试网&{Gq1V0N)^Ez
Dim MyWord51Testing软件测试网@%W ]2j"ZlA hj
MyWord = UCase("Hello World") ' 返回"HELLO WORLD"。51Testing软件测试网ig bI Yz
51Testing软件测试网TA"b&^ky
K F
MsgBox 函数51Testing软件测试网 rCw5ek:~ F,f
在对话框中显示消息，等待用户单击按钮，并返回一个值指示用户单击的按钮。
3VY|8h7^3r$I0MsgBox(prompt[, buttons][, title][, helpfile, context])
bLA:\4\ gl }0参数
M
x0q_)~._.{0prompt
O YC5@"l.t go0作为消息显示在对话框中的字符串表达式。prompt 的最大长度大约是 1024 个字符，这取决于所使用的字符的宽度。如果 prompt 中包含多个行，则可在各行之间用回车符 (Chr(13))、换行符 (Chr(10)) 或回车换行符的组合 (Chr(13) & Chr(10)) 分隔各行。
?i xSI5@3_5Tb faG0Buttons
7K
t6gWcIY!a*`0数值表达式，是表示指定显示按钮的数目和类型、使用的图标样式，默认按钮的标识以及消息框样式的数值的总和。有关数值，请参阅“设置”部分。如果省略，则 buttons 的默认值为 0。
/x0TkHK0Title51Testing软件测试网 c*\wSp&`
显示在对话框标题栏中的字符串表达式。如果省略 title，则将应用程序的名称显示在标题栏中。
'?(sJN7K.~ H0Helpfile51Testing软件测试网'R&A#d:xCI x:Yt3I
字符串表达式，用于标识为对话框提供上下文相关帮助的帮助文件。如果已提供 helpfile，则必须提供 context。在 16 位系统平台上不可用。
P'B$K,|H!I_
Us0Context
+S'x c[ ss Y&R"U,p0数值表达式，用于标识由帮助文件的作者指定给某个帮助主题的上下文编号。如果已提供 context，则必须提供 helpfile。在 16 位系统平台上不可用。51Testing软件测试网t}i N/D
eB6g
设置51Testing软件测试网@ xd
q_ y
buttons 参数可以有以下值：51Testing软件测试网\S5_{ ^6mx p-l m:d
51Testing软件测试网4A.L g h WqU U
常数 值 描述
dQAFxz W*H/g b0vbOKOnly 0 只显示确定按钮。 51Testing软件测试网4i_j
LP)c
vbOKCancel 1 显示确定和取消按钮。
M3Z\ s
]S0vbAbortRetryIgnore 2 显示放弃、重试和忽略按钮。
hgvXa0vbYesNoCancel 3 显示是、否和取消按钮。 51Testing软件测试网 }N*J }(X1k0m
vbYesNo 4 显示是和否按钮。
o8\#~ q Xd!{&@ w0vbRetryCancel 5 显示重试和取消按钮。 51Testing软件测试网u2U"D_/f Rw}5L#R
vbCritical 16 显示临界信息图标。
,A:o~ D1k DO0vbQuestion 32 显示警告查询图标。 51Testing软件测试网uK'N9\ fm
vbExclamation 48 显示警告消息图标。
a9P+U Y+B z|0vbInformation 64 显示信息消息图标。
a:[%e I | rT0vbDefaultButton1 0 第一个按钮为默认按钮。 51Testing软件测试网^z%D{tR1@
vbDefaultButton2 256 第二个按钮为默认按钮。
%h+v"z e1kU A0vbDefaultButton3 512 第三个按钮为默认按钮。 51Testing软件测试网B6z D4i-]
vbDefaultButton4 768 第四个按钮为默认按钮。 51Testing软件测试网? W pN)wYxD?3q
vbApplicationModal 0 应用程序模式：用户必须响应消息框才能继续在当前应用程序中工作。
3}9Z9[3~&\0vbSystemModal 4096 系统模式：在用户响应消息框前，所有应用程序都被挂起。
)`V oq1F^T5j$~0第一组值 (0 - 5) 用于描述对话框中显示的按钮类型与数目；第二组值 (16, 32, 48, 64) 用于描述图标的样式；第三组值 (0, 256, 512) 用于确定默认按钮；而第四组值 (0, 4096) 则决定消息框的样式。在将这些数字相加以生成 buttons 参数值时，只能从每组值中取用一个数字。51Testing软件测试网i Mb'}9}/^bC8G
返回值51Testing软件测试网 g(h-g NO-j(P T%x
MsgBox 函数有以下返回值：51Testing软件测试网 D:z/Ng Y
Q
e z
^ bkHt0常数 值 按钮 51Testing软件测试网;Bt z~Zuq;XyQ
vbOK 1 确定
[4{(H fj@'TJ0vbCancel 2 取消 51Testing软件测试网
ma
]L[
vbAbort 3 放弃
Wj,^1TdC/O%v0vbRetry 4 重试
rRdQk7~4T*^![%^N0vbIgnore 5 忽略 51Testing软件测试网)p ROeV%} pZ0HI
vbYes 6 是
%n"U(} wr:X;nE0vbNo 7 否 51Testing软件测试网Z-~k5p.m'Ya&\Ok
说明
!|.c#w s3gMx0如果同时提供了 helpfile 和 context，则用户可以按 F1 键以查看与上下文相对应的帮助主题。
J)w(Z2tZ^0如果对话框显示取消按钮，则按 ESC 键与单击取消的效果相同。如果对话框包含帮助按钮，则有为对话框提供的上下文相关帮助。但是在单击其他按钮之前，不会返回任何值。
g ~]wR%h0当MicroSoft Internet Explorer使用MsgBox函数时，任何对话框的标题总是包含"VBscrīpt",以便于将其与标准对话框区别开来。
P2Hz A1YI$@
q0下面的例子演示了 MsgBox 函数的用法：51Testing软件测试网
~~9ze!zT-}
M
Dim MyVar51Testing软件测试网\A.C3J r \,D
MyVar = MsgBox ("Hello World!", 65, "MsgBox Example")51Testing软件测试网 T9[N#C |R,i!b:Q
' MyVar 包含 1 或 2，这取决于单击的是哪个按钮。
相关阅读:
- QTP常用函数说明(转) (莫冲, 2008-5-30)
- QTP识别对象的原理(转) (莫冲, 2008-5-30)
- QTP基本使用示例 (51testing, 2008-5-30)
- 『傻瓜版1』用QTP 连接Oracle DB (topor, 2008-5-30)
- 『傻瓜版2』用QTP连接Oracle DB (topor, 2008-5-30)
- 一、QTP识别对象的原理 (风起河边, 2008-5-31)
- 验证页面连接方法 (Randall, 2008-6-01)
- QTP 基础代码收集 (Randall, 2008-6-01)
- 【转载】QuickTestProfessional基本使用示例 (ZERONG.HE, 2008-6-01)
- QTP中常用的VBS函数 (51testing, 2008-6-02)
TAG: QTP
标题搜索
日历
|
|||||||||
| 日 | 一 | 二 | 三 | 四 | 五 | 六 | |||
| 1 | 2 | 3 | 4 | 5 | 6 | ||||
| 7 | 8 | 9 | 10 | 11 | 12 | 13 | |||
| 14 | 15 | 16 | 17 | 18 | 19 | 20 | |||
| 21 | 22 | 23 | 24 | 25 | 26 | 27 | |||
| 28 | 29 | 30 | |||||||
我的存档
数据统计
- 访问量: 42199
- 日志数: 40
- 文件数: 1
- 建立时间: 2007-08-06
- 更新时间: 2014-06-10
