QTP中常用的VBS函数

;r8e7O~)}!{0转自：http://bbs.51testing.com/thread-116486-1-1.html51Testing软件测试网 P;l2F8D
Mf"O%V@0n%O

J e%k AE"Ya3Q0Left 函数51Testing软件测试网
l8y aro"t:u K
返回 Variant (String)，其中包含字符串中从左边算起指定数量的字符。51Testing软件测试网
L0gP R9k8RU
语法51Testing软件测试网%_/@ wt`&ouXG/Do
Left(string, length)
p4H
P]5P0Left 函数的语法有下面的命名参数：51Testing软件测试网N_8OB*w&[`

azYtQF0部分        说明          
N+Z$Y-xs K0string        必要参数。字符串表达式其中最左边的那些字符将被返回。如果 string 包含 Null，将返回 Null。          51Testing软件测试网k%Nym__
length        必要参数；为 Variant (Long)。数值表达式，指出将返回多少个字符。如果为 0，返回零长度字符串 ("")。如果大于或等于 string 的字符数，则返回整个字符串。         
&S#h-vzk'rR051Testing软件测试网#Oq5E
D*TB
说明
z ?"DXB'\pGJ2D0欲知 string 的字符数，使用 Len 函数。
.C*a M
_s#l0注意    LeftB 函数作用于包含在字符串中的字节数据。所以 length 指定的是字节数，而不是要返回的字符数。51Testing软件测试网cw'z%xkJ L0b b

m^%@qD/S051Testing软件测试网/U-_"@!by_R
Mid 函数51Testing软件测试网S S7`'rFS/}'Al
从字符串中返回指定数目的字符。51Testing软件测试网)n\7_Y]m?
Mid(string, start[, length])51Testing软件测试网G
D'RG/pD C
参数
Q9P!\r1l5bJwy0string51Testing软件测试网b([
D|U
字符串表达式，从中返回字符。如果 string 包含 Null，则返回 Null。51Testing软件测试网u%M-{)W P1gQ Ad7d
Start
in:]5Xa3j1B`F0string 中被提取的字符部分的开始位置。如果 start 超过了 string 中字符的数目，Mid 将返回零长度字符串 ("")。
m.z7^!f!yX0Length51Testing软件测试网]z mt+W"i#l
要返回的字符数。如果省略或 length 超过文本的字符数（包括 start 处的字符），将返回字符串中从 start 到字符串结束的所有字符。51Testing软件测试网?[CKr1HdB'f'@2v
说明51Testing软件测试网B(e:W)h5y.D,[
要判断 string 中字符的数目，可使用 Len 函数。
#PXU3e F!G"P ^0下面的示例利用 Mid 函数返回字符串中从第四个字符开始的六个字符：51Testing软件测试网B*I]#o/uq
Dim MyVar51Testing软件测试网6h*~1Z)yZ?-y8J
MyVar = Mid("VB脚本is fun!", 4, 6) 'MyVar 包含 "scrīpt"。51Testing软件测试网ONNG$NN1V
注意   MidB 函数与包含在字符串中的字节数据一起使用。其参数不是指定字符数，而是字节数。
+oVGxNFG\%tZ051Testing软件测试网k7V3?B0Ot"RhE9m
Len 函数
0X-o g/ZC K0返回字符串内字符的数目，或是存储一变量所需的字节数。51Testing软件测试网d\9v_hb5x4d2z
Len(string | varname)51Testing软件测试网BYy0V5h
参数51Testing软件测试网/i hmH6Hz/z
string
yc$oV9I(nM6o0~0任意有效的字符串表达式。如果 string 参数包含 Null，则返回 Null。51Testing软件测试网)n$\0oG*_h U9|
Varname
6p`0a+f
Rs:M+_0任意有效的变量名。如果 varname 参数包含 Null，则返回 Null。51Testing软件测试网%u]Mz cz*t
说明
;|-{.x
D Ni"x0下面的示例利用 Len 函数返回字符串中的字符数目：
0YP"L o.Ho0Dim MyString
if*p*q!G"G ^0MyString = Len("VBscrīpt") 'MyString 包含 8。51Testing软件测试网S!g-X @/{3HX
注意   LenB 函数与包含在字符串中的字节数据一起使用。LenB 不是返回字符串中的字符数，而是返回用于代表字符串的字节数。
N,][D5VB3A5w%]051Testing软件测试网*f!]Dd3@!]4~n
Right 函数51Testing软件测试网rt}/VC![)z$r9~+n
从字符串右边返回指定数目的字符。
D
^o-i X2rXQk
im0Right(string, length)
[n1^ZCy9I0参数51Testing软件测试网t_pq3|1i
string51Testing软件测试网
CM Z2VK(C;G9{O2D
字符串表达式，其最右边的字符被返回。如果 string 参数中包含 Null，则返回 Null。51Testing软件测试网F:iU!NuFFE4mO
Length51Testing软件测试网#kV"I0U*j^6]2q
数值表达式，指明要返回的字符数目。如果为 0，返回零长度字符串；如果此数大于或等于 string 参数中的所有字符数目，则返回整个字符串。
0V:u#v5D"T0说明51Testing软件测试网9b4P2h:cR U
j
要确定 string 参数中的字符数目，使用 Len 函数。51Testing软件测试网2S7Hn4E/Q@
下面的示例利用 Right 函数从字符串右边返回指定数目的字符：
b-j!]\O0Dim AnyString, MyStr
XNj%K*A7E n/Y0AnyString = "Hello World"      ' 定义字符串。
NO5PeN0MyStr = Right(AnyString, 1)    ' 返回 "d"。51Testing软件测试网md2A.QVVI
MyStr = Right(AnyString, 6)    ' 返回 " World"。
9X(Ud Mt7`,j0`0MyStr = Right(AnyString, 20)   ' 返回 "Hello World"。
;a1r1P*M r7L~0注意   RightB 函数用于字符串中的字节数据，length 参数指定返回的是字节数目，而不是字符数目。51Testing软件测试网0nT6yI"Nr g,v8A(nq

o2q
ZRE.y(P-h9\%S U0Z0InStr 函数51Testing软件测试网3U:x9tp:KMs$f
返回某字符串在另一字符串中第一次出现的位置。51Testing软件测试网
|AMB_ H4i
InStr([start, ]string1, string2[, compare])
A YoFkF0参数51Testing软件测试网D0d&juJi4H3hL
sV |
start
Z-ZT8lSb+fC%~0可选项。数值表达式，用于设置每次搜索的开始位置。如果省略，将从第一个字符的位置开始搜索。如果 start 包含 Null，则会出现错误。如果已指定 compare，则必须要有 start 参数。51Testing软件测试网:e/c4hM iE
string1
`7m)A9?~0必选项。接受搜索的字符串表达式。
CX_
W`(S0string2
;b/F v CZ$YU0必选项。要搜索的字符串表达式。51Testing软件测试网 B&d7w$O0S[#u7C
compare
dY+Lz8|2ER g0可选项。指示在计算子字符串时使用的比较类型的数值。有关数值，请参阅“设置”部分。如果省略，将执行二进制比较。
/Ip/\5p$r7l)]g0设置
g
PP9|-EU4D_0compare 参数可以有以下值：51Testing软件测试网,h"G,RUN-f,X*x

!p+r"C9TF0常数        值        描述          
L8_UJ8i0vbBinaryCompare        0        执行二进制比较。          
LE5lf$pl(I0vbTextCompare        1        执行文本比较。         
0@^@gTZJCE0返回值51Testing软件测试网TC$ZlR"SjUo
InStr 函数返回以下值：
N/WG ?'J|-L051Testing软件测试网$f/|0cN3Uf
如果        InStr 返回          
2Z2ymqT;G7^r0string1 为零长度        0          
,IL A F7~!o_X0string1 为 Null        Null          51Testing软件测试网"KA+o CE.C-M`
string2 为零长度        start          
h
M7b#e*A!og0o0string2 为 Null        Null          
HP&`/r$qg,I [8C0string2 没有找到        0          51Testing软件测试网W^KDZ `8JZ
在 string1 中找到 string2        找到匹配字符串的位置          51Testing软件测试网"Zl.gQ [*yu-t+^O
start > Len(string2)        0         51Testing软件测试网,FJ$j@HkJ
说明51Testing软件测试网|.Y'F%^9vb:j,o
下面的示例利用 InStr 搜索字符串：51Testing软件测试网Zq|GD!fk k
Dim SearchString, SearchChar, MyPos
` Gl DKO%r0SearchString ="XXpXXpXXPXXP"   ' 要搜索的字符串。
Q.P+Y0c!J0SearchChar = "P"   ' Search for "P".51Testing软件测试网+?oA#`C8g}V:IX;U
MyPos = Instr(4, SearchString, SearchChar, 1)   ' 在位置 4 进行的文本比较。返回 6。51Testing软件测试网'U_rG x*[!`m;a
MyPos = Instr(1, SearchString, SearchChar, 0)   ' 在位置 1 进行的二进制比较。返回 9。
^9\#\/X"f.R;I0MyPos = Instr(SearchString, SearchChar)   ' 默认情况下，进行的是二进制比较（省略了最后的参数）。返回 9。
`~va$y!N$A
eCKH0MyPos = Instr(1, SearchString, "W")   ' 在位置 1 进行的二进制比较。返回 0（找不到 "W"）。51Testing软件测试网#djj)ar;]QC
注意   InStrB 函数使用包含在字符串中的字节数据，所以 InStrB 返回的不是一个字符串在另一个字符串中第一次出现的字符位置，而是字节位置。
z:A^!c0C0
a'~m kTm
M)XUe0LTrim、RTrim与 Trim 函数51Testing软件测试网!S"Tsi6?@
返回不带前导空格 (LTrim)、后续空格 (RTrim) 或前导与后续空格 (Trim) 的字符串副本。51Testing软件测试网/n#a3e
g6X b]z
LTrim(string)
"k5W p ]~l0RTrim(string)
b%N9kN8U3]U0Trim(string)51Testing软件测试网.{F#r] |
string 参数是任意有效的字符串表达式。如果 string 参数中包含 Null，则返回 Null。51Testing软件测试网'?h9v7},e"A~8V
说明
@&|J AG(hZ0下面的示例利用 LTrim, RTrim, 和 Trim 函数分别用来除去字符串开始的空格、尾部空格、 开始和尾部空格：51Testing软件测试网-kERX*r,qV1d4uz)C
Dim MyVar51Testing软件测试网:x v
SLL*y
hF
MyVar = LTrim("   vbscrīpt ")   'MyVar 包含 "vbscrīpt "。
F(Y myn7Qy(E#K0MyVar = RTrim("   vbscrīpt ")   'MyVar 包含 "   vbscrīpt"。51Testing软件测试网 Bf$lDS!Fkd
MyVar = Trim("   vbscrīpt ")   'MyVar 包含 "vbscrīpt"。51Testing软件测试网3]C6h5Mf @j

f-e0o[,X0Rnd 函数51Testing软件测试网V-U2F+q?D,g;U
返回一个随机数。51Testing软件测试网nSowz o P1Hx
Rnd[(number)]
6a"G9A\ ]0number 参数可以是任意有效的数值表达式。
A#z8_4clO$O u0说明
5Nu1y+ys0Rnd 函数返回一个小于 1 但大于或等于 0 的值。number 的值决定了 Rnd 生成随机数的方式：51Testing软件测试网jU_7nvE:c^
51Testing软件测试网&F'j,t|^-Y \
如果 number 为        Rnd 生成          
Oqp4Z(C.CU0小于零        每次都相同的值，使用 number 作为种子。          
3zY$A9N
W/p
XFd!q0大于零        序列中的下一个随机数。          
H4a5tXr0等于零        最近生成的数。          51Testing软件测试网"L#?2]I`O)c
省略        序列中的下一个随机数。         51Testing软件测试网7Ra5p*vJ
因每一次连续调用 Rnd 函数时都用序列中的前一个数作为下一个数的种子，所以对于任何最初给定的种子都会生成相同的数列。51Testing软件测试网&yx}Y-]9e4B{C
在调用 Rnd 之前，先使用无参数的 Randomize 语句初始化随机数生成器，该生成器具有基于系统计时器的种子。
bIesy\*mp7]0要产生指定范围的随机整数，请使用以下公式：51Testing软件测试网%ym [a3t
Int((upperbound - lowerbound + 1) * Rnd + lowerbound)
3\s$Eg:eV0这里， upperbound 是此范围的上界，而 lowerbound 是此范围内的下界。
|*@*yA;q*qu/Kd0注意   要重复随机数的序列，请在使用数值参数调用 Randomize 之前，立即用负值参数调用 Rnd。使用同样 number 值的 Randomize 不能重复先前的随机数序列。51Testing软件测试网
~ddCE~ p

.Vi;QME(~8S0Randomize 语句
0E;`A.iIi$v'n|y0初始化随机数生成器。
g'NKyg3Urr(W0语法
nmy,w{m/a$w_0Randomize [number]
$p6Fr
pO"g6P1s0可选的 number 参数是 Variant 或任何有效的数值表达式。
DZx/q;L0说明
i[+` \D Ww;V*_0Randomize 用 number 将 Rnd 函数的随机数生成器初始化，该随机数生成器给 number 一个新的种子值。如果省略 number，则用系统计时器返回的值作为新的种子值。
L'c!N O!W%C)t%g0如果没有使用 Randomize，则（无参数的）Rnd 函数使用第一次调用 Rnd 函数的种子值。
.^Hh5rj,K9\ ceA-\0注意 若想得到重复的随机数序列，在使用具有数值参数的 Randomize 之前直接调用具有负参数值的 Rnd。使用具有同样 number 值的 Randomize 是不会得到重复的随机数序列的。51Testing软件测试网}d y7I$?ASU![X1w
Rnd 函数示例
Wr `3N3B Hdg0本示例使用 Rnd 函数随机生成一个 1 到 6 的随机整数。
$K+J-}G
cX3f Q,j(S0本示例用 Randomize 语句初始化随机数生成器。由于忽略了数值参数， 所以 Randomize 用 Timer 函数的返回值作为新的随机数种子值。
AxgA,a$s051Testing软件测试网~oq!^BQ7V
j
Dim MyValue
YE z0pk RY3B\0Randomize   ' 对随机数生成器做初始化的动作。51Testing软件测试网~| H1[7w|w's
51Testing软件测试网Ck]f:J}*c
MyValue = Int((6 * Rnd) + 1)   ' 生成 1 到 6 之间的随机数值。51Testing软件测试网e {fR/V
Split函数
:Dsp&O^Sz JmNb0描述
#kw&d I~8P
}d
z0返回一个下标从零开始的一维数组，它包含指定数目的子字符串。
Ey;B5`o"[9U0语法51Testing软件测试网)^m#@ s8r
^q#HN
Split(expression[, delimiter[, count[, compare]]])51Testing软件测试网q&y:qVF["aX!P
Split函数语法有如下几部分：
O,LrG.[3J051Testing软件测试网:\T)_.|a+x-a](lW
部分        描述          
2K)MSDP0expression        必需的。包含子字符串和分隔符的字符串表达式 。如果expression是一个长度为零的字符串("")，Split则返回一个空数组，即没有元素和数据的数组。          51Testing软件测试网/TjA QfE*ah-cL
delimiter        可选的。用于标识子字符串边界的字符串字符。如果忽略，则使用空格字符(" ")作为分隔符。如果delimiter是一个长度为零的字符串，则返回的数组仅包含一个元素，即完整的 expression字符串。          
[@/h%Tx$Nh0count        可选的。要返回的子字符串数，–1表示返回所有的子字符串。          51Testing软件测试网 L7zg'N$rsys
compare        可选的。数字值，表示判别子字符串时使用的比较方式。关于其值，请参阅“设置值”部分。         51Testing软件测试网 ^)B wKaOeR
51Testing软件测试网9e3\qBGw eTF
设置值
^
\KL)l6Ty0compare参数的设置值如下：
2nk(qF&^*d I p051Testing软件测试网.| Q2qDD4UC/I
常数        值        描述          
@s Xw5_[0^ YA0vbUseCompareOption        –1        用Option Compare语句中的设置值执行比较。          51Testing软件测试网6X,oG,Z p kf
vbBinaryCompare        0        执行二进制比较。          
_T[#b+Zo0vbTextCompare        1        执行文字比较。          
RC5cF4y0vbDatabaseCompare        2        仅用于Microsoft Access。基于您的数据库的信息执行比较。         
9lOof%a8?{0
!| vX3a`4B_`!l[0Replace 函数
0TG~:U#Z%_ s ^'Mt0e0返回字符串，其中指定数目的某子字符串被替换为另一个子字符串。
J9j6k.i.{Hu~0Replace(expression, find, replacewith[, compare[, count[, start]]])
h%Rc)M,K Z0参数
R0MY+@5[0DB0expression
W]"R:Z(f"z'Y9l0必选项。字符串表达式包含要替代的子字符串。51Testing软件测试网U5D T8ZY7BL
Find51Testing软件测试网D+S.a_7a5~j\
必选项。被搜索的子字符串。51Testing软件测试网 p^$K4N:A
Replacewith51Testing软件测试网bg?/W6n8N%y|
必选项。用于替换的子字符串。51Testing软件测试网Ms4Y5B{/ENm1xS
Start
i gcd b-{+o0可选项。expression 中开始搜索子字符串的位置。如果省略，默认值为 1。在和count 关联时必须用51Testing软件测试网[*C-PcW4B
count
`]S
tLa0可选项。执行子字符串替换的数目。如果省略，默认值为 -1，表示进行所有可能的替换。在和 start 关联时必须用。51Testing软件测试网"nJ!k&hi4w
Compare51Testing软件测试网B
tC V`oA KX1[
可选项。指示在计算子字符串时使用的比较类型的数值。有关数值，请参阅“设置”部分。如果省略,缺省值为 0 ,这意味着必须进行二进制比较。51Testing软件测试网t'@M1Z;y o6k2?;yQ{A
设置51Testing软件测试网 k9L9o5l.w
compare 参数可以有以下值：51Testing软件测试网7^ h:OwY.UY)JL
51Testing软件测试网UOxsz
s KW
常数        值        描述          51Testing软件测试网+~MGL~.P\1R
vbBinaryCompare        0        执行二进制比较。          51Testing软件测试网xEOj E
vbTextCompare        1        执行文本比较。         51Testing软件测试网 kH3{&X v/ax?w`
返回值
\&m%m_~"hn0^;O0Replace 返回以下值：
#oG#igK#c6Qc#Q0
xPns{]@I0如果        Replace 返回          51Testing软件测试网
o @u%mP+~C
expression 为零长度        零长度字符串 ("")。          
A }[A#Ua0expression 为 Null        错误。          51Testing软件测试网g3^9Rr2|c5}&J
find 为零长度        expression 的副本。          
1N"|y$c-Ka.q$n.aV7U1M0replacewith 为零长度        expression 的副本，其中删除了所有由 find 参数指定的内容。          51Testing软件测试网$SP:`c2[[F"^
start > Len(expression)        零长度字符串。          51Testing软件测试网G4r+|?o'EjD3\
count 为 0        expression 的副本。         
[G-@w h)e1g0说明51Testing软件测试网b0U KTci$U
Replace 函数的返回值是经过替换（从由 start 指定的位置开始到 expression 字符串的结尾）后的字符串，而不是原始字符串从开始至结尾的副本。51Testing软件测试网n5C(W|(t8O0t
下面的示例利用 Replace 函数返回字符串：51Testing软件测试网 |
K*jeU8R$VZ {
Dim MyString51Testing软件测试网g)T)f-@;vH.Ay!kj
MyString = Replace("XXpXXPXXp", "p", "Y")   '二进制比较从字符串左端开始。返回 "XXYXXPXXY"。
9plM/HO b0e0MyString = Replace("XXpXXPXXp", "p", "Y", '文本比较从第三个字符开始。返回 "YXXYXXY"。3，, -1, 1)
7_WI|:el$K6}%vs!f!h051Testing软件测试网ZY+d#@z;wm
StrComp 函数
Xq6i ILmdx0返回一个表明字符串比较结果的值。51Testing软件测试网-l|2@$] lh6TVA {
StrComp(string1, string2[, compare])51Testing软件测试网(eK1c#~*s\6|
参数
s(~
I%@\i}E)H0string1
o3Z,MUnJQ0必选项。任意有效的字符串表达式。
Vn@_!julsr hb0string2
%U@
D-k/qw0必选项。任意有效的字符串表达式。51Testing软件测试网wf;f+M1lN1`3M*qn9B
Compare
BNe+mzN2R#n1r0可选项。指示在计算字符串时使用的比较类型的数值。如果省略，则执行二进制比较。有关数值，请参阅“设置”部分。51Testing软件测试网,x7?!g(i0P2y X#Q*Q
设置51Testing软件测试网;n8@'|E7Q"k'|K
compare 参数可以有以下值：51Testing软件测试网1l9abe u
51Testing软件测试网!g"U)}%GuEB
常数        值        描述          51Testing软件测试网g y;JMK
vbBinaryCompare        0        执行二进制比较。          51Testing软件测试网Z\!i8c[ E*t
vbTextCompare        1        执行文本比较。         51Testing软件测试网"T!Caf_GY9o$rfFD B
返回值51Testing软件测试网ubL/\ rb y:k
StrComp 函数有以下返回值：
`8o*L-C
^'n6U0
,w @/oU,IG"G0如果        StrComp 返回          
4AR@4o0p0string1 小于 string2        -1          51Testing软件测试网K4yR.Ve^I
string1 等于 string2        0          51Testing软件测试网yQ,h6j |eM0Tm
string1 大于 string2        1          
)o} Rn_+\)a6UgF0string1 或 string2 为 Null        Null         51Testing软件测试网 h*PY Ej _CY'K
说明51Testing软件测试网YUd M{$h
下面的示例利用 StrComp 函数返回字符串比较的结果。如果第三个参数为 1 执行文本比较；如果第三个参数为 0 或者省略执行二进制比较。51Testing软件测试网A!s^%["jQ.Z-x
Dim MyStr1, MyStr2, MyComp
'GS4mU3~s
v(q9`0MyStr1 = "ABCD": MyStr2 = "abcd"   '定义变量。51Testing软件测试网9V&Aw9T,w
MyComp = StrComp(MyStr1, MyStr2, 1)   ' 返回 0。51Testing软件测试网a9r&Gm
c-L:p!z
MyComp = StrComp(MyStr1, MyStr2, 0)   ' 返回 -1。
,Nidj#fc0MyComp = StrComp(MyStr2, MyStr1)   ' 返回 1。
Z'^'f)?i|.`Pf5W#bc%b0
,M%s[&da [9Y g0CInt 函数51Testing软件测试网0oKY%c}8A(V
返回表达式，此表达式已被转换为 Integer 子类型的 Variant。
? {.TVk-n
Mp0CInt(expression)
AL'm{w9C:yq0z0expression 参数是任意有效的表达式。
-m't*z\x(uH0说明51Testing软件测试网1hY;v8?9RoO:j
通常，可以使用子类型转换函数书写代码，以显示某些操作的结果应被表示为特定的数据类型，而不是默认类型。例如，在出现货币、单精度或双精度运算的情况下，使用 CInt 或 CLng 强制执行整数运算。
o }
rR7Vq0D4R0CInt 函数用于进行从其他数据类型到 Integer 子类型的国际公认的格式转换。例如对十进制分隔符（如千分符）的识别，可能取决于系统的区域设置。
4u
r}Rr&rl0如果 expression 在 Integer 子类型可接受的范围之外，则发生错误。
X_a!XE L|a a0下面的示例利用 CInt 函数把值转换为 Integer:
V5sy!P6R9O?0Dim MyDouble, MyInt51Testing软件测试网8L#p7`t/PW|qT1Z,P
MyDouble = 2345.5678      ' MyDouble 是 Double。
t5Nf/t
c%D0MyInt = CInt(MyDouble)    ' MyInt 包含 2346。51Testing软件测试网d5Hh]i
FoQ
g/o
注意   CInt 不同于 Fix 和 Int 函数删除数值的小数部分，而是采用四舍五入的方式。当小数部分正好等于 0.5 时, CInt 总是将其四舍五入成最接近该数的偶数。例如， 0.5 四舍五入为 0, 以及 1.5 四舍五入为 2.51Testing软件测试网B0d1Jhl
q

$p6u5i*p+yeUvT0CStr 函数
wz%R9i2U4s L.LC3D?0返回表达式，该表达式已被转换为 String 子类型的 Variant。51Testing软件测试网H1E-|8Dx
N
CStr(expression)51Testing软件测试网2w2tk-p.OZ
expression 参数是任意有效的表达式。
;[?4Yes0说明51Testing软件测试网h(L2|n-~tJ!y
通常，可以使用子类型转换函数书写代码，以显示某些操作的结果应被表示为特定的数据类型，而不是默认类型。例如，使用 CStr 强制将结果表示为 String。51Testing软件测试网.k;BK*Q L$~f
CStr 函数用于替代 Str 函数来进行从其他数据类型到 String 子类型的国际公认的格式转换。例如对十进制分隔符的识别取决于系统的区域设置。
Pcx.G0M)~x+IG0expression 根据下表决定返回的数据：51Testing软件测试网C!u'Gg o:R
51Testing软件测试网+D$cS?qI_
Z v];bM
如果 expression 为        CStr 返回          51Testing软件测试网.g@p4m2w
Boolean        字符串，包含 True 或 False。          51Testing软件测试网2d e7o6}klE
Date        字符串，包含系统的短日期格式日期。          
n7I&Ms8F}]Q_0Null        运行时错误。          51Testing软件测试网U.c7{a~ m,e5a
Empty        零长度字符串 ("")。          51Testing软件测试网gj^8B{OGE
Error        字符串，包含跟随有错误号码的单词 Error。          51Testing软件测试网Fj9vS5CJ;n;n
其他数值        字符串，包含此数字。         
(Fb3@"~7U6\bq0下面的示例利用 CStr 函数把数字转换为 String:
9i^!n _mZ0Dim MyDouble, MyString
)@L~(A]N9P1h0MyDouble = 437.324         ' MyDouble 是双精度值。
4_YK["}4w0MyString = CStr(MyDouble)  ' MyString 包含 "437.324"。51Testing软件测试网R1@f
O:kAy
51Testing软件测试网3LA#I@)P*Hm
LCase 函数
y*K'_(E2hX7C0返回字符串的小写形式。
|qn[3~ZS+o*x0LCase(string)51Testing软件测试网4^3i(K B bO/I+S
string 参数是任意有效的字符串表达式。如果 string 参数中包含 Null，则返回 Null。
%j:^o0A&l iy0说明
N\-B Ep;E/e(C%a0仅大写字母转换成小写字母；所有小写字母和非字母字符保持不变。51Testing软件测试网m/z `}IE9p@h,t1h u
51Testing软件测试网V;rE%h@W$@q"Q
下面的示例利用 LCase 函数把大写字母转换为小写字母：51Testing软件测试网+V5Z i-K7J_T
Dim MyString51Testing软件测试网T4G6@-c{iK
Dim LCaseString
#Sxn?2B3{JT0MyString = "VBscrīpt"
a0gcTK D,L!~}#TY0LCaseString = LCase(MyString)   ' LCaseString 包含 "vbscrīpt"。
5h2UjW2_1L/r { HZ0UCase 函数51Testing软件测试网%j%H&J
OR8q.r
返回字符串的大写形式。51Testing软件测试网G.m^)B:qH
UCase(string)51Testing软件测试网sp0Y"Q~3B-m1J
string 参数是任意有效的字符串表达式。如果 string 参数中包含 Null，则返回 Null。51Testing软件测试网q]wsI1l
说明51Testing软件测试网#p2^&|SN(a
只有小写字母被转换成大写字母；所有大写字母和非字母字符均保持不变。51Testing软件测试网@m?H'n
下面的示例利用 UCase 函数返回字符串的大写形式：51Testing软件测试网 vS0Q z.m:cB^K&@:|
Dim MyWord

\&g5it#]N;c0MyWord = UCase("Hello World")   ' 返回"HELLO WORLD"。
d
{*A2C,O0}*ES0
[rB&l(_y)P\;K0MsgBox 函数
7V^8K0]v
C0在对话框中显示消息，等待用户单击按钮，并返回一个值指示用户单击的按钮。
7jPgSU|)L!r G0MsgBox(prompt[, buttons][, title][, helpfile, context])
4i;Y)Ss _L0参数51Testing软件测试网:]A9Kj]-z^v.BE
prompt
m K!F
U%`#w6`v0作为消息显示在对话框中的字符串表达式。prompt 的最大长度大约是 1024 个字符，这取决于所使用的字符的宽度。如果 prompt 中包含多个行，则可在各行之间用回车符 (Chr(13))、换行符 (Chr(10)) 或回车换行符的组合 (Chr(13) & Chr(10)) 分隔各行。51Testing软件测试网\F
ab9J,P `
Buttons51Testing软件测试网}uNGK*@m
数值表达式，是表示指定显示按钮的数目和类型、使用的图标样式，默认按钮的标识以及消息框样式的数值的总和。有关数值，请参阅“设置”部分。如果省略，则 buttons 的默认值为 0。51Testing软件测试网H7TCAd,a*BL
Title51Testing软件测试网A~ E$x-x
Ks]P
显示在对话框标题栏中的字符串表达式。如果省略 title，则将应用程序的名称显示在标题栏中。
hT
[OxF,^0Helpfile51Testing软件测试网6C7~\;ZA!L p&o
字符串表达式，用于标识为对话框提供上下文相关帮助的帮助文件。如果已提供 helpfile，则必须提供 context。在 16 位系统平台上不可用。
/g#yT[3v}ly0Context51Testing软件测试网e!L$q3V9n"k Y1c-R
数值表达式，用于标识由帮助文件的作者指定给某个帮助主题的上下文编号。如果已提供 context，则必须提供 helpfile。在 16 位系统平台上不可用。
!G)A
zHNY%k5m;b,}6m0设置51Testing软件测试网p'r:H3C s KJE
buttons 参数可以有以下值：
1O&zL!F~"c0
.w/Aowc0常数        值        描述          51Testing软件测试网!g.t:tL2u;j0?EK
vbOKOnly        0        只显示确定按钮。          51Testing软件测试网`.h+\]0O I
vbOKCancel        1        显示确定和取消按钮。          
)F2O!ZW/R5[*q0vbAbortRetryIgnore        2        显示放弃、重试和忽略按钮。          51Testing软件测试网 r b;?Y }
K
vbYesNoCancel        3        显示是、否和取消按钮。          51Testing软件测试网6NR7E5P0wOR[q
j4z
vbYesNo        4        显示是和否按钮。          51Testing软件测试网pn+Ktv?n6K
vbRetryCancel        5        显示重试和取消按钮。          51Testing软件测试网2IX&J-@!vE"R7M {
vbCritical        16        显示临界信息图标。          51Testing软件测试网7ueaof
vbQuestion        32        显示警告查询图标。          51Testing软件测试网/R#k&zn'A-@ ?#^
vbExclamation        48        显示警告消息图标。          51Testing软件测试网&A`Rp([[6A
vbInformation        64        显示信息消息图标。          
U;Nx)l$ZY1o0vbDefaultButton1        0        第一个按钮为默认按钮。          
"df#Fw^T*Lg0vbDefaultButton2        256        第二个按钮为默认按钮。          51Testing软件测试网o5f O#DG%BW
vbDefaultButton3        512        第三个按钮为默认按钮。          
QAGKE-d a%j2l0vbDefaultButton4        768        第四个按钮为默认按钮。          51Testing软件测试网|*W:m&Dyyr3A\W`
t
vbApplicationModal        0        应用程序模式：用户必须响应消息框才能继续在当前应用程序中工作。          51Testing软件测试网UwH:Zi\3kN1C8s
vbSystemModal        4096        系统模式：在用户响应消息框前，所有应用程序都被挂起。         
i{x/m3k7V Ec0第一组值 (0 - 5) 用于描述对话框中显示的按钮类型与数目；第二组值 (16, 32, 48, 64) 用于描述图标的样式；第三组值 (0, 256, 512) 用于确定默认按钮；而第四组值 (0, 4096) 则决定消息框的样式。在将这些数字相加以生成 buttons 参数值时，只能从每组值中取用一个数字。
u(C*\Lh/Hn6]2wi0返回值51Testing软件测试网2s0Fh|yR0Hl
MsgBox 函数有以下返回值：51Testing软件测试网j6H7z ~:aa-|


V?'U0^#yc!hVjj H0常数        值        按钮          51Testing软件测试网1jU\
|JSup@ H
vbOK        1        确定          
9`'A.]CZSHq$o|0vbCancel        2        取消          
2Rf:J/{8WLyv0vbAbort        3        放弃          51Testing软件测试网VLpzQ1KE d
vbRetry        4        重试          51Testing软件测试网~ J;_@%lj(]
vbIgnore        5        忽略          51Testing软件测试网8e;oSa;_
vbYes        6        是          
8Gw!wt6x0vbNo        7        否         
[ |(Y r1Lc!P0说明
iwSORX0如果同时提供了 helpfile 和 context，则用户可以按 F1 键以查看与上下文相对应的帮助主题。51Testing软件测试网hW4bLjN2hdD
如果对话框显示取消按钮，则按 ESC 键与单击取消的效果相同。如果对话框包含帮助按钮，则有为对话框提供的上下文相关帮助。但是在单击其他按钮之前，不会返回任何值。51Testing软件测试网"{)FbsE
当MicroSoft Internet Explorer使用MsgBox函数时，任何对话框的标题总是包含"VBscrīpt",以便于将其与标准对话框区别开来。
/IE| sy8UK0下面的例子演示了 MsgBox 函数的用法：51Testing软件测试网%h_ J[z i;T0Y
Dim MyVar
EcAn0V5t0MyVar = MsgBox ("Hello World!", 65, "MsgBox Example")
2At2bX.P:Af"CM]0   ' MyVar 包含 1 或 2，这取决于单击的是哪个按钮。