QTP中常用的VBS函数

转自：http://bbs.51testing.com/thread-116486-1-1.html51Testing软件测试网 LyL9a5\1L_

`Z m&Q"Fc0Left 函数51Testing软件测试网K|.o
u/K:m#ER
返回 Variant (String)，其中包含字符串中从左边算起指定数量的字符。51Testing软件测试网St;n(mF di
语法51Testing软件测试网GG{b&jP
Left(string, length)51Testing软件测试网 f!s AC8V6s@&W
Left 函数的语法有下面的命名参数：
IjJ0QM
oO c051Testing软件测试网*t*B3?
D(sV
部分        说明          
4`DOy)R SN!D*o0string        必要参数。字符串表达式其中最左边的那些字符将被返回。如果 string 包含 Null，将返回 Null。          
3pU W7?O _A0length        必要参数；为 Variant (Long)。数值表达式，指出将返回多少个字符。如果为 0，返回零长度字符串 ("")。如果大于或等于 string 的字符数，则返回整个字符串。         

A%i/CQW{ [7\9PA051Testing软件测试网#Rb`?4W u&?5[J SU
说明
3Xv{O6B)s)o*u v0欲知 string 的字符数，使用 Len 函数。51Testing软件测试网9lA%lf^
注意    LeftB 函数作用于包含在字符串中的字节数据。所以 length 指定的是字节数，而不是要返回的字符数。51Testing软件测试网A/o|7YOM
51Testing软件测试网spu9Slv
51Testing软件测试网,c
cMF&G]9n
Mid 函数51Testing软件测试网Z~A|.K!_9zUT,h
从字符串中返回指定数目的字符。
W1VwvQrDN0{0Mid(string, start[, length])
/G9f&Yw0H6|5vB h0参数
7c5z+P~D"q+z1u0string51Testing软件测试网/tD^2\#|f
字符串表达式，从中返回字符。如果 string 包含 Null，则返回 Null。
h`~+B,G)m%g&@\7K;D0Start51Testing软件测试网:w:m P4E`UV\7^6_
string 中被提取的字符部分的开始位置。如果 start 超过了 string 中字符的数目，Mid 将返回零长度字符串 ("")。51Testing软件测试网R Rw+TZ9m$\[
Length51Testing软件测试网cN
]&r*aV
要返回的字符数。如果省略或 length 超过文本的字符数（包括 start 处的字符），将返回字符串中从 start 到字符串结束的所有字符。51Testing软件测试网){'{OnP;S|?QQq
说明51Testing软件测试网_
j&~zBL&{ K
要判断 string 中字符的数目，可使用 Len 函数。51Testing软件测试网'E,iq&a]-I1]8f
下面的示例利用 Mid 函数返回字符串中从第四个字符开始的六个字符：51Testing软件测试网hCf9p4wK4On1q:D%B
Dim MyVar
S
f_5G Bj6j"Sa0MyVar = Mid("VB脚本is fun!", 4, 6) 'MyVar 包含 "scrīpt"。
j8JD:NV\0注意   MidB 函数与包含在字符串中的字节数据一起使用。其参数不是指定字符数，而是字节数。
8dm)P-k p#F!O
f0
:V8^ Fl)BotYp8z0Len 函数
#L9u9o3X6N*ia.z0返回字符串内字符的数目，或是存储一变量所需的字节数。51Testing软件测试网$r*W-b'L
A+r#z"u
Len(string | varname)
?g"zSQ0OF0参数
9r9H4N3mJl a
w F0string51Testing软件测试网D!SA2X~3ZV
任意有效的字符串表达式。如果 string 参数包含 Null，则返回 Null。51Testing软件测试网x_D3yVr
Varname
*T?eJp'b0任意有效的变量名。如果 varname 参数包含 Null，则返回 Null。51Testing软件测试网%Z4TS6m7D4i
说明51Testing软件测试网8bq p-UD
下面的示例利用 Len 函数返回字符串中的字符数目：
nrs#iOM;F2Zh0Dim MyString51Testing软件测试网W9B;kR7p1K
MyString = Len("VBscrīpt") 'MyString 包含 8。51Testing软件测试网R I%Nr9gq
注意   LenB 函数与包含在字符串中的字节数据一起使用。LenB 不是返回字符串中的字符数，而是返回用于代表字符串的字节数。
0v$C1Iej051Testing软件测试网_9{P`:iJ;y
Right 函数51Testing软件测试网"sX']:FH0hu2O1P[
从字符串右边返回指定数目的字符。51Testing软件测试网 H"HU8EH6X4}7Dr
Right(string, length)
"O-}/V5FP"U0参数51Testing软件测试网a-B1nEO!u*q?}'fOz
string51Testing软件测试网-z UH&^kB
字符串表达式，其最右边的字符被返回。如果 string 参数中包含 Null，则返回 Null。51Testing软件测试网w5n]1W_ o
Length51Testing软件测试网}&v-r$h;]
^)v
数值表达式，指明要返回的字符数目。如果为 0，返回零长度字符串；如果此数大于或等于 string 参数中的所有字符数目，则返回整个字符串。51Testing软件测试网aN NT;BI@
说明
HavL)g/d+C0要确定 string 参数中的字符数目，使用 Len 函数。
~A3D8l5k0下面的示例利用 Right 函数从字符串右边返回指定数目的字符：
} H:p:GM0Dim AnyString, MyStr51Testing软件测试网n:c v:Wbu)]'Cd
AnyString = "Hello World"      ' 定义字符串。51Testing软件测试网LJIKgyq-f
MyStr = Right(AnyString, 1)    ' 返回 "d"。51Testing软件测试网g#t9d/[#K*K
MyStr = Right(AnyString, 6)    ' 返回 " World"。51Testing软件测试网.`b$ZL N
MyStr = Right(AnyString, 20)   ' 返回 "Hello World"。51Testing软件测试网:Q^8tJh3I*s
注意   RightB 函数用于字符串中的字节数据，length 参数指定返回的是字节数目，而不是字符数目。

]MX
OW0
7NH%[,?+}s
},r0InStr 函数51Testing软件测试网
U*Ou9V"k:G/a;p
返回某字符串在另一字符串中第一次出现的位置。
C4n d v1UG*k0InStr([start, ]string1, string2[, compare])
0C+h-td2tJTM)m0参数
Ey*Xo/Wf0start51Testing软件测试网
dq-XY&U G%K4k
可选项。数值表达式，用于设置每次搜索的开始位置。如果省略，将从第一个字符的位置开始搜索。如果 start 包含 Null，则会出现错误。如果已指定 compare，则必须要有 start 参数。51Testing软件测试网q\T9\%{sX9A1l#z
string1
E&Ye,{+N0CF0必选项。接受搜索的字符串表达式。51Testing软件测试网R]7| jw-@1M+O:uF?
string2
0a[[F7PJ4Gn+d0必选项。要搜索的字符串表达式。
.[6EP!My#xrX0compare
^ BjBH4b EBF)C0可选项。指示在计算子字符串时使用的比较类型的数值。有关数值，请参阅“设置”部分。如果省略，将执行二进制比较。
;[(utu:Z3z#F0设置
jTk[T4kq0compare 参数可以有以下值：
7\+F4L#p:N8k8xz051Testing软件测试网
i mt~,dj
常数        值        描述          
-u2{4hP&xn0vbBinaryCompare        0        执行二进制比较。          
5[u4k(^l4Xx1_As0vbTextCompare        1        执行文本比较。         
aJ#uTl?O0KT^0返回值
9ir r:~Z)Fa0InStr 函数返回以下值：
@,b(qO4wF051Testing软件测试网XC8t;I8T
如果        InStr 返回          51Testing软件测试网(D%Q7Z"[EkL
string1 为零长度        0          
Q*A*Qh[ i0string1 为 Null        Null          
-|5Y w/spV2] P:\0string2 为零长度        start          
m'maT tG0string2 为 Null        Null          
*n/{t1x,@v%n J0string2 没有找到        0          
J RO/m(Z wI:u0在 string1 中找到 string2        找到匹配字符串的位置          51Testing软件测试网0I V~-H*\
start > Len(string2)        0         
F1N%p)N,I cur0说明51Testing软件测试网0oH%A1Ph!Ak%d
下面的示例利用 InStr 搜索字符串：
3G}K*w;`2|0Dim SearchString, SearchChar, MyPos51Testing软件测试网b h(ClH7t$Y _'b
SearchString ="XXpXXpXXPXXP"   ' 要搜索的字符串。51Testing软件测试网JG{kVLA
SearchChar = "P"   ' Search for "P".51Testing软件测试网Ft%e%cE~?8Z
MyPos = Instr(4, SearchString, SearchChar, 1)   ' 在位置 4 进行的文本比较。返回 6。
:a:r9w eX!l0MyPos = Instr(1, SearchString, SearchChar, 0)   ' 在位置 1 进行的二进制比较。返回 9。
}*tXf7S[
{yPos = Instr(SearchString, SearchChar)   ' 默认情况下，进行的是二进制比较（省略了最后的参数）。返回 9。51Testing软件测试网1nrO+^,Fd
MyPos = Instr(1, SearchString, "W")   ' 在位置 1 进行的二进制比较。返回 0（找不到 "W"）。51Testing软件测试网PB&Hmg)d
注意   InStrB 函数使用包含在字符串中的字节数据，所以 InStrB 返回的不是一个字符串在另一个字符串中第一次出现的字符位置，而是字节位置。
iis!zR}0
D5zOE!O#r0LTrim、RTrim与 Trim 函数
)D s4p x8[)edu0返回不带前导空格 (LTrim)、后续空格 (RTrim) 或前导与后续空格 (Trim) 的字符串副本。51Testing软件测试网f B0HAJ/b,y*}Xb
LTrim(string)51Testing软件测试网T5[x6F&~V;b4W2v
RTrim(string)51Testing软件测试网 x8Px1b&]:MW_
Trim(string)
a;me*~-{4K0string 参数是任意有效的字符串表达式。如果 string 参数中包含 Null，则返回 Null。
(b:B9pv&T)B-q0说明
{/N1Y olU0下面的示例利用 LTrim, RTrim, 和 Trim 函数分别用来除去字符串开始的空格、尾部空格、 开始和尾部空格：51Testing软件测试网\ gW{~@'I6r
Dim MyVar51Testing软件测试网?x8yvu'lu
MyVar = LTrim("   vbscrīpt ")   'MyVar 包含 "vbscrīpt "。51Testing软件测试网1r$a!vl P
MyVar = RTrim("   vbscrīpt ")   'MyVar 包含 "   vbscrīpt"。51Testing软件测试网qBYKJ+^(y
MyVar = Trim("   vbscrīpt ")   'MyVar 包含 "vbscrīpt"。51Testing软件测试网IeCn#N
51Testing软件测试网I;{;l%j#\5\)`4c
P9e
Rnd 函数51Testing软件测试网,?Cdx:@/L,hR
返回一个随机数。51Testing软件测试网PG/kC|
Rnd[(number)]
0o%x8unpf0number 参数可以是任意有效的数值表达式。
zWCbz)} o{0说明51Testing软件测试网,Aq2dcXWc+[~ON
Rnd 函数返回一个小于 1 但大于或等于 0 的值。number 的值决定了 Rnd 生成随机数的方式：51Testing软件测试网 Y*]D*a:s!paE
51Testing软件测试网 K;{W~&m F9@Yj
如果 number 为        Rnd 生成          51Testing软件测试网BN:hZ:{O4_g+Zc
小于零        每次都相同的值，使用 number 作为种子。          51Testing软件测试网tdah2^(I"K3C8}
大于零        序列中的下一个随机数。          
tD ]7wC~k}0等于零        最近生成的数。          51Testing软件测试网6} ^*b`zmX^i3C
省略        序列中的下一个随机数。         51Testing软件测试网BUhoQ)xp!VI
因每一次连续调用 Rnd 函数时都用序列中的前一个数作为下一个数的种子，所以对于任何最初给定的种子都会生成相同的数列。51Testing软件测试网u2`{6q'oGR0S
在调用 Rnd 之前，先使用无参数的 Randomize 语句初始化随机数生成器，该生成器具有基于系统计时器的种子。51Testing软件测试网"d-G] ^8glk#`3Y
要产生指定范围的随机整数，请使用以下公式：51Testing软件测试网R+N\U^7k3g:L
Int((upperbound - lowerbound + 1) * Rnd + lowerbound)51Testing软件测试网Bm^T0HI*O_ qp
这里， upperbound 是此范围的上界，而 lowerbound 是此范围内的下界。51Testing软件测试网p2z9HXEBZJ
Ul
注意   要重复随机数的序列，请在使用数值参数调用 Randomize 之前，立即用负值参数调用 Rnd。使用同样 number 值的 Randomize 不能重复先前的随机数序列。
{!@"|:~`HO)^0
;~?#toQ!a2U(s\ k0Randomize 语句
\c6@\N gv7sqZ0初始化随机数生成器。
5t.R2gGM0语法51Testing软件测试网*Uj P@SAg4}0L
Randomize [number]
b8f~0TfN3M0可选的 number 参数是 Variant 或任何有效的数值表达式。
{!|?q7gy0说明51Testing软件测试网x/rS'i n+Ud9r#y
Randomize 用 number 将 Rnd 函数的随机数生成器初始化，该随机数生成器给 number 一个新的种子值。如果省略 number，则用系统计时器返回的值作为新的种子值。51Testing软件测试网6I:]4Y*?7u%J8CI`4D
如果没有使用 Randomize，则（无参数的）Rnd 函数使用第一次调用 Rnd 函数的种子值。51Testing软件测试网5`(@ o#[3]
注意 若想得到重复的随机数序列，在使用具有数值参数的 Randomize 之前直接调用具有负参数值的 Rnd。使用具有同样 number 值的 Randomize 是不会得到重复的随机数序列的。51Testing软件测试网-Q!]j$g&v8J0wq c9A
Rnd 函数示例51Testing软件测试网6^m,sA a{c
本示例使用 Rnd 函数随机生成一个 1 到 6 的随机整数。
VRF2zn0本示例用 Randomize 语句初始化随机数生成器。由于忽略了数值参数， 所以 Randomize 用 Timer 函数的返回值作为新的随机数种子值。
#d3m!sNtd051Testing软件测试网!\*Kh#B(N/a'yr] P
Dim MyValue
o8X!~
R1q|"L0Randomize   ' 对随机数生成器做初始化的动作。
,m F
e?9x!dt;Mh0
6R+n!gCQ5Bo0MyValue = Int((6 * Rnd) + 1)   ' 生成 1 到 6 之间的随机数值。
3^,c4H)r#W_p*hv0Split函数
6LaN jW+?FN0描述51Testing软件测试网;]@I1Z*h9?:\vb
返回一个下标从零开始的一维数组，它包含指定数目的子字符串。
W I|*y I(S0语法51Testing软件测试网]D-G[G*MZ
Split(expression[, delimiter[, count[, compare]]])51Testing软件测试网C b3dzh'n
Split函数语法有如下几部分：51Testing软件测试网4TZrv1^*N z

ytfJ,HGe+l0部分        描述          51Testing软件测试网FujPg,T*ng
T
expression        必需的。包含子字符串和分隔符的字符串表达式 。如果expression是一个长度为零的字符串("")，Split则返回一个空数组，即没有元素和数据的数组。          51Testing软件测试网BL0F!e|3@X-cP
delimiter        可选的。用于标识子字符串边界的字符串字符。如果忽略，则使用空格字符(" ")作为分隔符。如果delimiter是一个长度为零的字符串，则返回的数组仅包含一个元素，即完整的 expression字符串。          
$q0q7UlZY6U u!Zi/c^0count        可选的。要返回的子字符串数，–1表示返回所有的子字符串。          
%y%{F+k-Y?D0compare        可选的。数字值，表示判别子字符串时使用的比较方式。关于其值，请参阅“设置值”部分。         51Testing软件测试网x5BJpN3?] K

+d
hC3eq4YR%\PNH0设置值51Testing软件测试网_ZrM3ML a_ms
compare参数的设置值如下：
_ F(uWe cYY0
m:cm.MwPd5l0常数        值        描述          
iCp9K/U1g2| nc0vbUseCompareOption        –1        用Option Compare语句中的设置值执行比较。          51Testing软件测试网C.E(WfbWO
vbBinaryCompare        0        执行二进制比较。          51Testing软件测试网i)z5M8y]6M
vbTextCompare        1        执行文字比较。          
e8V#b
z9h&f3|0vbDatabaseCompare        2        仅用于Microsoft Access。基于您的数据库的信息执行比较。         51Testing软件测试网!Id0a5P;L5w _
51Testing软件测试网4~jJ"M2v
Replace 函数
'V!P7au+BF{'?CSl0返回字符串，其中指定数目的某子字符串被替换为另一个子字符串。51Testing软件测试网"RGxy3\0U
Replace(expression, find, replacewith[, compare[, count[, start]]])
%g(W.E*{'i$O%Dg_0参数51Testing软件测试网Hkgs+K?
expression51Testing软件测试网 HDO/|I O'FHT,u
必选项。字符串表达式包含要替代的子字符串。51Testing软件测试网#WY3i-p8Pk3M[3i;_
Find
~p'NB)p5C'p,l0必选项。被搜索的子字符串。51Testing软件测试网kDv6N9]7r0}s a'i
Replacewith51Testing软件测试网~#K1WhE I `'c
必选项。用于替换的子字符串。51Testing软件测试网5oz+zf|
Start51Testing软件测试网:wK%z [5E
可选项。expression 中开始搜索子字符串的位置。如果省略，默认值为 1。在和count 关联时必须用51Testing软件测试网$C9q{3dw
count51Testing软件测试网/ME%l:W Q
可选项。执行子字符串替换的数目。如果省略，默认值为 -1，表示进行所有可能的替换。在和 start 关联时必须用。51Testing软件测试网)CYR"j.X
Compare
1EJnN.@0可选项。指示在计算子字符串时使用的比较类型的数值。有关数值，请参阅“设置”部分。如果省略,缺省值为 0 ,这意味着必须进行二进制比较。51Testing软件测试网W#G~(B2N/x(q
设置51Testing软件测试网&eX?-a)u6Z+y E
compare 参数可以有以下值：
V^2B#T6J/eS0
4U+SU/Z
Xne3R0常数        值        描述          51Testing软件测试网 O&g}qt9`(|;~4x
vbBinaryCompare        0        执行二进制比较。          
0k4r7SY u iF \0vbTextCompare        1        执行文本比较。         
.N$bA5]+fAP0返回值
a&{r c4L:CNnB9R0Replace 返回以下值：
9P+}h]&\G&msh051Testing软件测试网aktZ(Ib
如果        Replace 返回          51Testing软件测试网,} KptU4p2v
expression 为零长度        零长度字符串 ("")。          51Testing软件测试网2Xnr
_C;AW v5O
expression 为 Null        错误。          
R"C,wE+l0find 为零长度        expression 的副本。          
2J'YC:Or
mA8~pU0replacewith 为零长度        expression 的副本，其中删除了所有由 find 参数指定的内容。          51Testing软件测试网:^1\"y:S5wy T7l[
start > Len(expression)        零长度字符串。          51Testing软件测试网%@P6C7I;{
count 为 0        expression 的副本。         
E!T6t8x B0说明51Testing软件测试网%Z[_KY;w
C;B7JY
Replace 函数的返回值是经过替换（从由 start 指定的位置开始到 expression 字符串的结尾）后的字符串，而不是原始字符串从开始至结尾的副本。
B D/hge[1x0下面的示例利用 Replace 函数返回字符串：
;F3g;}y%a%OE/bQ#j0Dim MyString51Testing软件测试网WN(L$LYaQ
MyString = Replace("XXpXXPXXp", "p", "Y")   '二进制比较从字符串左端开始。返回 "XXYXXPXXY"。51Testing软件测试网i,H^]@V;G8_
MyString = Replace("XXpXXPXXp", "p", "Y", '文本比较从第三个字符开始。返回 "YXXYXXY"。3，, -1, 1)
s'IR!C3?v@051Testing软件测试网*qUzGne B|
StrComp 函数
-wMU%eAZdY0返回一个表明字符串比较结果的值。
)z\ ZgDVXg0StrComp(string1, string2[, compare])51Testing软件测试网 U+rKg(`a
参数

`R}'A}C%d*v0string151Testing软件测试网 wAAcb-X2L;Z-W
必选项。任意有效的字符串表达式。51Testing软件测试网 @`}U(a'I4m%x;O1W
string2
$q,^%i9DI2`9Z$k!g0必选项。任意有效的字符串表达式。

C OE(u1v0Compare
C#IE5a8K8L4a0可选项。指示在计算字符串时使用的比较类型的数值。如果省略，则执行二进制比较。有关数值，请参阅“设置”部分。51Testing软件测试网Tf-`.jM6S
设置
&|Y,\Az1A0compare 参数可以有以下值：51Testing软件测试网5nd*F ^r-V2~
51Testing软件测试网4N&UbR)V-Hq8m0Mo
常数        值        描述          51Testing软件测试网;L*itLP2a3HM
vbBinaryCompare        0        执行二进制比较。          51Testing软件测试网G-b t']I:X+FM{
vbTextCompare        1        执行文本比较。         
q+d;N2sO0返回值51Testing软件测试网{+Q][\7os^
StrComp 函数有以下返回值：
$^!B'M)Xx
{0
1j5Sx.m}1Y1K0如果        StrComp 返回          51Testing软件测试网^^sPw|(_
string1 小于 string2        -1          

?!L'r-w J.g_8?W0string1 等于 string2        0          
4D.Xdz"`0string1 大于 string2        1          
0`,op\:Y0string1 或 string2 为 Null        Null         51Testing软件测试网&PB-I _0K-^-|
说明51Testing软件测试网kP0]:\-D?;m.x E
下面的示例利用 StrComp 函数返回字符串比较的结果。如果第三个参数为 1 执行文本比较；如果第三个参数为 0 或者省略执行二进制比较。51Testing软件测试网Xr(k9QQQv
Dim MyStr1, MyStr2, MyComp
'Y UP6N(TX0MyStr1 = "ABCD": MyStr2 = "abcd"   '定义变量。51Testing软件测试网"a3i?Ol |fT+o
MyComp = StrComp(MyStr1, MyStr2, 1)   ' 返回 0。51Testing软件测试网 Kb5I ?-v|ol
MyComp = StrComp(MyStr1, MyStr2, 0)   ' 返回 -1。
l'Lo4zE!W nVM0MyComp = StrComp(MyStr2, MyStr1)   ' 返回 1。51Testing软件测试网PG)g7eDQ?J`1O5sG

N;{,|:tT_q,J0CInt 函数
8z3G!V ELrM0返回表达式，此表达式已被转换为 Integer 子类型的 Variant。
&J#w,U;Cc/C0CInt(expression)51Testing软件测试网"o Y#G]B
HT
expression 参数是任意有效的表达式。51Testing软件测试网5~L7ZD4Mw+Arm1r8v
说明51Testing软件测试网M^DE@
通常，可以使用子类型转换函数书写代码，以显示某些操作的结果应被表示为特定的数据类型，而不是默认类型。例如，在出现货币、单精度或双精度运算的情况下，使用 CInt 或 CLng 强制执行整数运算。
k:J.YS IcJ3~0CInt 函数用于进行从其他数据类型到 Integer 子类型的国际公认的格式转换。例如对十进制分隔符（如千分符）的识别，可能取决于系统的区域设置。51Testing软件测试网Q0[1ZG5tr
如果 expression 在 Integer 子类型可接受的范围之外，则发生错误。51Testing软件测试网f2Z N\L0a7U;~
下面的示例利用 CInt 函数把值转换为 Integer:

Ei.^i7H,M0Dim MyDouble, MyInt
]b#o5\%J0L.P\%e0MyDouble = 2345.5678      ' MyDouble 是 Double。51Testing软件测试网#W$Z-R'c3ZjjU
MyInt = CInt(MyDouble)    ' MyInt 包含 2346。
-s+^%xLJ#X2w0注意   CInt 不同于 Fix 和 Int 函数删除数值的小数部分，而是采用四舍五入的方式。当小数部分正好等于 0.5 时, CInt 总是将其四舍五入成最接近该数的偶数。例如， 0.5 四舍五入为 0, 以及 1.5 四舍五入为 2.51Testing软件测试网rhwk9[p&w9^
51Testing软件测试网9r*@1Y7n$m;c
CStr 函数51Testing软件测试网b8eh?|9_9s
返回表达式，该表达式已被转换为 String 子类型的 Variant。
gvF!Z5d+ilkx0CStr(expression)
zP
^"A"M1V0n0expression 参数是任意有效的表达式。
~t&?vjr#h3H8Ov0说明
5|9lZaH| o]/f0通常，可以使用子类型转换函数书写代码，以显示某些操作的结果应被表示为特定的数据类型，而不是默认类型。例如，使用 CStr 强制将结果表示为 String。
(Yu5e)[2^ n0CStr 函数用于替代 Str 函数来进行从其他数据类型到 String 子类型的国际公认的格式转换。例如对十进制分隔符的识别取决于系统的区域设置。
$]c0f;[/ljs0expression 根据下表决定返回的数据：51Testing软件测试网4\F9mxl4XT1|

~EE7oPF0iuUrw-R0如果 expression 为        CStr 返回          51Testing软件测试网)M*~ Q"W+Z qU*W
Boolean        字符串，包含 True 或 False。          51Testing软件测试网3b9ZRl^5A4E
Date        字符串，包含系统的短日期格式日期。          51Testing软件测试网bWqt [sX-v
Null        运行时错误。          51Testing软件测试网/@#g`#AEVw
Empty        零长度字符串 ("")。          51Testing软件测试网&LaId4^p'bo
Error        字符串，包含跟随有错误号码的单词 Error。          51Testing软件测试网SK]~K:}}
其他数值        字符串，包含此数字。         51Testing软件测试网#zrBh3N*J7kS
下面的示例利用 CStr 函数把数字转换为 String:51Testing软件测试网`'xI }&|*[],V
Dim MyDouble, MyString51Testing软件测试网e,Uu1k,gGd&v)A
MyDouble = 437.324         ' MyDouble 是双精度值。
AC'a^N}%t;E0MyString = CStr(MyDouble)  ' MyString 包含 "437.324"。51Testing软件测试网K k5G%H,y

]-O7j.]Qx7w:}K0LCase 函数51Testing软件测试网N(f4\OF4sVV
返回字符串的小写形式。
Ry+|3t;j%H0LCase(string)51Testing软件测试网 ]Id} J
eO%X[
string 参数是任意有效的字符串表达式。如果 string 参数中包含 Null，则返回 Null。51Testing软件测试网` n5BN1H$^Q6Q6b-p
说明
/T"f-r3[,[t%m3n0仅大写字母转换成小写字母；所有小写字母和非字母字符保持不变。51Testing软件测试网*lg:RZtT#Fv
51Testing软件测试网Es/n6sQG u
下面的示例利用 LCase 函数把大写字母转换为小写字母：
a6`.VO8EM0Dim MyString51Testing软件测试网3J.xG)}W
Dim LCaseString51Testing软件测试网9GihT*? u d*G]
MyString = "VBscrīpt"51Testing软件测试网[!q2mWj
z:b6n%Z
LCaseString = LCase(MyString)   ' LCaseString 包含 "vbscrīpt"。
!sq8f/j7r7o@ T0UCase 函数
#Vg5egO$D"|'F cqk0返回字符串的大写形式。
O'r-A0yq#kEf#ZT0UCase(string)51Testing软件测试网pB]%d.H4~h-d
string 参数是任意有效的字符串表达式。如果 string 参数中包含 Null，则返回 Null。51Testing软件测试网z/avx3B8M
说明
9zr/qs*g0@0只有小写字母被转换成大写字母；所有大写字母和非字母字符均保持不变。51Testing软件测试网n4ZDk8|
下面的示例利用 UCase 函数返回字符串的大写形式：
-WH6N;_3J0SG!A0Dim MyWord51Testing软件测试网 {C"e:k
^ Lx'N*L
MyWord = UCase("Hello World")   ' 返回"HELLO WORLD"。51Testing软件测试网v J$o7b)X(C^.e,m

"}px-j} @0MsgBox 函数51Testing软件测试网b*c0B[)OO'S5[O7C
在对话框中显示消息，等待用户单击按钮，并返回一个值指示用户单击的按钮。
rP+\o
J+?3]0MsgBox(prompt[, buttons][, title][, helpfile, context])51Testing软件测试网pa ~)@~!z}
参数51Testing软件测试网(mN/f(s?s
prompt
vJ!XJ!n$d2WAL{0作为消息显示在对话框中的字符串表达式。prompt 的最大长度大约是 1024 个字符，这取决于所使用的字符的宽度。如果 prompt 中包含多个行，则可在各行之间用回车符 (Chr(13))、换行符 (Chr(10)) 或回车换行符的组合 (Chr(13) & Chr(10)) 分隔各行。51Testing软件测试网OXg/\O"HS M^
Buttons
MDM%h9A6^}0数值表达式，是表示指定显示按钮的数目和类型、使用的图标样式，默认按钮的标识以及消息框样式的数值的总和。有关数值，请参阅“设置”部分。如果省略，则 buttons 的默认值为 0。
o-\N/Prpsp)h0Title
zZ&kh2`_2X0显示在对话框标题栏中的字符串表达式。如果省略 title，则将应用程序的名称显示在标题栏中。51Testing软件测试网ai
S#Cl
Helpfile51Testing软件测试网
fiX wv
字符串表达式，用于标识为对话框提供上下文相关帮助的帮助文件。如果已提供 helpfile，则必须提供 context。在 16 位系统平台上不可用。51Testing软件测试网5o2Wow}7e!u7[%B
Context51Testing软件测试网7@ `@*V,y7R&sa ]#Cd
数值表达式，用于标识由帮助文件的作者指定给某个帮助主题的上下文编号。如果已提供 context，则必须提供 helpfile。在 16 位系统平台上不可用。51Testing软件测试网g*PP/IjC*z+C
设置51Testing软件测试网#N5Ynynf
buttons 参数可以有以下值：51Testing软件测试网9s[,y4n \lWFR
51Testing软件测试网!d$ND;x[}T}!B? n
常数        值        描述          
t,w'I \vT)x0vbOKOnly        0        只显示确定按钮。          51Testing软件测试网 [lmlIQ JZ#{
h
vbOKCancel        1        显示确定和取消按钮。          51Testing软件测试网"[{'l`Mz
vbAbortRetryIgnore        2        显示放弃、重试和忽略按钮。          

_/cD y/tJ5g*T0vbYesNoCancel        3        显示是、否和取消按钮。          
3J]"ewc.}#zks5[+v0vbYesNo        4        显示是和否按钮。          
5YbX!@/r0vbRetryCancel        5        显示重试和取消按钮。          51Testing软件测试网#T;z$_rc\h#h
vbCritical        16        显示临界信息图标。          51Testing软件测试网GirS'}{ma g"K
vbQuestion        32        显示警告查询图标。          
L{_ zIj
U0vbExclamation        48        显示警告消息图标。          51Testing软件测试网NVT.s\?
vbInformation        64        显示信息消息图标。          
(qrQp&?Nii0vbDefaultButton1        0        第一个按钮为默认按钮。          51Testing软件测试网9F~-x,^+?2| o
vbDefaultButton2        256        第二个按钮为默认按钮。          
O+T\{m5g
@ a8p0vbDefaultButton3        512        第三个按钮为默认按钮。          51Testing软件测试网Y"z'B
I/sD/k
vbDefaultButton4        768        第四个按钮为默认按钮。          
^d3[JT-fa4g0vbApplicationModal        0        应用程序模式：用户必须响应消息框才能继续在当前应用程序中工作。          51Testing软件测试网4\'X0TF{R#Z5z
vbSystemModal        4096        系统模式：在用户响应消息框前，所有应用程序都被挂起。         
uD*`3od;dC+|m0第一组值 (0 - 5) 用于描述对话框中显示的按钮类型与数目；第二组值 (16, 32, 48, 64) 用于描述图标的样式；第三组值 (0, 256, 512) 用于确定默认按钮；而第四组值 (0, 4096) 则决定消息框的样式。在将这些数字相加以生成 buttons 参数值时，只能从每组值中取用一个数字。51Testing软件测试网y Dv!_ O2a6Mr(S#F
返回值51Testing软件测试网K/W$u,?ai` C$vD
MsgBox 函数有以下返回值：
jXT;vJ J]]051Testing软件测试网jn0kuO
常数        值        按钮          51Testing软件测试网iE-o+ylrV4]
vbOK        1        确定          51Testing软件测试网
f L#J+I%GopG
vbCancel        2        取消          51Testing软件测试网!Nb4T{._)p Z ?
vbAbort        3        放弃          
)wn g1cR#fZQ0vbRetry        4        重试          
Ef9K$IL0vbIgnore        5        忽略          
6Tq"~:np$fkp0vbYes        6        是          51Testing软件测试网8j
Jzk Vv VT'd
vbNo        7        否         51Testing软件测试网7iF/_3hMjO:q C.kc
说明
/I%b+gRWz!r4{za0如果同时提供了 helpfile 和 context，则用户可以按 F1 键以查看与上下文相对应的帮助主题。51Testing软件测试网J@ lzdq
如果对话框显示取消按钮，则按 ESC 键与单击取消的效果相同。如果对话框包含帮助按钮，则有为对话框提供的上下文相关帮助。但是在单击其他按钮之前，不会返回任何值。51Testing软件测试网8j"aY9M.`:U!I
当MicroSoft Internet Explorer使用MsgBox函数时，任何对话框的标题总是包含"VBscrīpt",以便于将其与标准对话框区别开来。51Testing软件测试网,}%CV/jb_ H7{+Q
下面的例子演示了 MsgBox 函数的用法：
1ak{2Zj
eu9r#W0Dim MyVar
}b5nKj0MyVar = MsgBox ("Hello World!", 65, "MsgBox Example")51Testing软件测试网7A_k)H/f
   ' MyVar 包含 1 或 2，这取决于单击的是哪个按钮。51Testing软件测试网;R od'F`3{H3Z'c~