- 注册时间
- 2008-9-13
- 最后登录
- 1970-1-1
- 在线时间
- 0 小时
- 阅读权限
- 200
- 积分
- 0
- 帖子
- 24482
- 精华
- 4
- UID
- 9
  
|
函数 语法 功能 ( N2 {$ l* n7 n
Len Len(string|varname) 返回字符串内字符的数目,或是存储一变量所需的字节数。 ) F9 r6 k2 K' P6 V4 q1 |
Trim Trim(string) 将字符串前后的空格去掉 3 ]: g" C0 R6 u8 N6 K
Ltrim Ltrim(string) 将字符串前面的空格去掉
; r% Y% R6 b1 {# K( oRtrim Rtrim(string) 将字符串后面的空格去掉 ( v/ g0 |) I- w' D+ S4 J
Mid Mid(string,start,length) 从string字符串的start字符开始取得length长度的字符串,如果省略第三个参数表示从start字符开始到字符串结尾的字符串
& I- h8 a2 U% i8 ?Left Left(string,length) 从string字符串的左边取得length长度的字符串
# I' x: G, E& D" w3 R$ ^% yRight Right(string,length) 从string字符串的右边取得length长度的字符串
0 A$ F/ b" M! u! m6 W7 {LCase LCase(string) 将string字符串里的所有大写字母转化为小写字母
) I, A, Y/ {5 DUCase UCase(string) 将string字符串里的所有大写字母转化为大写字母 4 G$ r6 `9 I& ]& D1 a7 u
StrComp StrComp(string1,string2[,compare]) 返回string1字符串与string2字符串的比较结果,如果两个字符串相同,则返回0,如果小于则返回-1,如果大于则返回1 8 {' L( ^# z2 A
InStr InStr(string1,string2[,compare]) 返回string1字符串在string2字符串中第一次出现的位置 * a5 K, \1 G$ ]0 C
Split Split(string1,delimiter[,count[,start]]) 将字符串根据delimiter拆分成一维数组,其中delimiter用于标识子字符串界限。如果省略,使用空格("")作为分隔符。count返回的子字符串数目,-1指示返回所有子字符串。start为1执行文本比较;如果为0或者省略执行二进制比较。
1 S& h1 ^1 H8 |7 a2 v9 pReplace Replace(expression,find,replacewith[,compare[,count[,start]]]) 返回字符串,其中指定数目的某子字符串(find)被替换为另一个子字符串(replacewith)。- S5 h$ O* v" m$ x2 \5 \
/ v: ?3 b* W6 p# V1 ~补充:8 E( l9 l! j" I8 l$ s9 c* T" B" E
Asc Asc函数提取字符串第一个字母的ANSI字符码。2 x, B5 L& S% n {
用法为:result = Asc(string)
; q0 O; _* R* y其中result是字符码,string是任意有效的字符串表达式。如果string为Empty,则产生一个实时错误。
6 ?) B6 O2 K, K/ Z7 mAscB AscB函数提取字符串的第一个字节。& g1 e% X$ Y2 d5 W9 b
用法为:result = AscB(string)2 B( h$ x% z- H' J
其中result是Byte字类,string是任意有效的字符串表达式。如果string为Empty,则产生一个实时错误。3 G) G7 c8 j9 G' j" l) K
AscW AscW函数提取字符串第一个字母的Unicode字符码。
" F$ b7 n& t+ }$ s, y用法为:result = AscW(string)
4 |% O4 w d$ b$ x7 _+ @( ~4 a其中result是Unicode,string是任意有效的字符串表达式。如果string为Empty,则产生一个实时错误。
! w6 }' }" n, r% mInStr InStr函数识别某个记号在字符串中的首字母位置。: w: C. ~ p$ U4 c( t- ^0 _" e
用法为:newstart = InStr([start, ]source, token[, compare])3 L- g% _2 }0 t$ |3 Y( n& T; k" R2 }
其中newstart时记号在字符串中的位置(如果没有的话则为0),start是查找的起始位置,source是要查找的字符串,token是要定位的字符串,compare是比较类型(0表示二进制比较,1表示忽略大小写的文本比较)。' ~, F7 d" A3 O1 `- O
InStrB InStrB函数是InStr的字节版,识别某个记号在字符串中的首字节位置。9 p+ Y4 p: z( j, p6 H; W
用法为:newstart = InStrB([start, ]source, token[, compare])
% I% S; n- k2 p( t其中newstart时记号在字符串中的首字节位置(如果没有的话则为0),start是查找的起始位置,source是要查找的字符串,token是要定位的字符串,compare是比较类型(0表示二进制比较,1表示忽略大小写的文本比较)。) N, j. S& n9 }/ o$ H8 I
LCase LCase函数把字符串变为小写形式。
, H: y9 _# T7 O1 h2 J4 v用法为:result = LCase(string)
& m& l# i6 }5 u其中result是小写字符串,string是任意有效的字符串表达式。
4 S. G7 b- _4 I1 |) RLeft Left函数从字符串的起始处提取指定数目的字符。
' M9 A3 m) V6 r7 h7 }' b# v用法为:result = Left(string,length)% z0 g( x$ p# S& Y% j) _: ~. ]( n) y1 H
其中result是字符串变量,string是有效的字符串表达式,length是表示返回多少字符的数值型表达式。8 W" Y; J7 s7 j6 d4 F# l
LeftB LeftB函数从字符串的起始处提取指定数目的字节。
6 T1 `( r+ C+ [* D% @% ]用法为:result = LeftB(string,length)/ }$ t9 L. K0 L3 U1 e) o
其中result是字符串变量,string是有效的字符串表达式,length是表示提取的字节数的数值型表达式。) G4 y# j- T" a1 J/ S8 e
Len Len函数确定字符串的大小或存储这个变量需要多少字符。
7 D! c5 A- w6 u( I L* M用法为:result = Len(string | varname)
" |4 h. U7 j3 ^: h* ?其中,result是字符串中的字符数或存储这个变量所需的字节数,string是任意有效的字符串表达式,varname是变量名。, l$ T, K5 k) Y( z. R
LenB Len函数确定字符串的大小或存储这个变量需要多少字节。
4 b& r y4 Z7 X' j: {" w用法为:result = LenB(string | varname)
; P. h9 d( `3 j其中,result是字符串中的字节数或存储这个变量所需的字节数,string是任意有效的字符串表达式,varname是变量名。
% p+ N$ q6 L, q. {2 }4 f! [* y+ [$ ]1 iLTrim LTrim函数复制字符串并去掉前面的空格。
& G- m. R; l" Y- v4 f( e+ }( I q用法为:result = LTrim(string)
* `1 \. g, d b: g其中,result是去掉空格后的字符串,string是要去掉空格的有效字符串表达式。; Z1 F& [0 A4 w4 }2 h4 r, m. \/ V
Mid Mid函数从字符串的某个位置复制指定数目的字符。
8 G, Y {9 z! R Z F0 o# @6 |用法为:result = Mid(string,start[,length])$ m$ s1 e* O5 ]' \( @, b
其中,result是结果字符串,string是要从中复制字符的表达式,start是string中复制的起始位置,length是要复制的字符数。 b5 y/ u% G, J( v/ W6 J* N! \3 F
MidB Mid函数从字符串的某个位置复制指定数目的字节。
6 ?# ?$ p* A6 X! Z" B用法为:result = Mid(string,start[,length])
2 ^( ~2 p0 J( x其中,result是结果字符串,string是要从中复制字节的表达式,start是string中复制的起始位置,length是要复制的字节数。
4 N2 V0 a4 f: o2 i+ @9 NRight Right函数从字符串的尾部提取指定数目的字符。
0 j" s0 k4 P- x" C) d( P& l4 s0 ^用法为:result = Right(string,length)6 G$ [- i _, Q
其中result是字符串变量,string是有效的字符串表达式,length是表示返回多少字符的数值型表达式。! a5 ^# _1 M* _' e7 i8 [+ e& _. L: d
RightB RightB函数从字符串的起始处提取指定数目的字节。$ s% ~. d* O) ^$ d
用法为:result = RightB(string,length)6 f1 I' [' _& J& k( k0 k5 z+ `0 C" c7 F
其中result是字符串变量,string是有效的字符串表达式,length是表示提取的字节数的数值型表达式。
% e" E' U( O: z" m) dRTrim RTrim函数复制字符串并去掉尾部的空格。( }/ t& f7 V/ A+ _& \$ h* V
用法为:result = RTrim(string)
! s+ U+ x) ~0 I其中,result是去掉空格后的字符串,string是要去掉空格的有效字符串表达式。( C' O8 @& }: F
String String函数构造含有多个相同字符的字符串。" P7 t H) ? ~- T5 ~
用法为:result = String(number, character); d0 S& D" r! D1 r$ D6 `7 C
其中,result是字符串变量,number是返回字符串的长度,character是用来构造返回字符串的字符码。% g7 @6 ]+ { }' h3 q% @
Trim Trim函数复制字符串并去掉首尾的空格。4 A6 D( v1 h$ m
用法为:result = Trim(string)2 a9 O, [2 r2 v" |6 Y
其中,result是去掉空格后的字符串,string是要去掉空格的有效字符串表达式。
/ L% u4 D* {( J5 n) nUCase UCase函数把字符串变为大写形式。$ f$ w4 s( t" e
用法为:result = UCase(string)8 y/ ~3 X' J: [
其中result是大写字符串,string是任意有效的字符串表达式。
) }& P- |% ^% w" O0 k! wasp字符串函数 [讨论] @ `& K4 L! q) l0 Z8 z9 o
函数说明5 S6 J# v" {: ~+ K
CBool
# l! w; Z* M6 W% ^2 c9 @6 k7 h数据转Boolean类型
6 _, j. j/ j* C) _' K6 w& nCdate
' Z" R* j. o, G+ a* A1 O9 Z数据转Time类型
+ K, L+ h j3 {. R: HCDbl% T7 L4 s1 Z/ D% N, X* C
数据转Double类型; s$ g, q4 O0 d) ~% t+ W1 S) O
Cint- N: h, {8 o: y& p: ^" N
数据转Integer类型, T k: @0 D% \2 r6 f
CLng0 N. j) q* ]/ W" ?
数据转Lang类型- B: P, t& c9 g+ M% ^0 j
Asc
8 m+ B& \" ^( ~1 J5 k$ D+ G字符转数字类型3 K8 w- c( H/ r- J$ B# t
CStr9 t# h7 x1 r% \# W; C
数字转String类型 Q) T: o# t% L4 Z
Chr! T" U P6 P1 C, r! h( D& }
数字转字符类型$ P* T, {; i9 B% l8 E" w( T/ L
Variant变量一般会将其代表的数据子类型自动转换成合适的数据类型,但有时候,自动转换也会造成一些数据类型不匹配的错误.这时,可使用转换函数来强制转换数据的子类型.% Z5 q. v5 k( [
函数 功能7 M( ]$ \( Y5 {' V
Asc 函数 返回与字符串的第一个字母对应的 ANSI 字符代码。
1 M0 y4 _- U4 r% EChr 函数 返回与指定的 ANSI 字符代码相对应的字符9 } X! ]- u0 j1 q Z6 n
Hex 函数 返回表示十六进制数字值的字符串。! `. w$ E& @+ F0 p* E! F3 F- q d
Oct 函数 返回表示数字八进制值的字符串。 o+ p, Y+ E8 c# R7 }
CStr 函数 返回表达式,该表达式已被转换为 字符串 子类型。) s& j. f5 ^2 c" y
CDate 函数 返回表达式,此表达式已被转换为 日期 子类型。
a. i1 y! E4 Y m1 v' {# cCInt 函数 返回表达式,此表达式已被转换为 整数 子类型。3 a0 q1 J3 P' B5 V, u
CLng 函数 返回表达式,此表达式已被转换为 长整数 子类型2 h5 N4 w4 I; a0 p3 E5 b
CSng 函数 返回表达式,该表达式已被转换为 Single 子类型# F3 m- p% r& j) D* [
CDbl 函数 返回表达式,此表达式已被转换为 Double 子类型
2 I/ m" {% H. yCBool 函数 返回表达式,此表达式已转换为 布尔 子类型6 }5 A) K2 N* K( z5 T6 p! k1 x- ]/ r
1、Asc 函数示例& X* Q* @1 @9 A
下面例子中, Asc 返回每一个字符串首字母的 ANSI 字符代码:5 T: X, d6 ?" r5 V
Dim MyNumber# w# {5 i" P* u8 ~( p) R1 b
MyNumber = Asc("A") '返回 65。
' `& P: m4 y" o, P0 IMyNumber = Asc("a") '返回 97。
6 I! e, K* p! n2 P) y2 {/ N1 ^MyNumber = Asc("Apple") '返回 65。
# N: S- l- b0 F4 I, v' R5 ?4 N2、Chr 函数示例/ L; ~4 {1 \8 Q7 n$ h/ M
下面例子利用 Chr 函数返回与指定的字符代码相对应的字符:" ]% W A; R" T3 `
Dim MyChar
# Y& Q: C' N8 ZMyChar = Chr(65) '返回 A。
0 q3 x1 G* v# q9 @5 pMyChar = Chr(97) '返回 a。
8 D9 m) @% Z g5 J6 }/ nMyChar = Chr(62) '返回 >。
7 g- Q6 Q, m' ?7 i" }MyChar = Chr(37) '返回 %。
7 r! ?+ j G! I3、Hex 函数示例
7 q5 u' b5 ?3 J下面的示例利用 Hex 函数返回数字的十六进制数:
3 O# J$ W& k" u5 v) xDim MyHex: w9 J5 n' ?4 F& b j
MyHex = Hex(5) ' 返回 5。
2 K4 ^# g; @- E4 B% K- @' QMyHex = Hex(10) ' 返回A。
6 `6 e: _+ P3 _: |" M# I/ K: \MyHex = Hex(459) ' 返回 1CB。
# M) A* n" L* q: s, _4、Oct 函数示例, S% v' F3 [- h
下面的示例利用 Oct 函数返回数值的八进制数:# r. d n) P5 w- Y3 N! P+ L
Dim MyOct% O) `1 }; V' @
MyOct = Oct(4) ' 返回 4。. ^. W0 ]3 Q1 G; n% Q% Q* T
MyOct = Oct(8) ' 返回 10。 a% O8 O9 t$ s" _( J6 w
MyOct = Oct(459) ' 返回 713。( ^& U- m* N* L- ^9 \
5、 CStr 函数示例' d) M) z& z) q! R' l
<%num1=666StrWelcome="欢迎第"&CStr(num1)&"个来访者"%>
) t9 j: I! s8 a6 K7 `; c2 ?CStr将变量num1由整数子类型强制转换为字符串子类型7 o: q" }' w1 e& {
6、CDate 函数示例4 H* k! B6 A* a2 Y8 Y
MyDate = "October 19, 1962" ' 定义日期。
( C7 l& q2 p0 WMyShortDate = CDate(MyDate) ' 转换为日期数据类型。
* U& m5 i- v$ y) y, f6 e0 bMyTime = "4:35:47 PM" ' 定义时间。
) b/ a, D2 s9 }! MMyShortTime = CDate(MyTime) ' 转换为日期数据类型。) M o3 H) a7 J- }9 W8 J' p* A
7、CInt 函数示例
2 L# I) @; U- \2 A- y( U1 A$ KDim MyDouble, MyInt
7 r( r7 o( K8 K8 l( @* D) tMyDouble = 2345.5678 ' MyDouble 是 Double。
3 o% y; r1 s" B( v2 t& m- m7 E: a. jMyInt = CInt(MyDouble) ' MyInt 包含 2346。
# d0 F$ |& W5 Y8、CLng 函数示例
% ^/ s/ ~- e7 V( TDim MyVal1, MyVal2, MyLong1, MyLong2
* [: A* f! j4 t) e: p) EMyVal1 = 25427.45: MyVal2 = 25427.55 ' MyVal1, MyVal2 是双精度值。
, [5 T" s% Z8 `0 kMyLong1 = CLng(MyVal1) ' MyLong1 25427。# o; a& |- u; x" q1 ]$ O
MyLong2 = CLng(MyVal2) ' MyLong2 包含 25428 。
1 [7 t7 X) E Z* `9、CBool 函数示例+ s2 o% l5 T6 Z3 g+ D, A2 t
Dim A, B, Check
- W2 d7 _) l6 e0 u V4 u9 ?A = 5: B = 5 ' 初始化变量。6 c. g4 w. e) K$ r4 {& e( g( G+ N
Check = CBool(A = B) '复选框设为 True 。
" ?, e% z7 s d+ f8 kA = 0 '定义变量。
2 f# ^& {5 k, c9 m( y9 G# VCheck = CBool(A) '复选框设为 False |
|