經常使用函數
一、Date函數
做用:返回當前系統日期
示例:
Dim MyDate
MyDate=Date
MsgBox MyDate
結果圖:
二、Now函數
做用:返回當前系統時間
示例:
Dim MyNow
MyNow=Now
MsgBox MyNow
結果圖:
備註:若是寫Log文件,推薦本函數,由於具體的時間不單單精確到日期,並且還精確到時間,
三、DateDiff函數
做用:返回兩個日期之間的間隔
語法:DateDiff(interval,date1,date2)
interval是一個時間單位,單位的取值以下表
Setting Description
yyyy Year
q Quarter
m Month
yyyy Day of year
d Day
w Weekday
ww Week of year
h Hour
n Minute
s Second
示例:
Dim tDateDiff,date1,date2
Date1=Now
Date2=Date
tDateDiff=DateDiff(tDateDiff,Date1,Date2)
MsgBox tDateDiff
結果圖:
四、Left函數
做用:返回字符串最左邊的指定數量的字符
語法:Left(string,length)
string:字符串表達式,其最左邊的字符被返回。若是string參數中包含Null,則返回Null
length:數值表達式,指明要返回的字符數目
示例:
Dim myString,leftString
myString="VBScript"
LeftString=left (myString,3)
MsgBox leftString
結果圖:
五、Right函數
做用:返回字符串最右邊的指定數量的字符
語法:Right(string,length)
string:字符串表達式,其最左邊的字符被返回。若是string參數中包含Null,則返回Null
length:數值表達式,指明要返回的字符數目
示例:
Dim myString,rightString
myString="VBScript"
rightString=right(myString,3)
MsgBox rightString
結果圖:
六、Len函數
做用:返回字符串內字符的數目
語法:Len(string)
示例:
Dim myString
myString=Len("VBScript")
MsgBox myString
結果圖:
七、Mid函數
做用:從字符串中返回指定數目的字符
語法:Mid(string,start,length)
start:string中被提取的字符部分的開始位置
length:要返回字符數的長度
示例:
Dim myVar
myVar=Mid("Hello World!",7,6)
MsgBox myVar
結果圖:
八、LTrim、RTrim、Trim函數
做用:分別返回不帶前面的空格、後面的空格、全部的空格
示例:
Dim myVar
myVar=LTrim(" VBScript ") ---1
myVar=RTrim(" VBScript ") ----2
myVar=Trim(" VBScript ") ----3
MsgBox myVar
結果分析:
示例中1的部分會顯示爲"VBScript ",示例中2的部分會顯示爲" VBScript",示例中3的部分會顯示爲"VBScript"
九、Replace函數
做用:返回字符串,其中指定數目的某字符串被替換爲另外一個子字符串
語法:Replace(expression,find,replacewith[,compare[,count[,start]]])
expression:必選項,字符串表達式;find:必選項,被搜索的子字符串;replacewith:必選項,用於替換的子字符串
start:可選項,expression中開始搜索子字符串的位置,若是省略默認爲1。在和count關聯時必須用
count:可選項,執行子字符串替換的數目,若是省略,默認值爲-1,表示進行全部可能的替換,在和start關聯時必須用
compare:可選項,計算子字符串時使用比較類型的數值。若是省略,缺省值爲0,表明執行二進制比較,若是數值是1,表明文本比較。
示例:
Dim myString
myString=Replace("XXpXXPXXp","p","Y")
MsgBox myString
結果圖: express