- 注册时间
- 2008-9-13
- 最后登录
- 1970-1-1
- 在线时间
- 0 小时
- 阅读权限
- 200
- 积分
- 0
- 帖子
- 24482
- 精华
- 4
- UID
- 9
  
|
函数 语法 功能
) Z& {& l% N' ~, ]0 v3 wLen Len(string|varname) 返回字符串内字符的数目,或是存储一变量所需的字节数。 : s- S' q1 x# q( ~' f, q/ X3 l
Trim Trim(string) 将字符串前后的空格去掉
2 r" x1 X. m2 MLtrim Ltrim(string) 将字符串前面的空格去掉
4 [6 R8 p7 T5 E& JRtrim Rtrim(string) 将字符串后面的空格去掉
5 B4 ~' W5 o; h9 `+ _8 l# kMid Mid(string,start,length) 从string字符串的start字符开始取得length长度的字符串,如果省略第三个参数表示从start字符开始到字符串结尾的字符串 ; {$ b8 E6 L. U9 O# S4 @
Left Left(string,length) 从string字符串的左边取得length长度的字符串
# p* E. B/ `% u! h4 hRight Right(string,length) 从string字符串的右边取得length长度的字符串
6 {. ]7 p" b) v9 w& U' p8 \, m) bLCase LCase(string) 将string字符串里的所有大写字母转化为小写字母 1 \8 W* j# r4 j/ `# Y: @ Z
UCase UCase(string) 将string字符串里的所有大写字母转化为大写字母 / Q$ C; z3 v0 a9 c1 @$ a
StrComp StrComp(string1,string2[,compare]) 返回string1字符串与string2字符串的比较结果,如果两个字符串相同,则返回0,如果小于则返回-1,如果大于则返回1
0 g4 z1 l% B1 M! I$ b$ lInStr InStr(string1,string2[,compare]) 返回string1字符串在string2字符串中第一次出现的位置
8 O0 X* s5 @/ Q# n4 O3 PSplit Split(string1,delimiter[,count[,start]]) 将字符串根据delimiter拆分成一维数组,其中delimiter用于标识子字符串界限。如果省略,使用空格("")作为分隔符。count返回的子字符串数目,-1指示返回所有子字符串。start为1执行文本比较;如果为0或者省略执行二进制比较。
$ k# F7 ~2 l1 R) SReplace Replace(expression,find,replacewith[,compare[,count[,start]]]) 返回字符串,其中指定数目的某子字符串(find)被替换为另一个子字符串(replacewith)。
% y* ` F5 b+ i" b7 y( ~- N: j' ~% u' E2 j
补充:
0 h$ c6 W9 ] F' C- lAsc Asc函数提取字符串第一个字母的ANSI字符码。0 h7 E- x6 q- g @
用法为:result = Asc(string)+ ?1 Y- y# ~6 i5 o% F
其中result是字符码,string是任意有效的字符串表达式。如果string为Empty,则产生一个实时错误。% F6 h* ~7 i, @4 O% n
AscB AscB函数提取字符串的第一个字节。5 M3 Y' d0 x2 q$ o2 K* `
用法为:result = AscB(string)
# i" L+ u0 j- b$ i/ X% K( j- L) L其中result是Byte字类,string是任意有效的字符串表达式。如果string为Empty,则产生一个实时错误。' L9 T* }4 _: @( T- h
AscW AscW函数提取字符串第一个字母的Unicode字符码。% y, n) ~8 f0 w9 ?; U# z
用法为:result = AscW(string)0 k" D v7 ~6 S$ s3 G3 S. V( |3 t
其中result是Unicode,string是任意有效的字符串表达式。如果string为Empty,则产生一个实时错误。
- p, z# x' {4 f: MInStr InStr函数识别某个记号在字符串中的首字母位置。; l" H1 G/ R6 g) k5 ~
用法为:newstart = InStr([start, ]source, token[, compare])2 ~. F/ g. I! h) Q6 i$ ~: j$ N) B0 H
其中newstart时记号在字符串中的位置(如果没有的话则为0),start是查找的起始位置,source是要查找的字符串,token是要定位的字符串,compare是比较类型(0表示二进制比较,1表示忽略大小写的文本比较)。
3 u9 r/ T4 i9 @, V; V6 J8 a# fInStrB InStrB函数是InStr的字节版,识别某个记号在字符串中的首字节位置。4 s) Y, ]9 N" |( \% X7 R
用法为:newstart = InStrB([start, ]source, token[, compare])0 Y4 u/ U) k1 F! R5 @
其中newstart时记号在字符串中的首字节位置(如果没有的话则为0),start是查找的起始位置,source是要查找的字符串,token是要定位的字符串,compare是比较类型(0表示二进制比较,1表示忽略大小写的文本比较)。' r" i* g) q8 M& p4 R; k- b( X
LCase LCase函数把字符串变为小写形式。
: W z# L1 b \, \' h5 E用法为:result = LCase(string) c5 F" I" u# \. s" P
其中result是小写字符串,string是任意有效的字符串表达式。: y& [6 G5 J0 u
Left Left函数从字符串的起始处提取指定数目的字符。
0 ~' z5 a& _ }6 I' \9 b用法为:result = Left(string,length)* k. L- s3 T& a V
其中result是字符串变量,string是有效的字符串表达式,length是表示返回多少字符的数值型表达式。% Z X4 r( d& |4 F
LeftB LeftB函数从字符串的起始处提取指定数目的字节。
/ o$ D* D% Y. b* {用法为:result = LeftB(string,length)8 G! h2 V! H2 G- l9 R. B6 s
其中result是字符串变量,string是有效的字符串表达式,length是表示提取的字节数的数值型表达式。
8 x, R S: c6 u% j5 z+ GLen Len函数确定字符串的大小或存储这个变量需要多少字符。4 R0 l3 i+ p3 l/ a B" F r: q/ D
用法为:result = Len(string | varname)
# ~' |1 R' y6 l! E# O其中,result是字符串中的字符数或存储这个变量所需的字节数,string是任意有效的字符串表达式,varname是变量名。
/ m! C0 ~ L" yLenB Len函数确定字符串的大小或存储这个变量需要多少字节。7 X! \% i" Q( R0 Y5 ~
用法为:result = LenB(string | varname)
. {5 q- `$ G \9 e其中,result是字符串中的字节数或存储这个变量所需的字节数,string是任意有效的字符串表达式,varname是变量名。
$ b6 S6 z R8 ~" _* c; cLTrim LTrim函数复制字符串并去掉前面的空格。5 d. I `6 k' p5 ~) k0 @
用法为:result = LTrim(string)
* E! X! T4 z P6 W其中,result是去掉空格后的字符串,string是要去掉空格的有效字符串表达式。2 a* ` I4 d4 u/ {" w
Mid Mid函数从字符串的某个位置复制指定数目的字符。
" y7 l6 f2 v+ M, ]" m$ z: z用法为:result = Mid(string,start[,length])# }/ r- l& e) ?7 ^2 u" z, Z
其中,result是结果字符串,string是要从中复制字符的表达式,start是string中复制的起始位置,length是要复制的字符数。2 A, J" j- Z$ p1 s9 b# u& J+ }
MidB Mid函数从字符串的某个位置复制指定数目的字节。
. E6 J& h+ r" J! y用法为:result = Mid(string,start[,length])4 M/ k! l* ^/ e% ?8 Y9 B- w2 v
其中,result是结果字符串,string是要从中复制字节的表达式,start是string中复制的起始位置,length是要复制的字节数。$ I' z- K3 M3 h
Right Right函数从字符串的尾部提取指定数目的字符。
4 x/ p! t- T$ f% Z, N+ I P- x$ ~用法为:result = Right(string,length)! j4 y3 D; m1 ^: L
其中result是字符串变量,string是有效的字符串表达式,length是表示返回多少字符的数值型表达式。
: A, `+ v6 l5 P( _2 IRightB RightB函数从字符串的起始处提取指定数目的字节。$ L4 R: }' i4 P* b; y _; P
用法为:result = RightB(string,length)' x) Z2 ?4 x8 s& W4 _7 \# h" W
其中result是字符串变量,string是有效的字符串表达式,length是表示提取的字节数的数值型表达式。7 n K2 r* N0 p( t6 n2 d3 r" r
RTrim RTrim函数复制字符串并去掉尾部的空格。
% Y' \" f ?% U% t# P用法为:result = RTrim(string)/ p3 u' C+ D$ ~, b" w/ k$ R+ P
其中,result是去掉空格后的字符串,string是要去掉空格的有效字符串表达式。
' N0 b" e4 u9 c7 U' ] ^String String函数构造含有多个相同字符的字符串。) x) F8 \8 {7 @+ b
用法为:result = String(number, character)/ I1 Q5 g. F' r: v9 k; S8 [
其中,result是字符串变量,number是返回字符串的长度,character是用来构造返回字符串的字符码。& G, ]# i3 A9 f: V) M$ v
Trim Trim函数复制字符串并去掉首尾的空格。/ L: H8 _# |4 w$ x; N3 m
用法为:result = Trim(string)
$ g/ Q% A' T& E; f, y+ p: p9 T其中,result是去掉空格后的字符串,string是要去掉空格的有效字符串表达式。
$ s# X' w9 h# Z5 u' O: ~/ lUCase UCase函数把字符串变为大写形式。( M( b% S. u9 E* T9 H% h) |% b
用法为:result = UCase(string)
$ c; n: x4 }5 [ v2 R! c* F其中result是大写字符串,string是任意有效的字符串表达式。
. @6 w8 L- ]* T! a! J; vasp字符串函数 [讨论]
' }- V' a: a8 P9 X. @函数说明- ~: `' Y Y$ g. ~' {. f% M, u! G
CBool
- G( } ?7 f1 C数据转Boolean类型
! w8 d4 n+ b* N( B) oCdate
& o& l- h" ~: N1 r K1 R数据转Time类型 j0 O1 A! S- j5 ^3 h% C+ f
CDbl, y2 Y$ J' I% z; _6 A
数据转Double类型4 v8 W: X1 C, \1 p) g
Cint% G4 S( G% n" d# ?
数据转Integer类型; Q0 H: X+ @; D. D! {& j$ ^
CLng
; m7 o. ?5 z' [" Q- n. [6 O数据转Lang类型+ t4 R, ^3 }* H7 S
Asc8 R, C! I# B% U
字符转数字类型
+ V3 ?: A$ {: s' CCStr8 o. u- T: |8 O& [
数字转String类型+ Y; m4 u6 u/ g9 C' }- d
Chr2 O& F: Y' L6 j, O9 m2 i
数字转字符类型
, N0 O& M, [/ a3 f" {Variant变量一般会将其代表的数据子类型自动转换成合适的数据类型,但有时候,自动转换也会造成一些数据类型不匹配的错误.这时,可使用转换函数来强制转换数据的子类型.5 M/ z/ L# M7 r' m! [) B
函数 功能$ Y2 I( m! f+ ]2 V4 y* [: V# ^0 N
Asc 函数 返回与字符串的第一个字母对应的 ANSI 字符代码。
2 |+ n: j- R& C4 ]( m/ J7 CChr 函数 返回与指定的 ANSI 字符代码相对应的字符
* K& H& M( u, e" EHex 函数 返回表示十六进制数字值的字符串。
% {5 y" e0 {3 @- FOct 函数 返回表示数字八进制值的字符串。
7 }+ f% d2 F, i, B1 B' QCStr 函数 返回表达式,该表达式已被转换为 字符串 子类型。
. ^& n9 G: K, W$ `; I7 {CDate 函数 返回表达式,此表达式已被转换为 日期 子类型。
6 s9 `- e) U3 r9 n, u% xCInt 函数 返回表达式,此表达式已被转换为 整数 子类型。, y) p6 Z% b3 @$ |" H: b3 F% F* p
CLng 函数 返回表达式,此表达式已被转换为 长整数 子类型0 `1 b+ c; I0 ^9 s% M
CSng 函数 返回表达式,该表达式已被转换为 Single 子类型- Y# b9 u: X% l4 W; I4 N: e
CDbl 函数 返回表达式,此表达式已被转换为 Double 子类型
" J: J5 P. q( c6 G/ z8 P& C+ JCBool 函数 返回表达式,此表达式已转换为 布尔 子类型 S, C0 n2 @. D( [# R
1、Asc 函数示例
, Y2 `' D, W( j9 C% E/ d! T+ @下面例子中, Asc 返回每一个字符串首字母的 ANSI 字符代码:8 V: A) n) r O% v x) i
Dim MyNumber
# q/ F: ?; @% j1 X7 IMyNumber = Asc("A") '返回 65。
O- w/ M( Y3 |! iMyNumber = Asc("a") '返回 97。4 [/ z( G& J+ N7 p( i/ A4 d# A
MyNumber = Asc("Apple") '返回 65。. h2 X; a& u) r4 b
2、Chr 函数示例1 |1 x" Z' W" u0 F( B7 ^3 T% |
下面例子利用 Chr 函数返回与指定的字符代码相对应的字符:3 m; h: ? Y+ x4 a6 R
Dim MyChar
7 U; q1 s9 z/ yMyChar = Chr(65) '返回 A。% z6 V2 \7 E/ ^9 m6 m' u( r
MyChar = Chr(97) '返回 a。
& C/ M. j% H4 r+ AMyChar = Chr(62) '返回 >。- X; q3 I7 n) Q8 q# ]4 f
MyChar = Chr(37) '返回 %。
. [% @, s8 J+ k) d' l$ X3、Hex 函数示例
9 t2 k( ~5 P4 T- K下面的示例利用 Hex 函数返回数字的十六进制数:# T! u; P3 E" I( e0 {: y% D
Dim MyHex& H+ T# M% B1 d8 W, L
MyHex = Hex(5) ' 返回 5。
1 A" V. m9 [8 J* _* B+ r- S$ HMyHex = Hex(10) ' 返回A。
: |. k3 l7 e5 `/ N5 RMyHex = Hex(459) ' 返回 1CB。2 a# H& R0 P9 N+ ~1 i; z' J7 a6 I
4、Oct 函数示例
% Z: u- C& \) R C5 Y- e, g5 A下面的示例利用 Oct 函数返回数值的八进制数:' t z8 v- [4 d K5 N
Dim MyOct2 m q9 v, T4 E0 x. n
MyOct = Oct(4) ' 返回 4。6 l. \# d7 D, v" h
MyOct = Oct(8) ' 返回 10。' e3 G2 D4 _. D
MyOct = Oct(459) ' 返回 713。; D& w3 R* f6 K1 H' O% q6 \* O
5、 CStr 函数示例& e) v- Y! J L
<%num1=666StrWelcome="欢迎第"&CStr(num1)&"个来访者"%>1 K& {( A% {; k" Z; ]
CStr将变量num1由整数子类型强制转换为字符串子类型" e8 X( z4 G: z, b$ a) d' [
6、CDate 函数示例0 R2 Q) b( S1 t+ O: p
MyDate = "October 19, 1962" ' 定义日期。! P( g g. O6 t6 y: c+ e @ K# Z, x
MyShortDate = CDate(MyDate) ' 转换为日期数据类型。
7 h) J& f N/ A" |$ ~MyTime = "4:35:47 PM" ' 定义时间。0 h0 A- Q5 K- \' G) ]# M0 h
MyShortTime = CDate(MyTime) ' 转换为日期数据类型。9 f' x9 b/ d# P2 k# B
7、CInt 函数示例. N' p4 Q' g A6 p" X) i
Dim MyDouble, MyInt
0 h# P% C. e. I+ WMyDouble = 2345.5678 ' MyDouble 是 Double。
$ I) ?2 C$ e- \2 O0 N5 a- G7 b- N0 o2 WMyInt = CInt(MyDouble) ' MyInt 包含 2346。0 o! w5 k6 n9 L) H6 t! o8 u7 ?% F
8、CLng 函数示例, r- y5 U* C% M; K6 w2 n
Dim MyVal1, MyVal2, MyLong1, MyLong2
( i' Z8 Z; R- E3 R ?0 }, z# E# VMyVal1 = 25427.45: MyVal2 = 25427.55 ' MyVal1, MyVal2 是双精度值。
# ~1 k, w$ N$ u( Z7 ]+ KMyLong1 = CLng(MyVal1) ' MyLong1 25427。% K2 @# J& t/ I0 t7 b
MyLong2 = CLng(MyVal2) ' MyLong2 包含 25428 。7 S( X' t ^5 w2 l0 \! \+ ?% A- m
9、CBool 函数示例
5 ?4 M* c: ^/ i# ADim A, B, Check
, ^) @3 A( N L( L- c9 JA = 5: B = 5 ' 初始化变量。0 }, `: S* M$ k5 G2 `3 Z& i
Check = CBool(A = B) '复选框设为 True 。
% d0 Q7 R1 _- l% {* Z6 C3 oA = 0 '定义变量。8 l4 G* `& i' `; i! n
Check = CBool(A) '复选框设为 False |
|