| 1. ASC(X),Chr(X):轉換字符字符碼 [格式]: P=Asc(X) 返回字符串X的第一個字符的字符碼 P=Chr(X) 返回字符碼等於X的字符 [范例]: (1)P=Chr(65) ‘ 輸出字符A,因為A的ASCII碼等於65 (2)P=Asc(“A”) ‘ 輸出65 2. Len(X): 計算字符串X的長度 [格式]: P=Len(X) [說明]: 空字符串長度為0,空格符也算一個字符,一個中文字雖然占用2 Bytes,但也算一個字符。 [范例]: (1) 令X=”” (空字符串) Len(X) 輸出結果為0 (2) 令X=”abcd” Len(X) 輸出結果為4 (3) 令X=”VB教程” Len(X) 輸出結果為4 3. Mid(X)函數:讀取字符串X中間的字符 [格式]: P=Mid(X,n) 由X的第n個字符讀起,讀取后面的所有字符。 P=Mid(X,n,m) 由X的第n個字符讀起,讀取后面的m個字符。 [范例]: (1) X=”abcdefg” P=Mid(X,5) 結果為:P=”efg” (2) X=”abcdefg” P=Mid(X,2,4) 結果為P=”bcde”
5. StrReverse:反轉字符串 [格式]: P=StrReverse(X) [說明]: 返回X參數反轉后的字符串 [范例]: (1)X=”abc” P=StrReverse(X) 輸出結果:P=”cba” 6. Ucase(X),Lcase(X):轉換英文字母的大小寫 [格式]: P=Lcase(X) ‘ 將X字符串中的大寫字母轉換成小寫 P=Ucase(X) ‘ 將X字符串中的小寫字母轉換成大寫 [說明]:除了英文字母外,其他字符或中文字都不會受到影響。 [范例]: (1) 令 X=”VB and VC” 則Lcase(X)的結果為”vb and vc”,Ucase(X)的結果為”VB AND VC” 7. InStr函數:尋找字符串 [格式]: P=InStr(X,Y) 從X第一個字符起找出Y出現的位置 P=InStr(n,X,Y) 從X第n個字符起找出Y出現的位置 [說明]: (1) 若在X中找到Y,則返回值是Y第一個字符出現在X中的位置。 (2) InStr(X,Y)相當於InStr(1,X,Y)。 (3) 若字符串長度,或X為空字符串,或在X中找不到Y,則都返回0。 (4) 若Y為空字符串,則返回0。 ---------------------------------------------------------------------------------------------- mid(字符串,從第幾個開始,長度) ByRef 在[字符串]中[從第幾個開始]取出[長度個字符串] 例如 mid("小欣無敵",1,3) 則返回 "小欣無" instr(從第幾個開始,字符串1,字符串2) ByVal 從規定的位置開始查找,返回字符串2在字符串1中的位置 例如 instr(1,"小欣無敵","小") 則返回 1,instr(2,"小欣無敵","小"),則返回 0 。 0 表示未找到 InStrRev(字符串1,字符串2,從第幾個開始) ByVal 從規定的位置開始,從后住前查找,返回字符串2在字符串1中的位置,此處注意,雖是從后住前查找,但是返回的值還是從前往后算的。 例如 instrRev("小欣無敵","小",2) 則返回 2 ; instrRev("小欣無敵","欣",1) 則返回 0 ,因為它從"小欣無敵"的第1個字開始往前查找,所以找不到 。0 表示未找到 中國自學編程網 www.zxbc.cn left(字符串,長度) ByVal 從[字符串]的左邊開始返回[長度]個字符 例如 Left("小欣無敵,3) 則返回 "小欣無" right(字符串,長度) ByVal 從[字符串]的右邊開始返回[長度]個字符 例如 Right("小欣無敵",3) 則返回 "欣無敵" ucase(字符串) ByVal 返回[字符串]的大寫形式,只對英文字符有效 例如 ucase("xiaoXINwuDi") 則返回 "XIAOXINWUDI" lcase(字符串) ByVal 返回[字符串]的小寫形式,只對英文字符有效 例如 lcase("xiaoXINwuDi") 則返回 "xiaoxinwudi" asc(字符) Byval返回[字符]的ascii編碼,若有多個字符,則只返回首字符的ascii編碼,和Chr()函數是一個可逆的過程 例如 asc("小") 則返回 -12127 ; asc("小欣無敵") 也返回 -12127 chr(ASCii編碼) Byval 返回[Ascii]編碼所代表的字符,和Chr()函數是一個可逆的過程 例如 chr(-12127) 則返回 "小" ;chr(asc("小")) 則返回"小"(這里是為了說明asc和chr的可逆性,例用此特性可以加密文本) trim(字符串) Byval 返回去掉了前、后之后的[字符串] 例如 trim(" 小 欣 無敵 ") 則返回 "小 欣 無敵" ,中間的空格不受任何影響 string(個數,字符) Byval 返回[個數]個[字符] 例如 string(3,"小") 則返回 "小小小" , 而 string(3,"小欣無敵") 也返回 "小",只有首字符才有效 space(個數) Byval 返回[個數]個空格 例如 space(5) 則返回 " " strconv(字符串,轉換的類型) Byval 將字符串轉成指定的類型。常用的類型只有兩個,vbwide 半角轉成全角,vbNarrow 全角轉成半角 例如 strconv("xiao",vbwide) 則返回 "XIAO",而strconv("XIAO",vbnarrow) 則返回 "XIAO" '備注 vbwide = 4 ,vbnarrow = 8 len(字符串) Byval 返回[字符串]的長度 例如 len("小欣無敵") 則返回 4 ------------------------------------------------------------------------------------------ Len Len(string|varname) 返回字符串內字符的數目,或是存儲一變量所需的字節數 Trim Trim(string) 將字符串前后的空格去掉 Ltrim Ltrim(string) 將字符串前面的空格去掉 Rtrim Rtrim(string) 將字符串后面的空格去掉 Mid Mid(string,start,length) 從string字符串的start字符開始取得length長度的字符串,如果省略第三個參數表示從start字符開始到字符串結尾的字符串 Left Left(string,length) 從string字符串的左邊取得length長度的字符串 Right Right(string,length) 從string字符串的右邊取得length長度的字符串 LCase LCase(string) 將string字符串里的所有大寫字母轉化為小寫字母 UCase UCase(string) 將string字符串里的所有大寫字母轉化為大寫字母 StrComp StrComp(string1,string2[,compare]) 返回string1字符串與string2字符串的比較結果,如果兩個字符串相同,則返回0,如果小於則返回-1,如果大於則返回1 InStr InStr(string1,string2[, compare]) 返回string1字符串在string2字符串中第一次出現的位置 Split Split(string1,delimiter[, count[, start]]) 將字符串根據delimiter拆分成一維數組,其中delimiter用於標識子字符串界限。如果省略,使用空格("")作為分隔符。 count 返回的子字符串數目,-1 指示返回所有子字符串。 start為 1 執行文本比較;如果為 0 或者省略執行二進制比較。 Replace Replace(expression, find, replacewith[, compare[, count[, start]]]) 返回字符串,其中指定數目的某子字符串(find)被替換為另一個子字符串(replacewith) [示例:] 1、Len函數示例: 下面的示例利用 Len 函數返回字符串中的字符數目: Dim MyString MyString = Len("VBSCRIPT") 'MyString 包含 8。 2、Trim、Ltrim、Rtrim函數示例: 下面的示例利用 LTrim, RTrim, 和 Trim 函數分別用來除去字符串開始的空格、尾部空格、 開始和尾部空格: Dim MyVar MyVar = LTrim(" vbscript ") 'MyVar 包含 "vbscript "。 MyVar = RTrim(" vbscript ") 'MyVar 包含 " vbscript"。 MyVar = Trim(" vbscript ") 'MyVar 包含"vbscript"。 3、Mid函數示例: 下面的示例利用 Mid 函數返回字符串中從第四個字符開始的六個字符: Dim MyVar MyVar = Mid("VB腳本is fun!", 4, 6) 'MyVar 包含 "Script"。 4、Left函數示例: 下面的示例利用Left 函數返回MyString 的左邊三個字母: Dim MyString, LeftString MyString = "VBSCript" LeftString = Left(MyString, 3) 'LeftString 包含 "VBS 5、Right函數示例: 下面的示例利用 Right 函數從字符串右邊返回指定數目的字符: Dim AnyString, MyStr AnyString = "Hello World" '定義字符串。 MyStr = Right(AnyString, 1) '返回 "d"。 MyStr = Right(AnyString, 6) ' 返回 " World"。 MyStr = Right(AnyString, 20) ' 返回 "Hello World"。 6、LCase函數示例: 下面的示例利用 LCase 函數把大寫字母轉換為小寫字母: Dim MyString Dim LCaseString MyString = "VBSCript" LCaseString = LCase(MyString) ' LCaseString 包含 "vbscript"。 7、 UCase函數示例: 下面的示例利用 UCase 函數返回字符串的大寫形式: Dim MyWord MyWord = UCase("Hello World") ' 返回"HELLO WORLD"。 8、StrComp函數示例: 下面的示例利用 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。 9、InStr示例: 下面的示例利用 InStr 搜索字符串: Dim SearchString, SearchChar, MyPos SearchString ="XXpXXpXXPXXP"??? SearchChar = "P"?? MyPos = Instr(SearchString, SearchChar)???'返回 9. 注意:返回的不是一個字符串在另一個字符串中第一次出現的字符位置,而是字節位置。 10、Split函數示例: 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)) 11、Replace函數示例: Replace("ABCD", "BC", "12") '得到A12D ------------------------------------------------------------------------------------------------ 1.Chr[$](數值)函數 返回標准擴展碼的對應字符。 說明: (1)數值范圍在0到255之間。 (2)Chr()返回的是數值類型,而Chr$()則返回字符類型。 (3)ANSI是ASCII碼的擴充,其前128個字符都與ASCII碼相同。 例如,我們常用以下的語句加入回車換行符。Chr(13) Chr(10) 2.Asc("字符")函數 此函數用來返回字符的ANSI碼值。 說明: 若輸入為一字符串,則只返回第一個字符的ASCII碼值。 例如, x=Asc("a"),則, x=97 x=Asc("ab"),則,x=97 3.String[$](個數,字符) 用於重復某一個字符。 說明: (1)“個數”用來指定重復的次數。 (2)若“字符”為一字符串,則只重復復制第一個字符。 4.Len(字符串) 函數 用於返回字符串的長度。 5.Left[$](字符串,字符個數) 用於返回“字符串”最左邊的長度為“字符個數”的字符串。 例如, Dim substr As String substr=Left("Visual Basic",3) 則 substr="Vis" 6.Right[$](字符串,字符個數) 用於返回“字符串”最右邊的長度為“字符個數”的字符串。 例如, Dim substr As String substr=Right("Visual Basic",3) 則 substr="sic" 7.Mid[$](字符串,起始位置,[字符個數]) 用於返回一個子字符串。 說明: (1)子字符串從“起始位置”開始,以“字符個數”為長度。 (2)若省略“字符個數”,則從起始位置到字符串的結尾。 8.Lcase(字符串)和Ucase(字符串)函數 Lcase:不論字符串中的字符為大寫還是小寫,一律輸出為小寫。 Ucase:不論字符串中的字符為大寫還是小寫,一律輸出為小寫。 9.Ltrim(字符串)、Rtrim(字符串)、Trim(字符串)函數 Ltrim(字符串):用於去掉字符串中左邊的空格。 Rtrim(字符串):用於去掉字符串中右邊的空格。 Trim(字符串):用於去掉字符串中左右兩邊的空格。 10.Str(數值)函數 和 Val(字符串) 函數 Str(數值):用於將數字轉化為字符串。 Val(字符串):用於將字符串轉化為數值。 例如, Dim a As String Dim b As Long a=Str(345.45) b=Val("234.45") 則 a="345.45" b=234.45 |