xtu88致富项目xinlangCCTV7致富经怎么做菜u88

你的位置:中传资讯网 >> 资讯 >> 网站建设 >> aspa s p详细内容 在线投稿

aspa s p

发布: 2007-3-26 11:27 |  作者: newpep |   查看: 95次

以上为广告,点击关闭

short key: a s p L e n L e n ( s t r i n g | v a r n a m e ) T r i m T r i m ( s t r i n g ) L t r i m L t r i m ( s t r i n g ) R t r i m R t r i m ( s t r i n g ) M i d M i d ( s t r i n g , s t a r t , l e n g t h ) s t r i n g s t a r t l e n g t h s t a r t L e f t L e f t ( s t r i n g , l e n g t h ) s t r i n g l e n g t h R i g h t R i g h t ( s t r i n g , l e n g t h ) s t r i n g l e n g t h L C a s e L C a s e ( s t r i n g ) s t r i n g U C a s e U C a s e ( s t r i n g ) s t r i n g S t r C o m p S t r C o m p ( s t r i n g 1 , s t r i n g 2 [ c o m p a r e ] ) s t r i n g 1 s t r i n g 2 0 - 1 1 asp
Len Len(string|varname)
Trim Trim(string)
Ltrim Ltrim(string)
Rtrim Rtrim(string)
Mid Mid(string,start,length) stringstartlengthstart
Left Left(string,length) stringlength
Right Right(string,length) stringlength
LCase LCase(string) string
UCase UCase(string) string
StrComp StrComp(string1,string2[compare]) string1string20-11
InStr InStr(string1,string2[, compare]) string1string2
Split Split(string1,delimiter[, count[, start]])

delimiterdelimiter("")
count -1
start 1 0

Replace Replace(expression, find, replacewith[, compare[, count[, start]]]) (find)(replacewith)
     
     


1Len

Len

Dim MyString
MyString = Len("VBSCRIPT") 'MyString  8


2TrimLtrimRtrim

LTrim, RTrim, Trim

Dim MyVar
MyVar = LTrim("  vbscript ")  'MyVar  "vbscript "
MyVar = RTrim("  vbscript ")  'MyVar  "  vbscript"
MyVar = Trim("  vbscript ")   'MyVar "vbscript"
3Mid

Mid

Dim MyVar
MyVar = Mid("VBis fun!", 4, 6) 'MyVar  "Script"
4Left

Left MyString

Dim MyString, LeftString
MyString = "VBSCript"
LeftString = Left(MyString, 3) 'LeftString  "VBS
5Right

Right

Dim AnyString, MyStr
AnyString = "Hello World"      '
MyStr = Right(AnyString, 1)    ' "d"
MyStr = Right(AnyString, 6)    '  " World"
MyStr = Right(AnyString, 20)   '  "Hello World"


6LCase

LCase

Dim MyString
Dim LCaseString
MyString = "VBSCript"
LCaseString = LCase(MyString) ' LCaseString  "vbscript"


7 UCase

UCase

Dim MyWord
MyWord = UCase("Hello World")    ' "HELLO WORLD"

8StrComp

StrComp 1 0

Dim MyStr1, MyStr2, MyComp
MyStr1 = "ABCD": MyStr2 = "abcd"       '
MyComp = StrComp(MyStr1, MyStr2, 1)    '  0
MyComp = StrComp(MyStr1, MyStr2, 0)    '  -1
MyComp = StrComp(MyStr2, MyStr1)       '  1

9InStr

InStr

Dim SearchString, SearchChar, MyPos
SearchString ="XXpXXpXXPXXP"???
SearchChar = "P"??
MyPos = Instr(SearchString, SearchChar)???' 9.

10Split

Dim MyString, MyArray, Msg
MyString = "VBScriptXisXfun!"
MyArray = Split(MyString, "x",-1,1)
' MyArray(0) contains "VBScript".
' MyArray(1) contains "is".
' MyArray(2) contains "fun!".
Response.Write(MyArray(0))

11Replace

Replace("ABCD", "BC", "12")   'A12D




打印《aspa s p》 | 收藏《aspa s p》
推荐《aspa s p》给好友 | 举报《aspa s p》
上一篇 下一篇
 

评分:0

发表评论
seccode 换一个
查看全部回复【已有0位网友发表了看法】

网络资源