- 注册时间
- 2008-9-13
- 最后登录
- 1970-1-1
- 在线时间
- 0 小时
- 阅读权限
- 200
- 积分
- 0
- 帖子
- 24482
- 精华
- 4
- UID
- 9
  
|
函数 语法 功能 ( |& T" X' ^: d
Len Len(string|varname) 返回字符串内字符的数目,或是存储一变量所需的字节数。 3 Y. W- p( ^+ r: }
Trim Trim(string) 将字符串前后的空格去掉 8 N6 s, d) r' }- [1 K$ `2 e+ K8 B
Ltrim Ltrim(string) 将字符串前面的空格去掉 7 P6 V1 {" F7 o+ @6 b' H: O
Rtrim Rtrim(string) 将字符串后面的空格去掉 2 Q5 T: h1 w ^9 q3 X5 W
Mid Mid(string,start,length) 从string字符串的start字符开始取得length长度的字符串,如果省略第三个参数表示从start字符开始到字符串结尾的字符串 3 _2 g, X& Y& d, s( S3 Z
Left Left(string,length) 从string字符串的左边取得length长度的字符串
1 | y0 e# ]1 C6 C7 HRight Right(string,length) 从string字符串的右边取得length长度的字符串 * }/ z" ]) X3 O3 H" a3 n) M& X6 G
LCase LCase(string) 将string字符串里的所有大写字母转化为小写字母 ' Q3 ]2 X% G; G; H Y# f# [ G
UCase UCase(string) 将string字符串里的所有大写字母转化为大写字母
$ Y) ?" r. Y, r7 o6 P: R4 i0 R8 s' VStrComp StrComp(string1,string2[,compare]) 返回string1字符串与string2字符串的比较结果,如果两个字符串相同,则返回0,如果小于则返回-1,如果大于则返回1 9 F4 j' g+ [5 B+ i. H6 D) \- X
InStr InStr(string1,string2[,compare]) 返回string1字符串在string2字符串中第一次出现的位置 7 F9 R- q {2 b% c
Split Split(string1,delimiter[,count[,start]]) 将字符串根据delimiter拆分成一维数组,其中delimiter用于标识子字符串界限。如果省略,使用空格("")作为分隔符。count返回的子字符串数目,-1指示返回所有子字符串。start为1执行文本比较;如果为0或者省略执行二进制比较。 8 w9 q9 {- T6 \( g5 f
Replace Replace(expression,find,replacewith[,compare[,count[,start]]]) 返回字符串,其中指定数目的某子字符串(find)被替换为另一个子字符串(replacewith)。
* L+ ]- N6 }: z% V' s& T) X
; A, c O: G' i {9 T, h# D补充:
; c# E- |$ N: R8 Q, ~Asc Asc函数提取字符串第一个字母的ANSI字符码。; r6 I4 E t: l% ~
用法为:result = Asc(string)
) D1 `! Q, {7 l7 P4 v$ ~其中result是字符码,string是任意有效的字符串表达式。如果string为Empty,则产生一个实时错误。
" i2 z/ R0 }, T* D( S$ R( F( F5 wAscB AscB函数提取字符串的第一个字节。
Y, c2 N, t7 F$ X% Q* O用法为:result = AscB(string)
- F. S- U1 w* D* k其中result是Byte字类,string是任意有效的字符串表达式。如果string为Empty,则产生一个实时错误。
4 k ^9 M5 S0 g" O' jAscW AscW函数提取字符串第一个字母的Unicode字符码。1 q; s' E$ K7 x! _
用法为:result = AscW(string)
: x4 \1 m( `: X4 Z其中result是Unicode,string是任意有效的字符串表达式。如果string为Empty,则产生一个实时错误。& Z6 U2 d6 z+ }5 f$ b5 W: g
InStr InStr函数识别某个记号在字符串中的首字母位置。
* A! Z. Y& i0 e, }: W9 D+ c用法为:newstart = InStr([start, ]source, token[, compare])
- r7 I5 F6 B, b0 b" B其中newstart时记号在字符串中的位置(如果没有的话则为0),start是查找的起始位置,source是要查找的字符串,token是要定位的字符串,compare是比较类型(0表示二进制比较,1表示忽略大小写的文本比较)。8 w+ j! \( U) W2 x# c
InStrB InStrB函数是InStr的字节版,识别某个记号在字符串中的首字节位置。; }; A# i) j! X1 G) q& k
用法为:newstart = InStrB([start, ]source, token[, compare])7 N- B* [* [/ o8 p: g9 a
其中newstart时记号在字符串中的首字节位置(如果没有的话则为0),start是查找的起始位置,source是要查找的字符串,token是要定位的字符串,compare是比较类型(0表示二进制比较,1表示忽略大小写的文本比较)。/ B& y: h8 E7 `/ R7 k& P
LCase LCase函数把字符串变为小写形式。1 [" _$ D; J) x$ l5 d% q
用法为:result = LCase(string)/ M( f1 b+ Q7 t, T8 a/ J9 v2 l
其中result是小写字符串,string是任意有效的字符串表达式。
* C9 Z4 v3 [; Z# Z$ u. Y1 A7 iLeft Left函数从字符串的起始处提取指定数目的字符。
K1 I6 l+ _8 U, i用法为:result = Left(string,length)
6 ]- _9 i7 C( t% `! f$ o其中result是字符串变量,string是有效的字符串表达式,length是表示返回多少字符的数值型表达式。1 U$ K9 K) w1 h6 s! I
LeftB LeftB函数从字符串的起始处提取指定数目的字节。# A9 ^8 \3 D& x1 k) N% U; i
用法为:result = LeftB(string,length) Y0 J: O9 I9 b
其中result是字符串变量,string是有效的字符串表达式,length是表示提取的字节数的数值型表达式。
! Q6 |5 w, M+ gLen Len函数确定字符串的大小或存储这个变量需要多少字符。6 X7 T7 J A2 p0 x' j3 D" G
用法为:result = Len(string | varname)
: _" R4 D& s2 Z+ H$ M9 u1 t; ]其中,result是字符串中的字符数或存储这个变量所需的字节数,string是任意有效的字符串表达式,varname是变量名。
6 t: k# l/ i3 JLenB Len函数确定字符串的大小或存储这个变量需要多少字节。$ E0 \& G: y$ U9 u: z( H7 o+ ~6 ?
用法为:result = LenB(string | varname)5 }6 [" ~# p. `- n
其中,result是字符串中的字节数或存储这个变量所需的字节数,string是任意有效的字符串表达式,varname是变量名。 z$ F. d3 [* b1 F( E- H
LTrim LTrim函数复制字符串并去掉前面的空格。
% X; S& v. ]) Q/ a用法为:result = LTrim(string)& F$ H, J+ Y1 o. ~# `$ ^( T* y
其中,result是去掉空格后的字符串,string是要去掉空格的有效字符串表达式。& [% c- H4 y1 b7 u
Mid Mid函数从字符串的某个位置复制指定数目的字符。* x3 ?' `. B! l/ g
用法为:result = Mid(string,start[,length])
1 q' f$ e# d/ a( Y! \2 G其中,result是结果字符串,string是要从中复制字符的表达式,start是string中复制的起始位置,length是要复制的字符数。, n5 c' T, ]: F/ a, E
MidB Mid函数从字符串的某个位置复制指定数目的字节。
9 ^5 `! |$ D6 x用法为:result = Mid(string,start[,length])6 f4 _; i& ^; i, q
其中,result是结果字符串,string是要从中复制字节的表达式,start是string中复制的起始位置,length是要复制的字节数。
' T- I9 _3 Q. G/ M3 }Right Right函数从字符串的尾部提取指定数目的字符。+ B* d x. }4 M6 i; T* B X( S" S; I
用法为:result = Right(string,length)
: c; _2 D7 e ^0 E9 G其中result是字符串变量,string是有效的字符串表达式,length是表示返回多少字符的数值型表达式。
- k( h0 Q6 } ?4 P4 E6 C8 dRightB RightB函数从字符串的起始处提取指定数目的字节。5 z7 h8 d3 s0 q) L; t/ @' J8 q
用法为:result = RightB(string,length)" P; Y6 P8 a( O# Z7 F) U" ]
其中result是字符串变量,string是有效的字符串表达式,length是表示提取的字节数的数值型表达式。, `" X1 g& l1 W; L4 F" x3 I
RTrim RTrim函数复制字符串并去掉尾部的空格。
5 X( @% n+ ?) N用法为:result = RTrim(string); b* V$ x% Z! j; |% g
其中,result是去掉空格后的字符串,string是要去掉空格的有效字符串表达式。
! _# m, k5 S; {: QString String函数构造含有多个相同字符的字符串。
! D1 P+ Z: |' V' T- }" J% q用法为:result = String(number, character)* O; Q* I8 }+ U
其中,result是字符串变量,number是返回字符串的长度,character是用来构造返回字符串的字符码。4 h9 |7 {- K; C5 b- s* X4 t
Trim Trim函数复制字符串并去掉首尾的空格。1 N. ~1 e0 c6 {0 @% ~9 h
用法为:result = Trim(string), e9 V' k1 i% `% B: @' h X- ]
其中,result是去掉空格后的字符串,string是要去掉空格的有效字符串表达式。! v& ^3 Y! M4 D' H$ m0 `0 p
UCase UCase函数把字符串变为大写形式。
, ~2 P: }, O% K# m; B. C用法为:result = UCase(string)
6 Z) I3 `, l) e+ o. [1 g其中result是大写字符串,string是任意有效的字符串表达式。
% s5 h7 X, p+ [) s F+ U' |+ a j9 gasp字符串函数 [讨论]
6 d& B- M- w# h4 j: F1 c函数说明
4 J8 q# {* @) N' K8 [% T! h; uCBool
* R8 l! _" w2 R' s& }数据转Boolean类型1 T0 T/ l1 _& c y
Cdate s& Y- V" p' q6 Q, K$ L) B
数据转Time类型9 a& A" `+ l, R q- I( R8 B
CDbl
" n9 m) _- F" a7 b, M* i数据转Double类型7 G) J) a3 P" r2 \' B5 e( c& c8 R
Cint
2 R, y; u" X1 s: \数据转Integer类型
( G$ D4 S# B! ]CLng
3 _1 w& m- a8 i1 H' O数据转Lang类型 K. L' b7 e1 \% O' z7 o9 {5 ?
Asc
' G- A0 Z! I' S7 y- z* A; e字符转数字类型
; B! v x. p6 b/ W. Y9 }CStr) W% a7 L# f L
数字转String类型
9 U( k( N4 M& v* H5 vChr
2 A; j8 q* e6 G* _8 r2 S- h4 P; x, U! o: ^数字转字符类型
% d l& |! K0 F( P! \9 B0 o/ BVariant变量一般会将其代表的数据子类型自动转换成合适的数据类型,但有时候,自动转换也会造成一些数据类型不匹配的错误.这时,可使用转换函数来强制转换数据的子类型.
( _, ~1 ~ s% f9 G& g0 `函数 功能3 X9 m. L( [8 d6 C# q6 R4 y9 f" }
Asc 函数 返回与字符串的第一个字母对应的 ANSI 字符代码。
9 M8 a: G% q5 TChr 函数 返回与指定的 ANSI 字符代码相对应的字符
1 _+ s( F' N& _$ t* x6 ]0 ZHex 函数 返回表示十六进制数字值的字符串。
6 z6 h% z% ^" x4 sOct 函数 返回表示数字八进制值的字符串。
1 z& @* Z' P8 r! V; a5 DCStr 函数 返回表达式,该表达式已被转换为 字符串 子类型。4 I% x7 S' R( F* h( m' C
CDate 函数 返回表达式,此表达式已被转换为 日期 子类型。; b" m( w/ Q- C1 q; I. i* K. C
CInt 函数 返回表达式,此表达式已被转换为 整数 子类型。
$ }. O Z4 W) g0 |2 zCLng 函数 返回表达式,此表达式已被转换为 长整数 子类型0 _" [" W8 w. u9 b
CSng 函数 返回表达式,该表达式已被转换为 Single 子类型
5 { F5 _, E' H1 kCDbl 函数 返回表达式,此表达式已被转换为 Double 子类型
7 d8 z7 D& w, vCBool 函数 返回表达式,此表达式已转换为 布尔 子类型! P, o/ A C4 j: ?0 e# ~+ [
1、Asc 函数示例9 Z7 d* g; U1 b( l! C I
下面例子中, Asc 返回每一个字符串首字母的 ANSI 字符代码:
. ?' N" N' ]- [) o, ?Dim MyNumber
1 q0 U6 {3 ~2 QMyNumber = Asc("A") '返回 65。- W L4 y+ G& S
MyNumber = Asc("a") '返回 97。 ^' q( A, M- J$ y% U
MyNumber = Asc("Apple") '返回 65。
: c* w/ Z/ W- n. C2、Chr 函数示例
7 N' B* \7 X! j8 N% h$ Z( H下面例子利用 Chr 函数返回与指定的字符代码相对应的字符:
8 [" ]& r, w, QDim MyChar
% {- u9 _9 S' p; p+ W! K" dMyChar = Chr(65) '返回 A。% C8 L" C, l* M" d% Z7 z
MyChar = Chr(97) '返回 a。
: B% s! v4 P, g2 Y5 Y- {. [+ oMyChar = Chr(62) '返回 >。9 G2 u, ?- |6 x
MyChar = Chr(37) '返回 %。* e$ x1 [$ c( H; [: z' o
3、Hex 函数示例
- B! C3 d* Z. Z' s# f4 Z+ j) J8 L下面的示例利用 Hex 函数返回数字的十六进制数:
( H$ J! v- X/ iDim MyHex
: `1 N: K1 r2 P6 ~MyHex = Hex(5) ' 返回 5。8 W& P4 D5 _ Q- p
MyHex = Hex(10) ' 返回A。
- c& h6 K) p z" QMyHex = Hex(459) ' 返回 1CB。& o w. q3 S( _2 u. c2 C- f4 s6 m
4、Oct 函数示例
6 G# l9 O& B. c* n+ p0 Q. m, e下面的示例利用 Oct 函数返回数值的八进制数:7 K: c" a1 t1 a* |
Dim MyOct
9 t- e e6 T% D; b& ~# O% FMyOct = Oct(4) ' 返回 4。
. r# A, ~1 |) B6 `$ pMyOct = Oct(8) ' 返回 10。) G" R$ ?3 v( J" `3 |, x
MyOct = Oct(459) ' 返回 713。% W7 c3 n( \; x; q& u
5、 CStr 函数示例
' Q0 a- R# b" u. R0 K- h) P<%num1=666StrWelcome="欢迎第"&CStr(num1)&"个来访者"%>
+ a# v! Z V7 L$ `5 Y! OCStr将变量num1由整数子类型强制转换为字符串子类型
) J6 ^1 I3 j! z. E6、CDate 函数示例' D2 E. K/ y# K. B1 k3 H
MyDate = "October 19, 1962" ' 定义日期。5 K/ `" @0 k; b
MyShortDate = CDate(MyDate) ' 转换为日期数据类型。
9 Q. v! n, I! m: Q0 S; ?MyTime = "4:35:47 PM" ' 定义时间。4 f/ F3 B7 u- U a, G" ^" R; I
MyShortTime = CDate(MyTime) ' 转换为日期数据类型。: a! Z2 w3 Z3 [9 o9 D2 Y6 Y
7、CInt 函数示例# p) P) e8 {1 U! g! T' h1 H8 S V
Dim MyDouble, MyInt) h+ f" b- n1 L/ v/ V1 f; Z
MyDouble = 2345.5678 ' MyDouble 是 Double。& {( f& Q0 j: E1 t, B' z/ Y! X
MyInt = CInt(MyDouble) ' MyInt 包含 2346。
$ x, R6 r! ~0 S: t8、CLng 函数示例! S3 o; L6 i4 ?2 b5 h4 c% f
Dim MyVal1, MyVal2, MyLong1, MyLong2
1 u) \# x1 R2 \% D5 iMyVal1 = 25427.45: MyVal2 = 25427.55 ' MyVal1, MyVal2 是双精度值。
) i/ o4 | x: A) \MyLong1 = CLng(MyVal1) ' MyLong1 25427。
$ X% z0 I; O/ F4 S; Q' u( _MyLong2 = CLng(MyVal2) ' MyLong2 包含 25428 。5 V- m' g2 C" k) L& `0 `+ I
9、CBool 函数示例
' ^6 o3 V* b, N0 C* z0 Z0 FDim A, B, Check" t% @# v* p2 _* O* \
A = 5: B = 5 ' 初始化变量。
: q! T: ~3 w4 }Check = CBool(A = B) '复选框设为 True 。$ [$ r9 F! I; h
A = 0 '定义变量。
& H! Z; d* N' V- ]. oCheck = CBool(A) '复选框设为 False |
|