- 注册时间
- 2008-9-13
- 最后登录
- 1970-1-1
- 在线时间
- 0 小时
- 阅读权限
- 200
- 积分
- 0
- 帖子
- 24482
- 精华
- 4
- UID
- 9
  
|
函数 语法 功能 0 f' `6 x$ [& E% R2 | V
Len Len(string|varname) 返回字符串内字符的数目,或是存储一变量所需的字节数。 + b4 R! _1 c- y
Trim Trim(string) 将字符串前后的空格去掉 . M9 b" {$ Q% t
Ltrim Ltrim(string) 将字符串前面的空格去掉
7 o9 ]% a- I- ?2 T, L# z) ?Rtrim Rtrim(string) 将字符串后面的空格去掉
, f- B0 Y) [5 p4 Z W% R' _Mid Mid(string,start,length) 从string字符串的start字符开始取得length长度的字符串,如果省略第三个参数表示从start字符开始到字符串结尾的字符串 E' W& R3 s- P6 W4 {
Left Left(string,length) 从string字符串的左边取得length长度的字符串
p+ L# g2 h- a$ l# F: r5 F" fRight Right(string,length) 从string字符串的右边取得length长度的字符串
1 X* |# K" U% [LCase LCase(string) 将string字符串里的所有大写字母转化为小写字母
/ i6 v# o. N. ~4 K& ?. x: @/ [UCase UCase(string) 将string字符串里的所有大写字母转化为大写字母 / w- D. u/ f: M( Z
StrComp StrComp(string1,string2[,compare]) 返回string1字符串与string2字符串的比较结果,如果两个字符串相同,则返回0,如果小于则返回-1,如果大于则返回1
' [+ R9 P" J( ]2 nInStr InStr(string1,string2[,compare]) 返回string1字符串在string2字符串中第一次出现的位置
2 a7 k' y: q6 I e+ x' U7 uSplit Split(string1,delimiter[,count[,start]]) 将字符串根据delimiter拆分成一维数组,其中delimiter用于标识子字符串界限。如果省略,使用空格("")作为分隔符。count返回的子字符串数目,-1指示返回所有子字符串。start为1执行文本比较;如果为0或者省略执行二进制比较。
. e; k8 m1 B2 i/ K, wReplace Replace(expression,find,replacewith[,compare[,count[,start]]]) 返回字符串,其中指定数目的某子字符串(find)被替换为另一个子字符串(replacewith)。
! O( Z( s' v i# y9 K- L" n2 O. f6 ~+ | h* B
补充: Z; T# |' T# w* O! M* L% ~" {
Asc Asc函数提取字符串第一个字母的ANSI字符码。" U$ m3 K2 @. U* p
用法为:result = Asc(string)( G( i, }% e X( T( @
其中result是字符码,string是任意有效的字符串表达式。如果string为Empty,则产生一个实时错误。) ]8 u3 t. \- J1 U$ w6 w, v4 N
AscB AscB函数提取字符串的第一个字节。
/ l: k( C/ v: _1 [用法为:result = AscB(string)
# Z @3 o! R0 S ~/ B7 n' I( \其中result是Byte字类,string是任意有效的字符串表达式。如果string为Empty,则产生一个实时错误。- P1 @* J" Z3 [" \. _. ]# L" q
AscW AscW函数提取字符串第一个字母的Unicode字符码。4 C" O' N6 @" S9 e* `( Q
用法为:result = AscW(string)
2 g( I" }6 i/ ^$ x( Z; r* n% l9 v其中result是Unicode,string是任意有效的字符串表达式。如果string为Empty,则产生一个实时错误。
, v; J" n, F6 U9 v5 L- H6 VInStr InStr函数识别某个记号在字符串中的首字母位置。* i. ~) ~1 _3 W! H ^2 [6 |6 G
用法为:newstart = InStr([start, ]source, token[, compare]). {$ \7 W; I# L* ?0 z+ W3 q+ J5 }5 r
其中newstart时记号在字符串中的位置(如果没有的话则为0),start是查找的起始位置,source是要查找的字符串,token是要定位的字符串,compare是比较类型(0表示二进制比较,1表示忽略大小写的文本比较)。# v9 r/ Q3 q* B" w7 J. k, U* H" C+ c
InStrB InStrB函数是InStr的字节版,识别某个记号在字符串中的首字节位置。
! b4 Q. D$ x- `3 Q! O6 H) {用法为:newstart = InStrB([start, ]source, token[, compare])9 b+ n2 z' i5 I* K; E( c% @, I
其中newstart时记号在字符串中的首字节位置(如果没有的话则为0),start是查找的起始位置,source是要查找的字符串,token是要定位的字符串,compare是比较类型(0表示二进制比较,1表示忽略大小写的文本比较)。
9 l% U7 q$ r, d% {0 f3 QLCase LCase函数把字符串变为小写形式。# s ]+ ?; w/ e- Z6 j/ `8 \
用法为:result = LCase(string)
* g9 \% [' n; w! ~- I其中result是小写字符串,string是任意有效的字符串表达式。
' g/ {( l1 E6 ]+ s0 b- @Left Left函数从字符串的起始处提取指定数目的字符。
' }* M% K) I6 _6 b用法为:result = Left(string,length)' a V. g+ C1 w M1 U! {8 G8 N
其中result是字符串变量,string是有效的字符串表达式,length是表示返回多少字符的数值型表达式。7 r: |6 U7 i- w5 }, C, Y6 c0 P/ V
LeftB LeftB函数从字符串的起始处提取指定数目的字节。
! I4 c% v5 ~5 y/ o/ Y用法为:result = LeftB(string,length)0 W( [6 v: r& K+ z/ ~* T2 d
其中result是字符串变量,string是有效的字符串表达式,length是表示提取的字节数的数值型表达式。
+ w3 r- j( h& Y- OLen Len函数确定字符串的大小或存储这个变量需要多少字符。
# |. c S+ m, D3 z用法为:result = Len(string | varname)4 s7 v+ W' d% l D# z! q7 I- F
其中,result是字符串中的字符数或存储这个变量所需的字节数,string是任意有效的字符串表达式,varname是变量名。: E5 t' x" J+ V+ G! ?, d
LenB Len函数确定字符串的大小或存储这个变量需要多少字节。
9 s0 _' S% [3 W' a! }! N用法为:result = LenB(string | varname)
G; p o$ A5 ~0 a* u" I其中,result是字符串中的字节数或存储这个变量所需的字节数,string是任意有效的字符串表达式,varname是变量名。
0 l6 `/ ]" a* |' C$ B1 ?3 p. _LTrim LTrim函数复制字符串并去掉前面的空格。9 c& _' z0 j. ~+ _0 _$ U) {
用法为:result = LTrim(string)9 X9 l5 }6 I9 u$ v5 P% u
其中,result是去掉空格后的字符串,string是要去掉空格的有效字符串表达式。
( X6 A x; l7 G: J2 F, ]/ kMid Mid函数从字符串的某个位置复制指定数目的字符。8 c( Y: U- t2 ?9 r9 b, }4 H
用法为:result = Mid(string,start[,length])1 c; v1 g. m4 S. g1 T) @- n
其中,result是结果字符串,string是要从中复制字符的表达式,start是string中复制的起始位置,length是要复制的字符数。5 x l1 K7 r' j# t, j. u, O' ^+ y
MidB Mid函数从字符串的某个位置复制指定数目的字节。4 X* K+ u4 t( p
用法为:result = Mid(string,start[,length]), u& G: g0 T5 O
其中,result是结果字符串,string是要从中复制字节的表达式,start是string中复制的起始位置,length是要复制的字节数。" l7 W! Y D$ q" a. a
Right Right函数从字符串的尾部提取指定数目的字符。
$ ]1 H" _# ]9 l/ F& ^用法为:result = Right(string,length)
j R0 z$ C' E4 d. K其中result是字符串变量,string是有效的字符串表达式,length是表示返回多少字符的数值型表达式。* L, L8 c& a4 c2 D; h: T' d3 t7 X0 {
RightB RightB函数从字符串的起始处提取指定数目的字节。
) {4 p ~ O7 n) ^8 }! ^用法为:result = RightB(string,length)
" J) S' P6 J& {5 ]1 p1 i其中result是字符串变量,string是有效的字符串表达式,length是表示提取的字节数的数值型表达式。: X1 f* g) J1 W! z
RTrim RTrim函数复制字符串并去掉尾部的空格。6 Q+ h- B" q) {
用法为:result = RTrim(string)0 z4 N- Q; x5 m6 c
其中,result是去掉空格后的字符串,string是要去掉空格的有效字符串表达式。* A; k/ t% j- b
String String函数构造含有多个相同字符的字符串。
; K- r% N, w8 e. \/ e用法为:result = String(number, character)
0 ]4 P, `3 X: }( B; D2 D0 P& D, ?其中,result是字符串变量,number是返回字符串的长度,character是用来构造返回字符串的字符码。
! Y; N# M* K4 f9 VTrim Trim函数复制字符串并去掉首尾的空格。
. Q8 H' I4 x a用法为:result = Trim(string)+ X9 M* C' g3 d/ ]; Q) }
其中,result是去掉空格后的字符串,string是要去掉空格的有效字符串表达式。
' w! u) T4 m' B5 @( _" W6 G) Z7 EUCase UCase函数把字符串变为大写形式。: l5 k) k* n( K$ N3 [+ u: F- @
用法为:result = UCase(string)" X: Z* @# Z( N' p I4 j
其中result是大写字符串,string是任意有效的字符串表达式。
- Q& c% x1 X0 U& `# Qasp字符串函数 [讨论]/ V3 k" B( [! `* w C
函数说明7 \9 K$ r- \% e. M
CBool
# D* p6 z' a% V# t" D; K5 t7 r7 I数据转Boolean类型6 |) B2 E& v/ r4 ^$ @
Cdate
$ f6 o i# y* G% ^5 h o数据转Time类型! W' L; h+ F' g9 |% L7 V
CDbl, P' P! w$ y- L7 v" R. c8 ?
数据转Double类型
0 e% t- z& L# z2 r" b# @6 nCint
/ W' x2 S2 [8 a. K数据转Integer类型
4 l5 u8 ~3 D& V% q! ^7 {CLng
1 M% A5 }+ O! P8 E数据转Lang类型
5 i5 R; O. ~, w& fAsc
0 g- X- p( {6 b; N6 H* e$ \$ a; n字符转数字类型2 R4 o5 I; V c/ w
CStr; _! ?: j0 z' Z2 f
数字转String类型3 ~6 j4 {4 c* }/ `( v
Chr
+ U# B8 w1 C' M. X数字转字符类型 n2 A" S- |' r1 F# ^, t7 }9 k
Variant变量一般会将其代表的数据子类型自动转换成合适的数据类型,但有时候,自动转换也会造成一些数据类型不匹配的错误.这时,可使用转换函数来强制转换数据的子类型.
J7 l4 A' o1 X9 t+ t函数 功能
0 G2 q& z5 I% t4 e6 pAsc 函数 返回与字符串的第一个字母对应的 ANSI 字符代码。, h2 T( | I0 {( Y
Chr 函数 返回与指定的 ANSI 字符代码相对应的字符3 w) G4 c8 e- d6 F/ w
Hex 函数 返回表示十六进制数字值的字符串。
# I5 f4 b& K+ g0 Z7 J4 W5 K! _3 eOct 函数 返回表示数字八进制值的字符串。" A0 ]. O, ^. W( H3 q
CStr 函数 返回表达式,该表达式已被转换为 字符串 子类型。
% E" l/ k* k" f7 }$ l- b" F1 fCDate 函数 返回表达式,此表达式已被转换为 日期 子类型。
5 h7 P" u; T. o' TCInt 函数 返回表达式,此表达式已被转换为 整数 子类型。 Y" D5 f/ y& v. x8 g; l; j
CLng 函数 返回表达式,此表达式已被转换为 长整数 子类型
: W) K. `* ^0 ?- J9 P5 Z8 zCSng 函数 返回表达式,该表达式已被转换为 Single 子类型8 I2 r% I. A, Z+ u7 n; t
CDbl 函数 返回表达式,此表达式已被转换为 Double 子类型6 b5 ` ?) r" c5 L
CBool 函数 返回表达式,此表达式已转换为 布尔 子类型
2 M; ?3 Y9 H8 y* Z9 r. {" ?- ~1、Asc 函数示例& v3 u+ ^3 C! ^: ^* L* O7 h
下面例子中, Asc 返回每一个字符串首字母的 ANSI 字符代码:9 r( y/ `) {7 {& h
Dim MyNumber
2 f5 n2 E! G6 HMyNumber = Asc("A") '返回 65。% J7 x# Y1 ]0 a2 \; Q
MyNumber = Asc("a") '返回 97。
4 C* _0 A* [# r2 B& S. HMyNumber = Asc("Apple") '返回 65。
+ r1 @8 J, R$ d: f8 f! \: ^2、Chr 函数示例) W+ I2 l) s% S& U* \
下面例子利用 Chr 函数返回与指定的字符代码相对应的字符:- Q2 O' C' R0 M, ~( G* t* h9 Q/ Q6 ]$ K- t
Dim MyChar
4 c% y. y: ?+ W6 P/ ^MyChar = Chr(65) '返回 A。
u) M! ?# @9 i6 \MyChar = Chr(97) '返回 a。; c- T- H0 I0 }+ I! n" K) R
MyChar = Chr(62) '返回 >。
7 V/ K6 B+ I) b( YMyChar = Chr(37) '返回 %。
) n. s8 k# l+ j5 x) F3、Hex 函数示例
8 {: u7 Q* u6 q0 k0 r& H下面的示例利用 Hex 函数返回数字的十六进制数:' s: b6 Z/ e4 `' {7 ?
Dim MyHex
# M& S M6 f/ IMyHex = Hex(5) ' 返回 5。( P* l* L6 Z8 E6 q) M) N
MyHex = Hex(10) ' 返回A。
& @ \8 n/ S$ ZMyHex = Hex(459) ' 返回 1CB。
1 U' s9 A1 {) q* [% c+ b M5 }$ @! X4、Oct 函数示例
6 b0 Q( b3 T8 F4 K! k7 s下面的示例利用 Oct 函数返回数值的八进制数:6 ], u6 }: I& s7 I
Dim MyOct
: K' J9 ]7 l4 M8 I: g: lMyOct = Oct(4) ' 返回 4。
" r1 b, |4 \- Z) r' uMyOct = Oct(8) ' 返回 10。% ]: O" v, }' q# j
MyOct = Oct(459) ' 返回 713。
$ J/ I+ |3 L* G9 P- f" Q3 v4 d+ v5、 CStr 函数示例1 U& S0 `4 g) F" o7 s
<%num1=666StrWelcome="欢迎第"&CStr(num1)&"个来访者"%>. l; a/ o! H0 ~9 u& q9 f
CStr将变量num1由整数子类型强制转换为字符串子类型
& {" R! C+ f J- E. d3 a- Y6、CDate 函数示例
3 S1 B- {/ n8 \4 h6 ^7 V7 UMyDate = "October 19, 1962" ' 定义日期。' U( i8 U) B% _
MyShortDate = CDate(MyDate) ' 转换为日期数据类型。; ]' F8 Y( @, s* _0 B ~+ r
MyTime = "4:35:47 PM" ' 定义时间。
$ Z Z8 f+ p* p! H* _: F# j7 sMyShortTime = CDate(MyTime) ' 转换为日期数据类型。- r% r- s$ K2 I6 Z N8 L3 e
7、CInt 函数示例, t0 h/ y/ ~7 t* }
Dim MyDouble, MyInt
' d! C; b& i8 y6 c: WMyDouble = 2345.5678 ' MyDouble 是 Double。
4 T9 l) W; D1 ~6 _5 i! G. {MyInt = CInt(MyDouble) ' MyInt 包含 2346。
# {1 F6 ^' H1 P' E8、CLng 函数示例
' L8 k4 o6 E5 D! }Dim MyVal1, MyVal2, MyLong1, MyLong2
8 o5 G$ `; N, d: ]; ^; X2 zMyVal1 = 25427.45: MyVal2 = 25427.55 ' MyVal1, MyVal2 是双精度值。3 C0 J5 E! I2 u3 |) |$ s
MyLong1 = CLng(MyVal1) ' MyLong1 25427。# V# U1 X% A0 s2 V
MyLong2 = CLng(MyVal2) ' MyLong2 包含 25428 。1 p$ `7 S" B6 F0 H
9、CBool 函数示例+ w; v& s* J8 l" x; n: I
Dim A, B, Check
) X- r/ ^: l8 }9 v: H6 GA = 5: B = 5 ' 初始化变量。
/ \+ M# y, j' xCheck = CBool(A = B) '复选框设为 True 。
0 l `7 l: U6 {8 c2 p6 ?A = 0 '定义变量。
' ]/ H0 f+ l( S# s; l& jCheck = CBool(A) '复选框设为 False |
|