Left函数

返回Variant (String)，其中包含字符串中从左边算起指定数量的字符。51Testing软件测试网bGj(g2rul\ Y\N

语法51Testing软件测试网jz7^7u;kJJ:@[

Left(string,length)

Left函数的语法有下面的命名参数：

说明51Testing软件测试网{w|#lw

欲知string的字符数，使用Len函数。

注意   LeftB函数作用于包含在字符串中的字节数据。所以length指定的是字节数，而不是要返回的字符数。51Testing软件测试网J2_KJS_.w
_

 51Testing软件测试网}?QNk

Mid函数

从字符串中返回指定数目的字符。

Mid(string, start[, length])

参数

string

字符串表达式，从中返回字符。如果string包含Null，则返回Null。51Testing软件测试网^%R'j&j3W[1O;w

Start51Testing软件测试网,?Ji4`
Gb t

string中被提取的字符部分的开始位置。如果start超过了string中字符的数目，Mid将返回零长度字符串("")。

Length51Testing软件测试网b s0V:u5m;cH7T

要返回的字符数。如果省略或length超过文本的字符数（包括start处的字符），将返回字符串中从start到字符串结束的所有字符。

说明51Testing软件测试网Ar
x*wV

要判断string中字符的数目，可使用Len函数。51Testing软件测试网~|0DwG%M4o`

下面的示例利用Mid函数返回字符串中从第四个字符开始的六个字符：51Testing软件测试网ba KI/X

Dim MyVar51Testing软件测试网hv2ep*r5]{(o

MyVar = Mid("VB脚本is fun!", 4, 6) 'MyVar包含"scrīpt"。

注意   MidB函数与包含在字符串中的字节数据一起使用。其参数不是指定字符数，而是字节数。

Len函数

返回字符串内字符的数目，或是存储一变量所需的字节数。51Testing软件测试网-Fp9d;c@N { U dH5X:Q

Len(string| varname)

参数51Testing软件测试网,g P6f+FLG@6K){

string

任意有效的字符串表达式。如果string参数包含Null，则返回Null。51Testing软件测试网 ]9K0I$I.Y0{a/K

Varname

任意有效的变量名。如果varname参数包含Null，则返回Null。51Testing软件测试网M-k"g1V7Mv5t

说明

下面的示例利用Len函数返回字符串中的字符数目：

Dim MyString51Testing软件测试网0~ y(RH"f$A

MyString = Len("VBscrīpt") 'MyString包含8。51Testing软件测试网Y|"n.R|8I}

注意   LenB函数与包含在字符串中的字节数据一起使用。LenB不是返回字符串中的字符数，而是返回用于代表字符串的字节数。51Testing软件测试网Ex$y [t,^

Right函数

从字符串右边返回指定数目的字符。

Right(string, length)51Testing软件测试网'am W-`sS%R-|

参数

string51Testing软件测试网"l-el,QU$J h

字符串表达式，其最右边的字符被返回。如果string参数中包含Null，则返回Null。

Length

数值表达式，指明要返回的字符数目。如果为0，返回零长度字符串；如果此数大于或等于string参数中的所有字符数目，则返回整个字符串。

说明51Testing软件测试网@d;So*\W!]

要确定string参数中的字符数目，使用Len函数。

下面的示例利用Right函数从字符串右边返回指定数目的字符：

Dim AnyString, MyStr51Testing软件测试网AEN[1m,x(r

AnyString = "Hello World"     '定义字符串。51Testing软件测试网(k7ZIU
s

MyStr = Right(AnyString, 1)   '返回"d"。51Testing软件测试网-f-} l9]-JI8qY*l)pA

MyStr = Right(AnyString, 6)   '返回" World"。51Testing软件测试网^{:B-CZ#q-r

MyStr = Right(AnyString, 20)  '返回"Hello World"。51Testing软件测试网#a`B9KsL'{2F

注意   RightB函数用于字符串中的字节数据，length参数指定返回的是字节数目，而不是字符数目。51Testing软件测试网0t{+u6D{!IN

 51Testing软件测试网#T$i9Nzp!N&w

InStr函数

返回某字符串在另一字符串中第一次出现的位置。

InStr([start, ]string1,string2[,compare])

参数

start51Testing软件测试网D.p.qR e

可选项。数值表达式，用于设置每次搜索的开始位置。如果省略，将从第一个字符的位置开始搜索。如果start包含Null，则会出现错误。如果已指定compare，则必须要有start参数。

string151Testing软件测试网
_4yUull K

必选项。接受搜索的字符串表达式。

string2

必选项。要搜索的字符串表达式。

compare51Testing软件测试网8C
DaK8OUYF

可选项。指示在计算子字符串时使用的比较类型的数值。有关数值，请参阅“设置”部分。如果省略，将执行二进制比较。

设置51Testing软件测试网"z2L}smws

compare参数可以有以下值：51Testing软件测试网1a-SK'JP

返回值

InStr函数返回以下值：

说明

下面的示例利用InStr搜索字符串：51Testing软件测试网:C]y!t'Jk0pn(` i:z

Dim SearchString, SearchChar, MyPos

SearchString ="XXpXXpXXPXXP"  '要搜索的字符串。51Testing软件测试网[zv!MkY_ g x7{

SearchChar = "P"  ' Search for "P".51Testing软件测试网,MJS(hu/~FTKf

MyPos = Instr(4, SearchString, SearchChar, 1)  '在位置4进行的文本比较。返回6。51Testing软件测试网d-Uk7]\`/GN

MyPos = Instr(1, SearchString, SearchChar, 0)  '在位置1进行的二进制比较。返回9。

MyPos = Instr(SearchString, SearchChar)  '默认情况下，进行的是二进制比较（省略了最后的参数）。返回9。51Testing软件测试网#G^+ZZ'f

MyPos = Instr(1, SearchString, "W")  '在位置1进行的二进制比较。返回0（找不到"W"）。

注意   InStrB函数使用包含在字符串中的字节数据，所以InStrB返回的不是一个字符串在另一个字符串中第一次出现的字符位置，而是字节位置。51Testing软件测试网x \ekA.QJ

LTrim、RTrim与Trim函数

返回不带前导空格(LTrim)、后续空格(RTrim)或前导与后续空格(Trim)的字符串副本。51Testing软件测试网\,RZh2S9@IH

LTrim(string)

RTrim(string)51Testing软件测试网V3EvM*GO V*m

Trim(string)51Testing软件测试网H0Y6{L5Clt0~C

string参数是任意有效的字符串表达式。如果string参数中包含Null，则返回Null。51Testing软件测试网~0r&r5GbNV

说明51Testing软件测试网$t4k%d#f UH9v)p

下面的示例利用LTrim, RTrim,和Trim函数分别用来除去字符串开始的空格、尾部空格、开始和尾部空格：

Dim MyVar

MyVar = LTrim("  vbscrīpt ")  'MyVar包含"vbscrīpt "。

MyVar = RTrim("  vbscrīpt ")  'MyVar包含"  vbscrīpt"。51Testing软件测试网r9bN-c;|.]#m.J

MyVar = Trim("  vbscrīpt ")  'MyVar包含"vbscrīpt"。

 51Testing软件测试网 N:FgepO8L%c

Rnd函数示例

本示例使用Rnd函数随机生成一个1到6的随机整数。

Q?%^t4G$C`S P)f4{0

本示例用Randomize语句初始化随机数生成器。由于忽略了数值参数，所以Randomize用Timer函数的返回值作为新的随机数种子值。51Testing软件测试网fz#FOp1\lA

 51Testing软件测试网.A'] O&og rk

Dim MyValue51Testing软件测试网"['rg4b2}

Randomize  '对随机数生成器做初始化的动作。51Testing软件测试网nN}+b5J\ ]C

 51Testing软件测试网%y)?~N5@7v1^\#S)y/b

MyValue = Int((6 * Rnd) + 1)  '生成1到6之间的随机数值。

fst
No,g0

 

]YQR ` }#E.p0