P=Asc(X) 返回字符串X的第一个字符的字符码 P=Chr(X) 返回字符码等于X的字符 [范例]: (1)P=Chr(65)
„ 输出字符A,因为A的ASCII码等于65 (2)P=Asc(“A”) „ 输出65
2. Len(X): 计算字符串X的长度 [格式]: P=Len(X) [说明]:
空字符串长度为0,空格符也算一个字符,一个中文字虽然占用2 Bytes,但也算一个字符。 [范例]:
(1) 令X=”” (空字符串) Len(X) 输出结果为0 (2) 令X=”abcd” Len(X) 输出结果为4 (3) 令X=”VB教程” Len(X) 输出结果为4
3. Mid(X)函数:读取字符串X中间的字符 [格式]: P=Mid(X,n)
由X的第n个字符读起,读取后面的所有字符。 P=Mid(X,n,m)
由X的第n个字符读起,读取后面的m个字符。
[范例]:
(1) X=”abcdefg” P=Mid(X,5) 结果为:P=”efg” (2) X=”abcdefg” P=Mid(X,2,4) 结果为P=”bcde”
4. Replace: 将字符串中的某些特定字符串替换为其他字符串 [格式]:
P=Replace(X,S,R)
[说明]:将字符串X中的字符串S替换为字符串R,然后返回。 [范例]:
X=”VB is very good” P=Replace(X,good,nice)
输出结果为:P=”VB is very nice”
5. StrReverse:反转字符串 [格式]:
P=StrReverse(X) [说明]:
返回X参数反转后的字符串 [范例]: (1)X=”abc” P=StrReverse(X) 输出结果:P=”cba”
6. Ucase(X),Lcase(X):转换英文字母的大小写 [格式]: P=Lcase(X)
„ 将X字符串中的大写字母转换成小写 P=Ucase(X)
„ 将X字符串中的小写字母转换成大写
[说明]:除了英文字母外,其他字符或中文字都不会受到影响。 [范例]:
(1) 令 X=”VB and VC”
则Lcase(X)的结果为”vb and vc”,Ucase(X)的结果为”VB AND VC”
7. InStr函数:寻找字符串 [格式]: P=InStr(X,Y)
从X第一个字符起找出Y出现的位置 P=InStr(n,X,Y)
从X第n个字符起找出Y出现的位置 [说明]:
(1) 若在X中找到Y,则返回值是Y第一个字符出现在X中的位置。 (2) InStr(X,Y)相当于InStr(1,X,Y)。
(3) 若字符串长度,或X为空字符串,或在X中找不到Y,则都返回0。 (4) 若Y为空字符串,则返回0。
---------------------------------------------------------------------------------------------- mid(字符串,从第几个开始,长度) ByRef 在[字符串]中[从第几个开始]取出[长度个字符串]
例如 mid(\"小欣无敌\则返回 \"小欣无\"
instr(从第几个开始,字符串1,字符串2) ByVal 从规定的位置开始查找,返回字符串2在字符串1中的位置
例如 instr(1,\"小欣无敌\小\") 则返回 1,instr(2,\"小欣无敌\小\"),则返回 0 。 0 表示未找到
InStrRev(字符串1,字符串2,从第几个开始) ByVal 从规定的位置开始,从后住前查找,返回字符串2在字符串1中的位置,此处注意,虽是从后住前查找,但
是返回的值还是从前往后算的。
例如 instrRev(\"小欣无敌\小\则返回 2 ; instrRev(\"小欣无敌\欣\则返回 0 ,因为它从\"小欣无敌\"的第1个字开始往前查找,所以找不到 。0 表示未找到 中国自学编程网 www.zxbc.cn
left(字符串,长度) ByVal 从[字符串]的左边开始返回[长度]个字符 例如 Left(\"小欣无敌,3) 则返回 \"小欣无\"
right(字符串,长度) ByVal 从[字符串]的右边开始返回[长度]个字符 例如 Right(\"小欣无敌\则返回 \"欣无敌\"
ucase(字符串) ByVal 返回[字符串]的大写形式,只对英文字符有效 例如 ucase(\"xiaoXINwuDi\") 则返回 \"XIAOXINWUDI\"
lcase(字符串) ByVal 返回[字符串]的小写形式,只对英文字符有效 例如 lcase(\"xiaoXINwuDi\") 则返回 \"xiaoxinwudi\"
asc(字符) Byval返回[字符]的ascii编码,若有多个字符,则只返回首字符的ascii编码,和Chr()函数是一个可逆的过程
例如 asc(\"小\") 则返回 -12127 ; asc(\"小欣无敌\") 也返回 -12127
chr(ASCii编码) Byval 返回[Ascii]编码所代表的字符,和Chr()函数是一个可逆的过程
例如 chr(-12127) 则返回 \"小\" ;chr(asc(\"小\")) 则返回\"小\"(这里是为了说明asc和chr的可逆性,例用此特性可以加密文本) trim(字符串) Byval 返回去掉了前、后之后的[字符串]
例如 trim(\" 小 欣 无敌 \") 则返回 \"小 欣 无敌\" ,中间的空格不受任何影响 string(个数,字符) Byval 返回[个数]个[字符]
例如 string(3,\"小\") 则返回 \"小小小\" , 而 string(3,\"小欣无敌\") 也返回 \"小\",只有首字符才有效
space(个数) Byval 返回[个数]个空格 例如 space(5) 则返回 \" \"
strconv(字符串,转换的类型) Byval 将字符串转成指定的类型。常用的类型只有两个,vbwide 半角转成全角,vbNarrow 全角转成半角
例如 strconv(\"xiao\则返回 \"XIAO\而strconv(\"XIAO\ow) 则返回 \"XIAO\"
'备注 vbwide = 4 ,vbnarrow = 8 len(字符串) Byval 返回[字符串]的长度 例如 len(\"小欣无敌\") 则返回 4
------------------------------------------------------------------------------------------ Len Len(string|varname) 返回字符串内字符的数目,或是存储一变量所需的字节数 Trim Trim(string) 将字符串前后的空格去掉 Ltrim Ltrim(string) 将字符串前面的空格去掉 Rtrim Rtrim(string) 将字符串后面的空格去掉 Mid Mid(string,start,length) 从string字符串的start字符开始取得length长度的字符串,如果省略第三个参数表示从start字符开始到字符串结尾的字符串 Left Left(string,length) 从string字符串的左边取得length长度的字符串 Right Right(string,length) 从string字符串的右边取得length长度的字符串 LCase LCase(string) 将string字符串里的所有大写字母转化为小写字母 UCase UCase(string) 将string字符串里的所有大写字母转化为大写字母 StrComp StrComp(string1,string2[,compare]) 返回string1字符串与string2字符串的比较结果,如果两个字符串相同,则返回0,如果小于则返回-1,如果大于则返回1
InStr InStr(string1,string2[, compare]) 返回string1字符串在string2字符串中第一次出现的位置
Split Split(string1,delimiter[, count[, start]]) 将字符串根据delimiter拆分成一维数组,其中delimiter用于标识子字符串界限。如果省略,使用空格(\"\")作为分隔符。
count 返回的子字符串数目,-1 指示返回所有子字符串。
start为 1 执行文本比较;如果为 0 或者省略执行二进制比较。 Replace Replace(expression, find, replacewith[, compare[, count[, start]]]) 返回字符串,其中指定数目的某子字符串(find)被替换为另一个子字符串(replacewith)
[示例:]
1、Len函数示例:
下面的示例利用 Len 函数返回字符串中的字符数目: Dim MyString
MyString = Len(\"VBSCRIPT\") 'MyString 包含 8。 2、Trim、Ltrim、Rtrim函数示例:
下面的示例利用 LTrim, RTrim, 和 Trim 函数分别用来除去字符串开始的空格、尾部空格、 开始和尾部空格: Dim MyVar
MyVar = LTrim(\" vbscript \") 'MyVar 包含 \"vbscript \"。 MyVar = RTrim(\" vbscript \") 'MyVar 包含 \" vbscript\"。 MyVar = Trim(\" vbscript \") 'MyVar 包含\"vbscript\"。 3、Mid函数示例:
下面的示例利用 Mid 函数返回字符串中从第四个字符开始的六个字符: Dim MyVar
MyVar = Mid(\"VB脚本is fun!\4, 6) 'MyVar 包含 \"Script\"。 4、Left函数示例:
下面的示例利用Left 函数返回MyString 的左边三个字母: Dim MyString, LeftString MyString = \"VBSCript\"
LeftString = Left(MyString, 3) 'LeftString 包含 \"VBS 5、Right函数示例:
下面的示例利用 Right 函数从字符串右边返回指定数目的字符: Dim AnyString, MyStr
AnyString = \"Hello World\" '定义字符串。 MyStr = Right(AnyString, 1) '返回 \"d\"。 MyStr = Right(AnyString, 6) ' 返回 \" World\"。 MyStr = Right(AnyString, 20) ' 返回 \"Hello World\"。 6、LCase函数示例:
下面的示例利用 LCase 函数把大写字母转换为小写字母: Dim MyString Dim LCaseString MyString = \"VBSCript\"
LCaseString = LCase(MyString) ' LCaseString 包含 \"vbscript\"。 7、 UCase函数示例:
下面的示例利用 UCase 函数返回字符串的大写形式: Dim MyWord
MyWord = UCase(\"Hello World\") ' 返回\"HELLO WORLD\"。 8、StrComp函数示例:
下面的示例利用 StrComp 函数返回字符串比较的结果。如果第三个参数为 1 执行文本比较;如果第三个参数为 0 或者省略执行二进制比较。 Dim MyStr1, MyStr2, MyComp
MyStr1 = \"ABCD\": MyStr2 = \"abcd\" '定义变量。 MyComp = StrComp(MyStr1, MyStr2, 1) ' 返回 0。 MyComp = StrComp(MyStr1, MyStr2, 0) ' 返回 -1。 MyComp = StrComp(MyStr2, MyStr1) ' 返回 1。 9、InStr示例:
下面的示例利用 InStr 搜索字符串: Dim SearchString, SearchChar, MyPos SearchString =\"XXpXXpXXPXXP\"??? SearchChar = \"P\"??
MyPos = Instr(SearchString, SearchChar)???'返回 9.
注意:返回的不是一个字符串在另一个字符串中第一次出现的字符位置,而是字节位置。
10、Split函数示例:
Dim MyString, MyArray, Msg MyString = \"VBScriptXisXfun!\" MyArray = Split(MyString, \"x\-1,1) ' MyArray(0) contains \"VBScript\". ' MyArray(1) contains \"is\". ' MyArray(2) contains \"fun!\". Response.Write(MyArray(0)) 11、Replace函数示例:
Replace(\"ABCD\\"BC\\"12\") '得到A12D
------------------------------------------------------------------------------------------------
1.Chr[$](数值)函数
返回标准扩展码的对应字符。 说明:
(1)数值范围在0到255之间。
(2)Chr()返回的是数值类型,而Chr$()则返回字符类型。 (3)ANSI是ASCII码的扩充,其前128个字符都与ASCII码相同。 例如,我们常用以下的语句加入回车换行符。Chr(13) Chr(10) 2.Asc(\"字符\")函数
此函数用来返回字符的ANSI码值。
说明: 若输入为一字符串,则只返回第一个字符的ASCII码值。 例如,
x=Asc(\"a\"),则, x=97 x=Asc(\"ab\"),则,x=97 3.String[$](个数,字符) 用于重复某一个字符。 说明:
(1)“个数”用来指定重复的次数。
(2)若“字符”为一字符串,则只重复复制第一个字符。 4.Len(字符串) 函数 用于返回字符串的长度。 5.Left[$](字符串,字符个数)
用于返回“字符串”最左边的长度为“字符个数”的字符串。 例如,
Dim substr As String
substr=Left(\"Visual Basic\) 则
substr=\"Vis\"
6.Right[$](字符串,字符个数)
用于返回“字符串”最右边的长度为“字符个数”的字符串。 例如,
Dim substr As String
substr=Right(\"Visual Basic\)
则
substr=\"sic\"
7.Mid[$](字符串,起始位置,[字符个数]) 用于返回一个子字符串。 说明:
(1)子字符串从“起始位置”开始,以“字符个数”为长度。 (2)若省略“字符个数”,则从起始位置到字符串的结尾。 8.Lcase(字符串)和Ucase(字符串)函数
Lcase:不论字符串中的字符为大写还是小写,一律输出为小写。 Ucase:不论字符串中的字符为大写还是小写,一律输出为小写。 9.Ltrim(字符串)、Rtrim(字符串)、Trim(字符串)函数 Ltrim(字符串):用于去掉字符串中左边的空格。 Rtrim(字符串):用于去掉字符串中右边的空格。 Trim(字符串):用于去掉字符串中左右两边的空格。 10.Str(数值)函数 和 Val(字符串) 函数 Str(数值):用于将数字转化为字符串。 Val(字符串):用于将字符串转化为数值。 例如,
Dim a As String Dim b As Long a=Str(345.45) b=Val(\"234.45\") 则
a=\"345.45\" b=234.45
因篇幅问题不能全部显示,请点此查看更多更全内容
Copyright © 2019- igat.cn 版权所有 赣ICP备2024042791号-1
违法及侵权请联系:TEL:199 1889 7713 E-MAIL:2724546146@qq.com
本站由北京市万商天勤律师事务所王兴未律师提供法律服务