- 注册时间
- 2008-9-13
- 最后登录
- 1970-1-1
- 在线时间
- 0 小时
- 阅读权限
- 200
- 积分
- 0
- 帖子
- 24482
- 精华
- 4
- UID
- 9
  
|
函数 语法 功能
. O+ @8 Q3 m' Z8 Z% M8 wLen Len(string|varname) 返回字符串内字符的数目,或是存储一变量所需的字节数。
3 I# }9 t$ g+ A; \Trim Trim(string) 将字符串前后的空格去掉 7 i* S L: ?! S. R% J( _8 \
Ltrim Ltrim(string) 将字符串前面的空格去掉 ! Z7 u6 ^5 B3 b7 u
Rtrim Rtrim(string) 将字符串后面的空格去掉 - ^/ Y/ o$ C: K: i
Mid Mid(string,start,length) 从string字符串的start字符开始取得length长度的字符串,如果省略第三个参数表示从start字符开始到字符串结尾的字符串 & e; Z. O3 W* G+ k/ q& A
Left Left(string,length) 从string字符串的左边取得length长度的字符串
$ _- p2 Y% \ ~( a* S# W; dRight Right(string,length) 从string字符串的右边取得length长度的字符串
@( }& B5 c+ M8 @5 P9 QLCase LCase(string) 将string字符串里的所有大写字母转化为小写字母
- ?! y# [7 X- m8 B! ^- Y, L% ?UCase UCase(string) 将string字符串里的所有大写字母转化为大写字母 ; E1 ^7 S4 y2 B; a0 Y# Q+ n9 a; B+ G
StrComp StrComp(string1,string2[,compare]) 返回string1字符串与string2字符串的比较结果,如果两个字符串相同,则返回0,如果小于则返回-1,如果大于则返回1 7 I5 ]+ E0 k; t2 l
InStr InStr(string1,string2[,compare]) 返回string1字符串在string2字符串中第一次出现的位置 2 \& h5 F& y$ @( g6 T
Split Split(string1,delimiter[,count[,start]]) 将字符串根据delimiter拆分成一维数组,其中delimiter用于标识子字符串界限。如果省略,使用空格("")作为分隔符。count返回的子字符串数目,-1指示返回所有子字符串。start为1执行文本比较;如果为0或者省略执行二进制比较。
% q* x* U5 G [' s; ^/ J! A& {6 C+ {Replace Replace(expression,find,replacewith[,compare[,count[,start]]]) 返回字符串,其中指定数目的某子字符串(find)被替换为另一个子字符串(replacewith)。) z3 ^7 w& I+ @9 E' K- y2 m( g
/ Z8 U2 o8 d- D( _8 t, ^补充:, P, F* ^4 J8 n8 [
Asc Asc函数提取字符串第一个字母的ANSI字符码。$ W2 j- X& V# G& _
用法为:result = Asc(string)4 ]! A4 ?, F9 B6 u# Z
其中result是字符码,string是任意有效的字符串表达式。如果string为Empty,则产生一个实时错误。% F$ n2 r' `' {& q: n2 ?& A
AscB AscB函数提取字符串的第一个字节。
2 d+ B* n& v" ~; C2 O, u2 w用法为:result = AscB(string)
2 T# l% C* V1 d. W* L其中result是Byte字类,string是任意有效的字符串表达式。如果string为Empty,则产生一个实时错误。9 i8 Q0 [. [- U$ h- S
AscW AscW函数提取字符串第一个字母的Unicode字符码。& \! x- N; |% O
用法为:result = AscW(string)- M' k0 a* q ` h3 p' A9 t, t, l" s
其中result是Unicode,string是任意有效的字符串表达式。如果string为Empty,则产生一个实时错误。
) K' F* {5 z$ E9 {InStr InStr函数识别某个记号在字符串中的首字母位置。
8 C7 r* m4 n' p; V用法为:newstart = InStr([start, ]source, token[, compare])
. g* r' {5 p8 A2 Y# ^# z% F: z其中newstart时记号在字符串中的位置(如果没有的话则为0),start是查找的起始位置,source是要查找的字符串,token是要定位的字符串,compare是比较类型(0表示二进制比较,1表示忽略大小写的文本比较)。% }9 B; F5 [+ q8 g9 D6 P% q
InStrB InStrB函数是InStr的字节版,识别某个记号在字符串中的首字节位置。
]- Z4 M& r. d1 E) d6 E, V9 P用法为:newstart = InStrB([start, ]source, token[, compare])
& M) }/ }/ w3 N其中newstart时记号在字符串中的首字节位置(如果没有的话则为0),start是查找的起始位置,source是要查找的字符串,token是要定位的字符串,compare是比较类型(0表示二进制比较,1表示忽略大小写的文本比较)。
5 W& }: [, | j( t5 D7 ^/ H' o) ]LCase LCase函数把字符串变为小写形式。5 T1 v* x# `1 K9 Q% b+ v& M' \
用法为:result = LCase(string)$ G1 N+ [8 z- C0 f; |7 \
其中result是小写字符串,string是任意有效的字符串表达式。. e. k# D) J$ ?9 M
Left Left函数从字符串的起始处提取指定数目的字符。! T6 A3 R! I+ Q
用法为:result = Left(string,length)" f% ]& Y% e( j5 N* B( c/ w4 j( K% x
其中result是字符串变量,string是有效的字符串表达式,length是表示返回多少字符的数值型表达式。
n( m, ]% c2 o! U& r3 KLeftB LeftB函数从字符串的起始处提取指定数目的字节。
' G1 i6 B0 N' b7 I- _用法为:result = LeftB(string,length)
+ w. W3 g/ J2 S. Z/ X其中result是字符串变量,string是有效的字符串表达式,length是表示提取的字节数的数值型表达式。
. j: V0 p2 G9 wLen Len函数确定字符串的大小或存储这个变量需要多少字符。
- j' x7 }' O" v Q" ~( u7 Y: Y9 ~7 |用法为:result = Len(string | varname)4 @ n+ y+ S A
其中,result是字符串中的字符数或存储这个变量所需的字节数,string是任意有效的字符串表达式,varname是变量名。
3 O7 F4 I9 b9 ~9 A& ULenB Len函数确定字符串的大小或存储这个变量需要多少字节。1 L9 _2 c' V8 j! Z) K+ o: ^4 B
用法为:result = LenB(string | varname)
t! F9 k) x- o8 m. p% ?其中,result是字符串中的字节数或存储这个变量所需的字节数,string是任意有效的字符串表达式,varname是变量名。
5 A# N( q7 ` ^0 E( I8 m( ]LTrim LTrim函数复制字符串并去掉前面的空格。
8 f# n2 o: O1 J: i9 @7 }1 ^1 r! V用法为:result = LTrim(string)( p% y5 j. t& w7 Q- l
其中,result是去掉空格后的字符串,string是要去掉空格的有效字符串表达式。
3 U7 x o/ z1 |4 q7 vMid Mid函数从字符串的某个位置复制指定数目的字符。$ Z( U3 W& @* ~2 v
用法为:result = Mid(string,start[,length])- T" p, E9 m) c" l
其中,result是结果字符串,string是要从中复制字符的表达式,start是string中复制的起始位置,length是要复制的字符数。; O. w) a; _/ S3 h
MidB Mid函数从字符串的某个位置复制指定数目的字节。
& N! r( l# j1 i& n" _! v8 ]用法为:result = Mid(string,start[,length])
8 w1 a" C7 E( c/ w T. w% |其中,result是结果字符串,string是要从中复制字节的表达式,start是string中复制的起始位置,length是要复制的字节数。
. T( w" S$ j0 O/ _6 m+ wRight Right函数从字符串的尾部提取指定数目的字符。6 F& _, w! e2 j0 q1 U6 K
用法为:result = Right(string,length)
/ f" R w4 C1 `) W其中result是字符串变量,string是有效的字符串表达式,length是表示返回多少字符的数值型表达式。+ K8 g, \" k! c6 i3 w+ _0 ?' o( m
RightB RightB函数从字符串的起始处提取指定数目的字节。. {- O$ B* ?2 s, K$ ]' u+ M' M' \( E
用法为:result = RightB(string,length)
! @8 m. j7 ]& G* V1 f其中result是字符串变量,string是有效的字符串表达式,length是表示提取的字节数的数值型表达式。
, S( m- t$ i! f" ]8 i5 d9 _RTrim RTrim函数复制字符串并去掉尾部的空格。/ F; t; i9 u- w, }( \* N6 w8 E& d% n
用法为:result = RTrim(string)
; u# L: I9 U. h4 N其中,result是去掉空格后的字符串,string是要去掉空格的有效字符串表达式。
, t) `$ {+ [5 t1 S [) S0 RString String函数构造含有多个相同字符的字符串。; ~( z4 I, l% S
用法为:result = String(number, character)) G/ M, f1 ~: c" @- e( q( f
其中,result是字符串变量,number是返回字符串的长度,character是用来构造返回字符串的字符码。
# {! R) W; A5 M+ |2 S3 M+ lTrim Trim函数复制字符串并去掉首尾的空格。
4 Q7 O, j) \6 c( G用法为:result = Trim(string)
/ O1 L" F* o+ H0 Y A# k5 s, `+ g' r& p其中,result是去掉空格后的字符串,string是要去掉空格的有效字符串表达式。
* j1 R4 `, a1 p( g& P/ pUCase UCase函数把字符串变为大写形式。% o0 |# N7 n$ U ~0 `: Y1 W
用法为:result = UCase(string)1 \! Y; Q7 M0 V( E0 I
其中result是大写字符串,string是任意有效的字符串表达式。
- C, Y8 i2 ^% l2 h5 P( q& fasp字符串函数 [讨论]
% ^$ d) h. d1 K, K9 O函数说明
# r6 L- P1 I; Y, Z8 E9 WCBool
0 L1 E, R+ [2 i( o& A数据转Boolean类型* h* o: b: B! r6 x2 `+ g. u4 X
Cdate
( j6 u, |0 c2 T# D数据转Time类型
1 @' P2 Q; \1 X" q$ l" b* L6 CCDbl0 {' r' O: n; s
数据转Double类型" z4 M9 Q, o4 c' p9 i" ^
Cint: X* d0 u4 S* R: l5 n
数据转Integer类型; p: k. B @; K4 C# \
CLng; z) p) [' D# y: v$ x
数据转Lang类型
- y7 v6 p% K/ a" c. pAsc* c& _7 C& g j7 F7 l: J: z
字符转数字类型+ O2 i( U+ r- ~
CStr& P0 {- w; A$ s! L, _
数字转String类型/ I4 ~" M: f) ~/ ^6 C' I
Chr8 S7 n2 c ~& R+ |/ `+ R
数字转字符类型
+ N' U1 y, b% p0 M$ L7 tVariant变量一般会将其代表的数据子类型自动转换成合适的数据类型,但有时候,自动转换也会造成一些数据类型不匹配的错误.这时,可使用转换函数来强制转换数据的子类型.
! c- D6 f& i3 f$ V" V+ s函数 功能+ y: ~$ F, ^) x4 ~+ E& J% R& O4 K' Y3 l
Asc 函数 返回与字符串的第一个字母对应的 ANSI 字符代码。" G5 Y% b4 Y, N0 l4 [0 ^' B
Chr 函数 返回与指定的 ANSI 字符代码相对应的字符
$ T) D- |6 [3 u. \5 aHex 函数 返回表示十六进制数字值的字符串。8 c! J, V+ ]' z* `7 X
Oct 函数 返回表示数字八进制值的字符串。
" R- @0 B( V* r. qCStr 函数 返回表达式,该表达式已被转换为 字符串 子类型。
- M9 H" X3 [! a6 aCDate 函数 返回表达式,此表达式已被转换为 日期 子类型。
3 ?. e" v, [1 N# aCInt 函数 返回表达式,此表达式已被转换为 整数 子类型。! _) w; Q" Q- W9 y
CLng 函数 返回表达式,此表达式已被转换为 长整数 子类型. n9 Y5 _ A9 k" K% F
CSng 函数 返回表达式,该表达式已被转换为 Single 子类型
: K! A, e) B8 U/ j/ G! b c9 `CDbl 函数 返回表达式,此表达式已被转换为 Double 子类型' }1 w$ g! c! A M2 ] V
CBool 函数 返回表达式,此表达式已转换为 布尔 子类型
) ?+ A5 f z6 l$ X9 q6 f) _1、Asc 函数示例
- z* _% d! X7 \ R5 h% c下面例子中, Asc 返回每一个字符串首字母的 ANSI 字符代码:
# k- H8 j: a" I! U& B0 NDim MyNumber& H# \1 U) S3 \; L0 G
MyNumber = Asc("A") '返回 65。; J7 W/ d4 T. p
MyNumber = Asc("a") '返回 97。
# g8 [ z' f+ s1 d6 E0 u, `# TMyNumber = Asc("Apple") '返回 65。
9 }" Y# N4 J) }2、Chr 函数示例
, \' ~: p; I0 o/ U: U# @5 Y5 S; i& b下面例子利用 Chr 函数返回与指定的字符代码相对应的字符: f+ S1 ^8 X+ P* E4 C$ b+ }/ K
Dim MyChar
" M% m" C9 o1 S% RMyChar = Chr(65) '返回 A。% o7 P: [+ m) W* {
MyChar = Chr(97) '返回 a。. I/ ?7 w9 e* e0 D/ G3 `9 B! x
MyChar = Chr(62) '返回 >。
) f; ]: |4 Z/ m- z' F5 @MyChar = Chr(37) '返回 %。/ x8 d( y; ?+ z: Z
3、Hex 函数示例% ^) e) Z7 e8 B5 {' z
下面的示例利用 Hex 函数返回数字的十六进制数:
# R) d( L4 ]: O3 ?) o$ iDim MyHex& m3 E, n% O/ d4 c* J; W9 B( L
MyHex = Hex(5) ' 返回 5。* k% h( j. p) i# U4 `
MyHex = Hex(10) ' 返回A。$ p# A. g/ U& Q, N( ~
MyHex = Hex(459) ' 返回 1CB。
' T1 j8 r- J1 @6 A4、Oct 函数示例
, }' A# P/ k0 B- y* f/ K% R下面的示例利用 Oct 函数返回数值的八进制数:
v4 w% e* t) D" [Dim MyOct4 r# a' V$ Y$ H; V4 Z# C
MyOct = Oct(4) ' 返回 4。2 W) ?) t4 n' L$ M' l
MyOct = Oct(8) ' 返回 10。
; s6 Y. \) j) u; G, e$ N: J( W# |) qMyOct = Oct(459) ' 返回 713。
) S9 Y* w+ [" L) J q5 x( u5、 CStr 函数示例
, @2 p9 R5 f4 P5 b4 s& r5 t3 }<%num1=666StrWelcome="欢迎第"&CStr(num1)&"个来访者"%>
0 T e8 x/ k: h# X( `# ]/ `CStr将变量num1由整数子类型强制转换为字符串子类型
. l$ R1 r4 D' Y" T, g6、CDate 函数示例# A q4 E; k% v- Z& v- X
MyDate = "October 19, 1962" ' 定义日期。
3 F+ U) C! Z7 {0 e+ r' MMyShortDate = CDate(MyDate) ' 转换为日期数据类型。
' J& o% N9 W/ D0 O' eMyTime = "4:35:47 PM" ' 定义时间。3 [7 V; V0 ]$ {& d$ u6 O
MyShortTime = CDate(MyTime) ' 转换为日期数据类型。
, S0 L# G1 P9 ~7、CInt 函数示例% i+ d, M, g# _4 ~5 m. U( I
Dim MyDouble, MyInt
6 Y% Y& ]0 M0 z- Q5 I- E5 _MyDouble = 2345.5678 ' MyDouble 是 Double。
- g. E) w, b3 n. \MyInt = CInt(MyDouble) ' MyInt 包含 2346。
' l- z1 ^7 L7 N) ^8、CLng 函数示例
! {" T# l# T' {$ ]) WDim MyVal1, MyVal2, MyLong1, MyLong27 j$ p3 s6 q; K5 P9 B+ [
MyVal1 = 25427.45: MyVal2 = 25427.55 ' MyVal1, MyVal2 是双精度值。# C; x% Z# Q7 S: J: H& N
MyLong1 = CLng(MyVal1) ' MyLong1 25427。
1 B6 `/ o& `, ~) u. U6 XMyLong2 = CLng(MyVal2) ' MyLong2 包含 25428 。( X) v0 X4 J2 b. { E; m$ h$ J9 }, `
9、CBool 函数示例7 F6 m9 `( Z: E: H/ \. n& ^
Dim A, B, Check
: F8 j. X& r5 sA = 5: B = 5 ' 初始化变量。+ O. J- ?8 y. Z# C, w* t2 t
Check = CBool(A = B) '复选框设为 True 。
5 y9 O' j& d8 K& tA = 0 '定义变量。
5 }2 r# n, D; n% W. D0 T. ]Check = CBool(A) '复选框设为 False |
|