- 注册时间
- 2008-9-13
- 最后登录
- 1970-1-1
- 在线时间
- 0 小时
- 阅读权限
- 200
- 积分
- 0
- 帖子
- 24482
- 精华
- 4
- UID
- 9
  
|
函数 语法 功能
6 q+ { ~8 @$ T8 F; _% [Len Len(string|varname) 返回字符串内字符的数目,或是存储一变量所需的字节数。
/ P. v7 J! `4 G6 Q/ N8 X5 ETrim Trim(string) 将字符串前后的空格去掉
8 c$ ~- {$ x% R1 mLtrim Ltrim(string) 将字符串前面的空格去掉
9 w9 }7 z' j8 S$ z9 nRtrim Rtrim(string) 将字符串后面的空格去掉
f) _+ ~6 J% y1 |1 ~7 GMid Mid(string,start,length) 从string字符串的start字符开始取得length长度的字符串,如果省略第三个参数表示从start字符开始到字符串结尾的字符串 6 `( y- x8 F7 ~5 C; `
Left Left(string,length) 从string字符串的左边取得length长度的字符串
* v' p7 E- S1 `* l( T, ERight Right(string,length) 从string字符串的右边取得length长度的字符串
3 m6 @# \6 {( m8 X' KLCase LCase(string) 将string字符串里的所有大写字母转化为小写字母 1 f8 }6 q! g- _& j& b- c
UCase UCase(string) 将string字符串里的所有大写字母转化为大写字母
% R0 C- S& m& a8 i" r4 A" VStrComp StrComp(string1,string2[,compare]) 返回string1字符串与string2字符串的比较结果,如果两个字符串相同,则返回0,如果小于则返回-1,如果大于则返回1 ! g T2 z) J' l' g4 M
InStr InStr(string1,string2[,compare]) 返回string1字符串在string2字符串中第一次出现的位置 + D$ W1 j5 `( v; T
Split Split(string1,delimiter[,count[,start]]) 将字符串根据delimiter拆分成一维数组,其中delimiter用于标识子字符串界限。如果省略,使用空格("")作为分隔符。count返回的子字符串数目,-1指示返回所有子字符串。start为1执行文本比较;如果为0或者省略执行二进制比较。
% z5 P5 T2 s9 K$ Y* C: E1 `3 k+ {Replace Replace(expression,find,replacewith[,compare[,count[,start]]]) 返回字符串,其中指定数目的某子字符串(find)被替换为另一个子字符串(replacewith)。
; I( N' G( |! _4 m! ~4 V6 y; n3 u( k! ~6 X0 [$ m1 G& e
补充:
4 e$ S2 q1 t- j3 gAsc Asc函数提取字符串第一个字母的ANSI字符码。
. K: ]2 E' n. i1 c6 b1 n* D% s用法为:result = Asc(string)
# S/ t/ a4 ^ |8 O其中result是字符码,string是任意有效的字符串表达式。如果string为Empty,则产生一个实时错误。: C1 E% d N0 N. \, m- S7 y1 M
AscB AscB函数提取字符串的第一个字节。* c: K. n: h7 y, m
用法为:result = AscB(string)3 e) ~& `+ I* i5 C; Q! P
其中result是Byte字类,string是任意有效的字符串表达式。如果string为Empty,则产生一个实时错误。
9 E# p _1 O' h6 W, j e KAscW AscW函数提取字符串第一个字母的Unicode字符码。
5 s6 m2 o. |3 n. Y用法为:result = AscW(string)
1 B& T2 o- C0 Z其中result是Unicode,string是任意有效的字符串表达式。如果string为Empty,则产生一个实时错误。
v8 k8 z9 X* D9 w; i n1 X- RInStr InStr函数识别某个记号在字符串中的首字母位置。3 O# L+ j& p8 u0 X$ V+ n4 t5 @
用法为:newstart = InStr([start, ]source, token[, compare])2 v5 w# ~( x) M
其中newstart时记号在字符串中的位置(如果没有的话则为0),start是查找的起始位置,source是要查找的字符串,token是要定位的字符串,compare是比较类型(0表示二进制比较,1表示忽略大小写的文本比较)。2 a s5 @' p& |) {4 _" M
InStrB InStrB函数是InStr的字节版,识别某个记号在字符串中的首字节位置。
, b0 x" |3 W, ]* B0 B) D用法为:newstart = InStrB([start, ]source, token[, compare])5 n7 z! T8 ~$ I" a6 x& n
其中newstart时记号在字符串中的首字节位置(如果没有的话则为0),start是查找的起始位置,source是要查找的字符串,token是要定位的字符串,compare是比较类型(0表示二进制比较,1表示忽略大小写的文本比较)。
9 n0 O) u$ x2 m' i& s4 _LCase LCase函数把字符串变为小写形式。
. {$ r3 M! G( M6 r e0 s用法为:result = LCase(string)% n( b) u. R* Z; b
其中result是小写字符串,string是任意有效的字符串表达式。8 \. K% ^' K" z! O% q/ {0 n( m
Left Left函数从字符串的起始处提取指定数目的字符。% N" l$ w9 s, G8 l$ w
用法为:result = Left(string,length)
0 i, t* p1 E1 V1 }. M其中result是字符串变量,string是有效的字符串表达式,length是表示返回多少字符的数值型表达式。% ?, c: O' `: |
LeftB LeftB函数从字符串的起始处提取指定数目的字节。
: B0 W+ G: @! H" S用法为:result = LeftB(string,length)$ R, q+ p2 J9 I+ u
其中result是字符串变量,string是有效的字符串表达式,length是表示提取的字节数的数值型表达式。
0 x: i, g# i8 \( S* b8 m eLen Len函数确定字符串的大小或存储这个变量需要多少字符。
7 ?. }6 F& O- @* i! u }用法为:result = Len(string | varname)
3 R* v/ U4 j. Q8 Z5 ^1 K其中,result是字符串中的字符数或存储这个变量所需的字节数,string是任意有效的字符串表达式,varname是变量名。& Z. Z5 s5 F' }- r, G
LenB Len函数确定字符串的大小或存储这个变量需要多少字节。
% g: y; p# p3 C3 p用法为:result = LenB(string | varname)* ^: p ^+ T' F! G* O; b
其中,result是字符串中的字节数或存储这个变量所需的字节数,string是任意有效的字符串表达式,varname是变量名。
) I- @% D% m/ @7 j( c6 q- Q3 DLTrim LTrim函数复制字符串并去掉前面的空格。
$ i8 i' M4 C* F3 Y! U用法为:result = LTrim(string) j% \) t- B& j4 ]
其中,result是去掉空格后的字符串,string是要去掉空格的有效字符串表达式。
% { l. c* w- c6 [& L g* |Mid Mid函数从字符串的某个位置复制指定数目的字符。! n0 G; D2 b: x. ^7 B& D$ y4 u
用法为:result = Mid(string,start[,length])5 f! b: k% h# L4 |1 ?* d6 K
其中,result是结果字符串,string是要从中复制字符的表达式,start是string中复制的起始位置,length是要复制的字符数。
! _$ v$ v: q; D, i: fMidB Mid函数从字符串的某个位置复制指定数目的字节。3 u. S, X% `$ @' o; a2 i+ b
用法为:result = Mid(string,start[,length])
' Q5 }" m. o l; W# f7 t其中,result是结果字符串,string是要从中复制字节的表达式,start是string中复制的起始位置,length是要复制的字节数。! R7 q" M! v! @/ |% m# Y6 }7 T2 _4 \
Right Right函数从字符串的尾部提取指定数目的字符。
: X4 a O5 N, j) ~( v% \用法为:result = Right(string,length)/ b# v* R' M) B) ]7 F$ L) w. m
其中result是字符串变量,string是有效的字符串表达式,length是表示返回多少字符的数值型表达式。
) `* j7 f4 v0 g5 JRightB RightB函数从字符串的起始处提取指定数目的字节。
) `3 c S$ G8 O. i3 l" X9 K用法为:result = RightB(string,length)
4 E( y- @7 L4 j' l& Z8 a2 K# E% E5 H其中result是字符串变量,string是有效的字符串表达式,length是表示提取的字节数的数值型表达式。; V/ ]! @- [8 _; C: Q8 n1 J
RTrim RTrim函数复制字符串并去掉尾部的空格。% L& Y& T6 ^7 P
用法为:result = RTrim(string)
/ m1 h4 x7 D0 r; z3 e( d1 p其中,result是去掉空格后的字符串,string是要去掉空格的有效字符串表达式。/ _( y; E9 z4 ?1 a) q8 Q8 U5 D
String String函数构造含有多个相同字符的字符串。
1 O4 R6 _8 p m- H: h5 M用法为:result = String(number, character)$ X9 j' k+ v7 m$ Y) ~. B) N$ @
其中,result是字符串变量,number是返回字符串的长度,character是用来构造返回字符串的字符码。3 H2 ~$ N( x' B1 J$ G4 ^( ~
Trim Trim函数复制字符串并去掉首尾的空格。, Y4 k1 g& w1 f: {/ S% d
用法为:result = Trim(string)9 w& _. Y |2 E0 Y$ h( c
其中,result是去掉空格后的字符串,string是要去掉空格的有效字符串表达式。+ \5 h x, Q* S4 u
UCase UCase函数把字符串变为大写形式。
( r( b& s- i' ]2 g1 G用法为:result = UCase(string)
0 c: {9 j" q$ V9 [, e其中result是大写字符串,string是任意有效的字符串表达式。
& ]8 a7 L9 q, c) V( d: H7 Oasp字符串函数 [讨论] W3 D: j- T' C/ m |( X+ u5 w( ^
函数说明$ G( Z6 ^7 w. P8 S# C1 n' ^
CBool
( ~! ~% |! m! A% K6 B# K$ ]% @, r数据转Boolean类型( C) V; x2 i' h* b# A5 y
Cdate. M+ M8 c& K; _' m+ {' w
数据转Time类型
: ?' o2 a& S+ a$ b; M$ gCDbl/ v* V6 S# j6 D/ `' u
数据转Double类型
% E `" I3 F' ~& s# f8 PCint& T9 g8 r2 \: N+ Q& E
数据转Integer类型
4 i. w& y+ Z4 ] ECLng
, c! M3 q3 x# q8 C: _数据转Lang类型6 O7 b' l& p/ h- f6 {- @0 u
Asc
c8 k) ]1 `& \' S3 o1 Z3 |1 [. \字符转数字类型, B2 f1 W& v% D
CStr, P* Y+ f6 O$ {( ^
数字转String类型
9 t# q) Y1 V5 g5 v5 u" ?7 A: s6 PChr6 e+ s7 M! @ F. c) m
数字转字符类型4 n T: S, C. L
Variant变量一般会将其代表的数据子类型自动转换成合适的数据类型,但有时候,自动转换也会造成一些数据类型不匹配的错误.这时,可使用转换函数来强制转换数据的子类型.' T& s# g9 \' A; u! A- q1 {1 n* D
函数 功能, j* y- a$ N) i( }. i! e) s
Asc 函数 返回与字符串的第一个字母对应的 ANSI 字符代码。& R- c8 P8 [5 l1 a- @
Chr 函数 返回与指定的 ANSI 字符代码相对应的字符
/ V! r# I, u9 D4 M; DHex 函数 返回表示十六进制数字值的字符串。' S: D- d1 }. {! `
Oct 函数 返回表示数字八进制值的字符串。
8 J1 ?/ C- F3 g, s! A4 b5 {CStr 函数 返回表达式,该表达式已被转换为 字符串 子类型。7 a( a4 V" z* ~/ _) y: Y8 i
CDate 函数 返回表达式,此表达式已被转换为 日期 子类型。* M j. }4 ~. f% |" A
CInt 函数 返回表达式,此表达式已被转换为 整数 子类型。
' c) n. B3 P: Q4 B% G+ H/ |7 DCLng 函数 返回表达式,此表达式已被转换为 长整数 子类型: f3 @4 [- `/ g
CSng 函数 返回表达式,该表达式已被转换为 Single 子类型
( A8 r9 g) R5 k' VCDbl 函数 返回表达式,此表达式已被转换为 Double 子类型
# @4 W9 N1 ]& W' X" k! n2 J; XCBool 函数 返回表达式,此表达式已转换为 布尔 子类型
# l% c3 _- t0 L& l5 C% I; O, ?1、Asc 函数示例
5 z" @+ C5 U6 y* `# W, V' i下面例子中, Asc 返回每一个字符串首字母的 ANSI 字符代码:0 j7 M8 a4 [5 z' d% u, |( @
Dim MyNumber* M, M1 S; u, f" v
MyNumber = Asc("A") '返回 65。
1 Z- r! @8 O# pMyNumber = Asc("a") '返回 97。9 v! h: @4 e [# _/ j
MyNumber = Asc("Apple") '返回 65。; s* p% o" s( D1 o1 Y6 y
2、Chr 函数示例% g. K, F9 ~" j7 S: o
下面例子利用 Chr 函数返回与指定的字符代码相对应的字符:
4 D* H: y' ]. W) Y) l; SDim MyChar
* @% E- W- U$ j3 F. }* n6 I& dMyChar = Chr(65) '返回 A。
3 z, ?" ~0 X3 d* `8 ~MyChar = Chr(97) '返回 a。
, c$ {( c1 f9 GMyChar = Chr(62) '返回 >。+ R& s- V& `" p- X( W# Q- p8 z. v0 `
MyChar = Chr(37) '返回 %。! h5 C' j; s2 f( E
3、Hex 函数示例! w) u! w/ X2 h' `
下面的示例利用 Hex 函数返回数字的十六进制数:( ^' P% z6 E) Z& b- m
Dim MyHex2 {1 g) M; [1 Q' Z3 t/ ~/ z: K
MyHex = Hex(5) ' 返回 5。$ `9 o) J! a ]2 v- t+ _; ~
MyHex = Hex(10) ' 返回A。5 ^7 \5 e6 E5 R- b
MyHex = Hex(459) ' 返回 1CB。. K" f4 m5 d: ^, L
4、Oct 函数示例4 [0 m8 _4 W. K. m& [4 [/ D8 ^" S
下面的示例利用 Oct 函数返回数值的八进制数:9 t4 O$ f3 w+ \- I! m: U
Dim MyOct
' [) [7 S1 A+ V3 A9 rMyOct = Oct(4) ' 返回 4。' ]. I* H- }) J$ j- J% b
MyOct = Oct(8) ' 返回 10。
9 [/ }& a9 x- L" ]( KMyOct = Oct(459) ' 返回 713。' {* F. X2 H8 e. \
5、 CStr 函数示例
# c: N% c! [; W<%num1=666StrWelcome="欢迎第"&CStr(num1)&"个来访者"%>
/ |, C4 ^7 I0 m. t0 o( OCStr将变量num1由整数子类型强制转换为字符串子类型
8 `/ b7 }! L5 O1 [5 Y4 q6、CDate 函数示例
# l0 G3 S' Q% h3 b. s9 xMyDate = "October 19, 1962" ' 定义日期。
: g4 p4 ?1 v) u# `6 H( OMyShortDate = CDate(MyDate) ' 转换为日期数据类型。9 x4 T7 a/ [2 }. V
MyTime = "4:35:47 PM" ' 定义时间。4 ~2 v7 ^ H' q0 O1 z$ i! T9 Z" ~
MyShortTime = CDate(MyTime) ' 转换为日期数据类型。
6 Z+ L- C# B6 K" {7、CInt 函数示例
7 s0 g; y3 _4 S! Q3 gDim MyDouble, MyInt$ V b$ g) X" i$ R1 r
MyDouble = 2345.5678 ' MyDouble 是 Double。% n/ v; i! I; C. T* n' X @& w
MyInt = CInt(MyDouble) ' MyInt 包含 2346。
- W$ Z* A6 D- e. p* Z _3 N G2 h8、CLng 函数示例3 A8 {* c2 z r( d# J
Dim MyVal1, MyVal2, MyLong1, MyLong2
! A2 @' j' m6 F, P/ P4 _MyVal1 = 25427.45: MyVal2 = 25427.55 ' MyVal1, MyVal2 是双精度值。
" p! N+ p/ a8 B; TMyLong1 = CLng(MyVal1) ' MyLong1 25427。
0 M# U3 T1 R# M9 o& G- ?MyLong2 = CLng(MyVal2) ' MyLong2 包含 25428 。" ?3 N& p& }: q/ i
9、CBool 函数示例0 E/ J5 w; n; O8 F) r
Dim A, B, Check, A1 F- C/ l- {, o/ T8 {$ S3 U7 U
A = 5: B = 5 ' 初始化变量。 w( Z3 `+ P5 |: x
Check = CBool(A = B) '复选框设为 True 。
/ ]& N) F; {6 X& E4 _* G& I6 @6 A; }A = 0 '定义变量。' i$ @4 H0 Q* N! `' }! r5 U
Check = CBool(A) '复选框设为 False |
|