- 注册时间
- 2008-9-13
- 最后登录
- 1970-1-1
- 在线时间
- 0 小时
- 阅读权限
- 200
- 积分
- 0
- 帖子
- 24482
- 精华
- 4
- UID
- 9
  
|
函数 语法 功能
' A: T7 T. i/ F/ J: @* Z8 ZLen Len(string|varname) 返回字符串内字符的数目,或是存储一变量所需的字节数。
, H/ y2 S7 |$ ]Trim Trim(string) 将字符串前后的空格去掉
+ G9 s: Q; d) G w! V+ L' i" j# v7 ALtrim Ltrim(string) 将字符串前面的空格去掉
t, M% Q7 V& y6 m3 ~Rtrim Rtrim(string) 将字符串后面的空格去掉 9 ^5 M. z& {9 l8 ?
Mid Mid(string,start,length) 从string字符串的start字符开始取得length长度的字符串,如果省略第三个参数表示从start字符开始到字符串结尾的字符串
" z# y+ D$ |$ _9 v6 dLeft Left(string,length) 从string字符串的左边取得length长度的字符串
A2 q0 e' o8 }. {. o, C6 w0 nRight Right(string,length) 从string字符串的右边取得length长度的字符串 " _+ r: p5 Q. W0 D: |- R2 r) t% T% Q
LCase LCase(string) 将string字符串里的所有大写字母转化为小写字母 5 n% Z, f6 h1 K# D
UCase UCase(string) 将string字符串里的所有大写字母转化为大写字母 + v0 R- b" f" d0 s0 H3 v0 f
StrComp StrComp(string1,string2[,compare]) 返回string1字符串与string2字符串的比较结果,如果两个字符串相同,则返回0,如果小于则返回-1,如果大于则返回1 x/ t7 [1 u' Y s( ?
InStr InStr(string1,string2[,compare]) 返回string1字符串在string2字符串中第一次出现的位置
( v+ d+ W& T5 |1 F, c, cSplit Split(string1,delimiter[,count[,start]]) 将字符串根据delimiter拆分成一维数组,其中delimiter用于标识子字符串界限。如果省略,使用空格("")作为分隔符。count返回的子字符串数目,-1指示返回所有子字符串。start为1执行文本比较;如果为0或者省略执行二进制比较。 " Z$ Q! b3 Q* K6 K! {, e! I
Replace Replace(expression,find,replacewith[,compare[,count[,start]]]) 返回字符串,其中指定数目的某子字符串(find)被替换为另一个子字符串(replacewith)。5 \; D1 t" C$ H# p! j$ k+ j |
: s% n2 |8 Y4 [$ u' G
补充:
+ W5 I& T4 N! S. C2 A3 @Asc Asc函数提取字符串第一个字母的ANSI字符码。
) ~ F# R4 o$ g9 R9 _ I" W用法为:result = Asc(string)" N% u" E, t2 L
其中result是字符码,string是任意有效的字符串表达式。如果string为Empty,则产生一个实时错误。' Y/ w2 W& v2 x! H
AscB AscB函数提取字符串的第一个字节。
6 [8 X- F- ~' ~* E5 ]" t5 c+ q$ d* ]* n用法为:result = AscB(string)8 y% t7 E+ _6 v! ]" n( }
其中result是Byte字类,string是任意有效的字符串表达式。如果string为Empty,则产生一个实时错误。
: W: B! M9 {1 r) J& |AscW AscW函数提取字符串第一个字母的Unicode字符码。
/ ]# L) ?. P% e( v. b3 [8 x: i用法为:result = AscW(string)" }2 ~. }0 R1 @6 Q* N
其中result是Unicode,string是任意有效的字符串表达式。如果string为Empty,则产生一个实时错误。3 Q0 Y' e- P: h/ v* ^' u3 B* C+ A
InStr InStr函数识别某个记号在字符串中的首字母位置。
* U/ `8 U& f/ U( l! d用法为:newstart = InStr([start, ]source, token[, compare])2 o9 d7 G9 {( ^8 M, w# D
其中newstart时记号在字符串中的位置(如果没有的话则为0),start是查找的起始位置,source是要查找的字符串,token是要定位的字符串,compare是比较类型(0表示二进制比较,1表示忽略大小写的文本比较)。
# R1 A; e0 l* ], {InStrB InStrB函数是InStr的字节版,识别某个记号在字符串中的首字节位置。
2 b: Y% P0 q) a5 n( E/ u9 E* ?用法为:newstart = InStrB([start, ]source, token[, compare])
2 I2 L! Y* W1 D5 x0 V6 A- F其中newstart时记号在字符串中的首字节位置(如果没有的话则为0),start是查找的起始位置,source是要查找的字符串,token是要定位的字符串,compare是比较类型(0表示二进制比较,1表示忽略大小写的文本比较)。4 b( H0 C: K" a. r% k9 r8 H- L
LCase LCase函数把字符串变为小写形式。" d! t; S9 ^4 @1 w) U# N
用法为:result = LCase(string)
& G( }. P5 E# M; @# |+ j其中result是小写字符串,string是任意有效的字符串表达式。. x$ ?2 `* D z: D4 A& _ B% b
Left Left函数从字符串的起始处提取指定数目的字符。
0 i7 _6 f4 M0 i' c' W$ b用法为:result = Left(string,length)6 H/ Q% x0 v: S( Z
其中result是字符串变量,string是有效的字符串表达式,length是表示返回多少字符的数值型表达式。
+ Z+ n( @5 B4 S* R7 nLeftB LeftB函数从字符串的起始处提取指定数目的字节。
: q1 [! O9 `0 ^3 R+ u: s8 R5 T用法为:result = LeftB(string,length)1 P2 \2 ^% u: L9 w! d( a8 M! _5 R
其中result是字符串变量,string是有效的字符串表达式,length是表示提取的字节数的数值型表达式。# h2 d; A- T! E) ^" g$ |* }+ d
Len Len函数确定字符串的大小或存储这个变量需要多少字符。: @% E9 ~! |2 K, s$ I
用法为:result = Len(string | varname)2 |$ d3 J5 M6 d% ]% u* g" \- K+ x7 ?
其中,result是字符串中的字符数或存储这个变量所需的字节数,string是任意有效的字符串表达式,varname是变量名。
* s0 q2 R$ K' I( @3 CLenB Len函数确定字符串的大小或存储这个变量需要多少字节。! j% u0 n- M- O
用法为:result = LenB(string | varname)
. H C& T9 J4 _+ W/ O其中,result是字符串中的字节数或存储这个变量所需的字节数,string是任意有效的字符串表达式,varname是变量名。+ d, u2 }& B( O: n0 ~6 z4 o
LTrim LTrim函数复制字符串并去掉前面的空格。# \0 L h$ d' w4 |8 ^5 I
用法为:result = LTrim(string)
$ z$ \( U6 m! t% ~! P- T其中,result是去掉空格后的字符串,string是要去掉空格的有效字符串表达式。& k7 _; d3 G( _, ~+ u
Mid Mid函数从字符串的某个位置复制指定数目的字符。
0 A* g# Q0 A& b8 L用法为:result = Mid(string,start[,length])8 I4 v) o1 b8 H) I
其中,result是结果字符串,string是要从中复制字符的表达式,start是string中复制的起始位置,length是要复制的字符数。7 x ^" T2 J+ v+ X6 t) D% N$ N& A
MidB Mid函数从字符串的某个位置复制指定数目的字节。
, A$ W7 T$ y B9 _用法为:result = Mid(string,start[,length]): p1 i5 H: P5 o
其中,result是结果字符串,string是要从中复制字节的表达式,start是string中复制的起始位置,length是要复制的字节数。
5 |2 h7 \1 ~! E' u2 ?Right Right函数从字符串的尾部提取指定数目的字符。
O2 W- t. c4 z用法为:result = Right(string,length)
0 E, J$ Z2 A7 O E4 C9 X% ^+ C其中result是字符串变量,string是有效的字符串表达式,length是表示返回多少字符的数值型表达式。+ F1 G0 k4 j& k$ M
RightB RightB函数从字符串的起始处提取指定数目的字节。
" Q7 j; c$ C# t9 s& |# v: l* W用法为:result = RightB(string,length)
$ h p+ h% C0 X其中result是字符串变量,string是有效的字符串表达式,length是表示提取的字节数的数值型表达式。
( w1 F+ I* t3 T# bRTrim RTrim函数复制字符串并去掉尾部的空格。
$ a. C L" f4 P用法为:result = RTrim(string)
; ]$ r* J1 S; _) M) I其中,result是去掉空格后的字符串,string是要去掉空格的有效字符串表达式。
1 s+ x: ]: |& }* L- v0 u! N0 pString String函数构造含有多个相同字符的字符串。
; U( F# l3 x+ }$ i9 x用法为:result = String(number, character)2 r( H; w5 ?1 m" N1 ^
其中,result是字符串变量,number是返回字符串的长度,character是用来构造返回字符串的字符码。
6 Q. t2 ?# t- X2 Y/ ~0 g. }Trim Trim函数复制字符串并去掉首尾的空格。
d! S) q) E7 I& A用法为:result = Trim(string)
0 A' z' V/ u, ?& n0 x6 y3 \3 @! Q r其中,result是去掉空格后的字符串,string是要去掉空格的有效字符串表达式。
- L1 }- H* l- y; Y+ D) tUCase UCase函数把字符串变为大写形式。. J. \8 e7 y& V$ K; I. y5 `
用法为:result = UCase(string)
* w5 f: f: R& ?; a$ z其中result是大写字符串,string是任意有效的字符串表达式。
. |: D. `% C8 S7 K4 y/ kasp字符串函数 [讨论]
; `# O& q& U' _: O: }% [4 h- M7 ~函数说明& B9 Q' E" ]# k! f1 A2 z; o
CBool7 k9 t# G4 H+ O; \$ _7 ~3 @ }
数据转Boolean类型
Y; D! s( ~& d0 wCdate8 w; s& y; s2 |- o
数据转Time类型
/ C* q, A5 T/ a6 YCDbl
5 \7 C: {# P' F% y, P$ X3 q数据转Double类型
9 P8 h3 ]0 \" ECint
+ B. \4 u; }( s. _7 i数据转Integer类型4 e3 W a0 T; S& z) o: I* ~+ v
CLng
8 S8 c% x, k/ e+ t" q% d数据转Lang类型- @0 w8 u& r* q( [8 R0 J
Asc
0 `& s. T' @+ n字符转数字类型$ B' t* T& C, u5 z1 n
CStr
* q+ n$ X/ m& W9 @, P% s( n! g数字转String类型
1 h# f2 U' R% @9 XChr: W f5 n. c8 _! Z, A( p1 G
数字转字符类型5 U; S: n0 a6 P1 Z
Variant变量一般会将其代表的数据子类型自动转换成合适的数据类型,但有时候,自动转换也会造成一些数据类型不匹配的错误.这时,可使用转换函数来强制转换数据的子类型.
/ B8 i, u f. _函数 功能
: ]# ^* I; ^; Y8 t* n. b2 cAsc 函数 返回与字符串的第一个字母对应的 ANSI 字符代码。
- @% e9 s9 k: n( d1 w+ UChr 函数 返回与指定的 ANSI 字符代码相对应的字符
) c' o% {" t* r7 v1 V* J7 A: G0 q) ^Hex 函数 返回表示十六进制数字值的字符串。7 d! M: d9 T4 _9 J4 d
Oct 函数 返回表示数字八进制值的字符串。/ A4 Q+ N: {' ~* ^
CStr 函数 返回表达式,该表达式已被转换为 字符串 子类型。$ ~3 k7 Y' z9 ]2 G% t
CDate 函数 返回表达式,此表达式已被转换为 日期 子类型。' K/ {8 k( o9 {# I7 B
CInt 函数 返回表达式,此表达式已被转换为 整数 子类型。
6 y- h2 e/ n. P% ACLng 函数 返回表达式,此表达式已被转换为 长整数 子类型, x: I& j% ]* i8 [
CSng 函数 返回表达式,该表达式已被转换为 Single 子类型8 e3 x! v& b! x7 m/ x3 n
CDbl 函数 返回表达式,此表达式已被转换为 Double 子类型# z9 T S5 d" M5 F: j: ?
CBool 函数 返回表达式,此表达式已转换为 布尔 子类型
) `2 ~; e2 f* s4 w. U1、Asc 函数示例
# u: e* J" }5 S下面例子中, Asc 返回每一个字符串首字母的 ANSI 字符代码:1 c2 L% D, g3 q) ?
Dim MyNumber
( Z' Y/ @8 S, |4 A3 x& e' I: WMyNumber = Asc("A") '返回 65。. ^# W% R; N' ^0 F4 o7 _8 b# s2 Y
MyNumber = Asc("a") '返回 97。
H& O" k4 h# G" GMyNumber = Asc("Apple") '返回 65。9 Q3 d. _) B/ I. p% ] H! l, h0 [: b3 o
2、Chr 函数示例! q0 ^& o7 l0 H ?7 B W+ i
下面例子利用 Chr 函数返回与指定的字符代码相对应的字符:
& b' m. U$ g7 ^) xDim MyChar
7 A- `. z2 @* \8 d$ P' rMyChar = Chr(65) '返回 A。: Z# O5 ?9 H; V% j" D
MyChar = Chr(97) '返回 a。
6 T6 c0 O; o4 W. f$ gMyChar = Chr(62) '返回 >。
, I' M. k0 }. V% g8 u- @# U; H0 j! UMyChar = Chr(37) '返回 %。2 K& G" w$ J( \
3、Hex 函数示例
8 l. O# }3 }3 Q6 C( l! r; K下面的示例利用 Hex 函数返回数字的十六进制数:' x2 x' y/ V H- E% j. B
Dim MyHex! |$ @6 W, I6 {
MyHex = Hex(5) ' 返回 5。' K1 V6 H' ?+ I7 Y9 Y3 E. V" C& l
MyHex = Hex(10) ' 返回A。. P3 M9 M+ b2 D: d3 Z
MyHex = Hex(459) ' 返回 1CB。7 M; X2 _0 g: W7 j5 M" I; d7 [
4、Oct 函数示例- R. L' i* D- b: ]% u- u ~; W
下面的示例利用 Oct 函数返回数值的八进制数:) Z) e7 z8 M+ O% T9 N5 Z! X% K. F) w/ T
Dim MyOct2 K8 j4 o$ I, u) V' r/ @. a
MyOct = Oct(4) ' 返回 4。: ~4 o. A. E9 H' O& n/ O* H# e9 |
MyOct = Oct(8) ' 返回 10。
% D, g0 @( u( uMyOct = Oct(459) ' 返回 713。
, J+ Y: s. }+ T# r$ s) P. c5、 CStr 函数示例
" i0 s. h( I3 k<%num1=666StrWelcome="欢迎第"&CStr(num1)&"个来访者"%>
% b* K* ]1 V5 z y r9 L; kCStr将变量num1由整数子类型强制转换为字符串子类型$ B4 _0 [# [5 [& D2 e- ]5 d" o
6、CDate 函数示例1 p7 N H( X5 G& D3 t( Y
MyDate = "October 19, 1962" ' 定义日期。
( j: c( u) q, e+ |: t$ J3 VMyShortDate = CDate(MyDate) ' 转换为日期数据类型。
1 x$ ?6 P7 P* J# |MyTime = "4:35:47 PM" ' 定义时间。* x% O# h# x: A) v: z5 o
MyShortTime = CDate(MyTime) ' 转换为日期数据类型。
# f) }1 T* f% b' U. G7 _7、CInt 函数示例: u% y% \8 X( ]# ^! X
Dim MyDouble, MyInt7 m- i+ `/ P( T$ s V
MyDouble = 2345.5678 ' MyDouble 是 Double。
/ X! k& |* [1 u/ f, _7 x6 ]8 vMyInt = CInt(MyDouble) ' MyInt 包含 2346。7 I" F% p1 w( c# i+ z/ _
8、CLng 函数示例0 o+ C$ o8 o* R! H" z
Dim MyVal1, MyVal2, MyLong1, MyLong2
' x, }' j. _9 j0 S# D7 K4 ^MyVal1 = 25427.45: MyVal2 = 25427.55 ' MyVal1, MyVal2 是双精度值。
0 l: {2 i. {7 i1 ]MyLong1 = CLng(MyVal1) ' MyLong1 25427。
, {6 V4 Q# p8 c' f9 HMyLong2 = CLng(MyVal2) ' MyLong2 包含 25428 。
2 ]5 J) m0 j1 R* `9、CBool 函数示例, k! O" O0 g1 ~0 B- f
Dim A, B, Check5 k; D8 k2 K: A" L8 P7 [
A = 5: B = 5 ' 初始化变量。
3 w# Z! |5 D8 V8 `2 ]! ]4 GCheck = CBool(A = B) '复选框设为 True 。
' _! \9 f m/ r5 b, GA = 0 '定义变量。
# S3 M9 q/ S8 M# \Check = CBool(A) '复选框设为 False |
|