VBS的字符串及日期操作相關(guān)函數(shù)
更新時(shí)間:2011年01月27日 22:20:18 作者:
最近寫(xiě)asp程序時(shí)用到日期格式轉(zhuǎn)換,因?yàn)椴煌瑪?shù)據(jù)庫(kù)對(duì)日期格式要求不一樣,這里特別找了一些相關(guān)資料,希望對(duì)大家有所幫助,如有問(wèn)題請(qǐng)留言,謝謝!
1. Asc(x),Chr(x):轉(zhuǎn)換字符,字符碼
2. Filter:搜尋字符串?dāng)?shù)組中的特定字符串
格式:v=filter(x,s[,include[,compare]])
實(shí)例:
Dim x()={"kjwang","wangkj","peter"}
Dim v
v=filter(x,"kj") '結(jié)果v(0)="kjwang",v(1)="wangkj"
v=filter(x,"kj",false) '結(jié)果v(0)="peter"
v=filter(x,"kj",true,vbTextCompare) '不分大小寫(xiě)搜尋
3. InStr:尋找字符串位置(InstrRev:倒過(guò)來(lái)尋找字符串)
格式:
v=instr(x,y) '從x字符串第1個(gè)字符起找出y字符串出現(xiàn)的位置
v=instr(n,x,y) '從x字符串第n個(gè)字符起找出y字符串出現(xiàn)的位置
格式:
v=InstrRev(x,s[,n[,Compare]])
4. Join:將字符串連接
格式:v=join(x[,d])'d為分隔字符
5. Len(x):計(jì)算字符串x的長(zhǎng)度
格式:v=len(x)
6. Left(x,n):返回字符串x左邊n個(gè)字符(對(duì)應(yīng)Right(x,n))
7. Mid:讀取字符串x中間的字符
格式:v=mid(x,n,m)
8. LTrim(x),RTim(x),Trim(x)去空白字符
9. Replace:字符串取代
格式:v=Replace(x,s,r)
實(shí)例:x="i saw a saw a saw"
v=replace(x,"saw","so") 'v="i so a so a so"
10. Split:字符串分割
格式:v=split(s[,d])
實(shí)例:v=split("vb.net,iis6.0,asp.net",",")
'結(jié)果v(0)="vb.net",v(1)="iis6.0",v(2)="asp.net"
11. StrReverse:反轉(zhuǎn)字符串
實(shí)例:v=strreverse("kjwang") 'v="gnawjk"
12. UCase(x),LCase(x):變換英文字母的大小寫(xiě)
實(shí)例:x="hello,VB中文!"
v=UCase(x) 'v="HELLO,VB中文!"
'日期相關(guān):
1. 取出日期時(shí)間
1)DateValue(x),TimeValue(x)
格式:v=DateValue(x) :取出的“日期”部分
v=timevalue(x) '類上
2)Year(x),Month(x),Day(x)
格式:v=Year(x)
v=Month(x)
v=Day(x)
Hour(x),Minute(x),Second(x):取出時(shí),分,秒
3)DateSerial(Y,M,D):合并年、月、日成為日期
實(shí)例:Dim v
v=DateSerial(1996,10,5) 'v=1996/10/5
TimeSerial(H,M,S):合并時(shí)、分、秒成為時(shí)間
2. Now:讀取系統(tǒng)日期時(shí)間
格式:v=now
3. Timer:從凌晨12:00:00AM起所經(jīng)過(guò)的秒數(shù)
格式:v=timer
4. DatePart(p,x):取出年、月、日等各部分的數(shù)值
實(shí)例:Dim X=#2/10/1996 16:45:30#
v=DatePart("yyyy",X) 'v=1996年
v=DatePart("m",X) 'v=2月
v=DatePart("d",X) 'v=10日
v=DatePart("h",X) 'v=16時(shí)
v=DatePart("n",X) 'v=45分
v=DatePart("s",X) 'v=30秒
v=DatePart("q",X) 'v=1季(第一季,春季)
v=DatePart("y",X) 'v=41天(1996年的第41天)
v=DatePart("ww",X) 'v=6周(1996年的第6周)
v=DatePart("w",X) 'v=7(第6周的第7天,即星期六)
5. DateAdd(p,n,x):加減若干時(shí)間后的新日期時(shí)間
格式:v=DateAdd(p,n,x) 'p值同上如:"yyyy"、"m"等
實(shí)例:Dim x=#1/31/1996 16:45:30#
v=dateadd("yyyy",-3,x) '減3年,v=1993/1/31 16:45:30
6. DateDiff(p,x1,x2):計(jì)算兩日期時(shí)間的差值 'p值同上
實(shí)例:dim x1=#12/31/1996 16:45:30#
x2=#2/10/1997 9:30:50#
v=datediff("yyyy",x1,x2) 'v=1年
7. FormatDateTime:日期時(shí)間的格式化
格式:v=formatdateyime(x[,日期格式])
日期格式值:DateFormat.GeneralDate 、 DateFormat.LongDate、
DateFotmat.ShortDate、DateFormat.LongTime、DateFormat.ShortTime
8. MonthName:返回月份名稱
實(shí)例:v=monthname(5) 'v="五月"
9. WeekDayName:返回星期名稱 '用法同8.
2. Filter:搜尋字符串?dāng)?shù)組中的特定字符串
格式:v=filter(x,s[,include[,compare]])
實(shí)例:
Dim x()={"kjwang","wangkj","peter"}
Dim v
v=filter(x,"kj") '結(jié)果v(0)="kjwang",v(1)="wangkj"
v=filter(x,"kj",false) '結(jié)果v(0)="peter"
v=filter(x,"kj",true,vbTextCompare) '不分大小寫(xiě)搜尋
3. InStr:尋找字符串位置(InstrRev:倒過(guò)來(lái)尋找字符串)
格式:
v=instr(x,y) '從x字符串第1個(gè)字符起找出y字符串出現(xiàn)的位置
v=instr(n,x,y) '從x字符串第n個(gè)字符起找出y字符串出現(xiàn)的位置
格式:
v=InstrRev(x,s[,n[,Compare]])
4. Join:將字符串連接
格式:v=join(x[,d])'d為分隔字符
5. Len(x):計(jì)算字符串x的長(zhǎng)度
格式:v=len(x)
6. Left(x,n):返回字符串x左邊n個(gè)字符(對(duì)應(yīng)Right(x,n))
7. Mid:讀取字符串x中間的字符
格式:v=mid(x,n,m)
8. LTrim(x),RTim(x),Trim(x)去空白字符
9. Replace:字符串取代
格式:v=Replace(x,s,r)
實(shí)例:x="i saw a saw a saw"
v=replace(x,"saw","so") 'v="i so a so a so"
10. Split:字符串分割
格式:v=split(s[,d])
實(shí)例:v=split("vb.net,iis6.0,asp.net",",")
'結(jié)果v(0)="vb.net",v(1)="iis6.0",v(2)="asp.net"
11. StrReverse:反轉(zhuǎn)字符串
實(shí)例:v=strreverse("kjwang") 'v="gnawjk"
12. UCase(x),LCase(x):變換英文字母的大小寫(xiě)
實(shí)例:x="hello,VB中文!"
v=UCase(x) 'v="HELLO,VB中文!"
'日期相關(guān):
1. 取出日期時(shí)間
1)DateValue(x),TimeValue(x)
格式:v=DateValue(x) :取出的“日期”部分
v=timevalue(x) '類上
2)Year(x),Month(x),Day(x)
格式:v=Year(x)
v=Month(x)
v=Day(x)
Hour(x),Minute(x),Second(x):取出時(shí),分,秒
3)DateSerial(Y,M,D):合并年、月、日成為日期
實(shí)例:Dim v
v=DateSerial(1996,10,5) 'v=1996/10/5
TimeSerial(H,M,S):合并時(shí)、分、秒成為時(shí)間
2. Now:讀取系統(tǒng)日期時(shí)間
格式:v=now
3. Timer:從凌晨12:00:00AM起所經(jīng)過(guò)的秒數(shù)
格式:v=timer
4. DatePart(p,x):取出年、月、日等各部分的數(shù)值
實(shí)例:Dim X=#2/10/1996 16:45:30#
v=DatePart("yyyy",X) 'v=1996年
v=DatePart("m",X) 'v=2月
v=DatePart("d",X) 'v=10日
v=DatePart("h",X) 'v=16時(shí)
v=DatePart("n",X) 'v=45分
v=DatePart("s",X) 'v=30秒
v=DatePart("q",X) 'v=1季(第一季,春季)
v=DatePart("y",X) 'v=41天(1996年的第41天)
v=DatePart("ww",X) 'v=6周(1996年的第6周)
v=DatePart("w",X) 'v=7(第6周的第7天,即星期六)
5. DateAdd(p,n,x):加減若干時(shí)間后的新日期時(shí)間
格式:v=DateAdd(p,n,x) 'p值同上如:"yyyy"、"m"等
實(shí)例:Dim x=#1/31/1996 16:45:30#
v=dateadd("yyyy",-3,x) '減3年,v=1993/1/31 16:45:30
6. DateDiff(p,x1,x2):計(jì)算兩日期時(shí)間的差值 'p值同上
實(shí)例:dim x1=#12/31/1996 16:45:30#
x2=#2/10/1997 9:30:50#
v=datediff("yyyy",x1,x2) 'v=1年
7. FormatDateTime:日期時(shí)間的格式化
格式:v=formatdateyime(x[,日期格式])
日期格式值:DateFormat.GeneralDate 、 DateFormat.LongDate、
DateFotmat.ShortDate、DateFormat.LongTime、DateFormat.ShortTime
8. MonthName:返回月份名稱
實(shí)例:v=monthname(5) 'v="五月"
9. WeekDayName:返回星期名稱 '用法同8.
相關(guān)文章
初窺WMI_Vbs腳本編程簡(jiǎn)明教程補(bǔ)充讀物
看了沼澤介紹的wmi腳本相關(guān)知識(shí),對(duì)新手是個(gè)不錯(cuò)的教材,如果想和系統(tǒng)結(jié)合的更好,想實(shí)現(xiàn)更大功能的代碼,那么學(xué)習(xí)vbs就不得不用wmi腳本2008-06-06vbs查詢局域網(wǎng)內(nèi)電腦的軟件和硬件列表清單
這個(gè)是可以幫助大家輕松獲取局域網(wǎng)內(nèi)電腦的相關(guān)軟硬件新的的一個(gè)小工具,希望能幫助到大家,需要的朋友可以參考下2020-12-12VBS教程:函數(shù)-DateDiff 函數(shù)
VBS教程:函數(shù)-DateDiff 函數(shù)...2006-11-11用vbs判斷一個(gè)日期是否在指定的時(shí)段內(nèi)
用vbs判斷一個(gè)日期是否在指定的時(shí)段內(nèi)...2007-04-04用vbs實(shí)現(xiàn)自動(dòng)檢查代理是否可用,并自動(dòng)設(shè)置IE代理的腳本
每次用代理網(wǎng)站,找了很多代理地址,大部分是不可以用的,但是可不可用,要手工一個(gè)個(gè)的試,有點(diǎn)麻煩,下面代碼幫你解決這個(gè)問(wèn)題2008-06-06Win7下VHD文件右鍵增強(qiáng)實(shí)現(xiàn)代碼(vbs+注冊(cè)表)
這篇文章主要介紹了Win7下VHD文件右鍵增強(qiáng)的實(shí)現(xiàn)方法,需要的朋友可以參考下2013-07-07