(完整word版)VBS函數(shù)大全,推薦文檔_第1頁
(完整word版)VBS函數(shù)大全,推薦文檔_第2頁
(完整word版)VBS函數(shù)大全,推薦文檔_第3頁
(完整word版)VBS函數(shù)大全,推薦文檔_第4頁
(完整word版)VBS函數(shù)大全,推薦文檔_第5頁
已閱讀5頁,還剩48頁未讀 繼續(xù)免費(fèi)閱讀

下載本文檔

版權(quán)說明:本文檔由用戶提供并上傳,收益歸屬內(nèi)容提供方,若內(nèi)容存在侵權(quán),請進(jìn)行舉報或認(rèn)領(lǐng)

文檔簡介

TOC\o"1-5"\h\z\o"CurrentDocument"Abs函數(shù) 3\o"CurrentDocument"Array函數(shù) 3\o"CurrentDocument"Asc函數(shù) 4\o"CurrentDocument"Atn函數(shù) 4\o"CurrentDocument"CBool函數(shù) 5\o"CurrentDocument"CByte函數(shù) 5\o"CurrentDocument"CCur函數(shù) 6\o"CurrentDocument"CDate函數(shù) 7\o"CurrentDocument"CDbl函數(shù) 7\o"CurrentDocument"Chr函數(shù) 8\o"CurrentDocument"CInt函數(shù) 8\o"CurrentDocument"CLng函數(shù) 9\o"CurrentDocument"Cos函數(shù) 10\o"CurrentDocument"CreateObject函數(shù) 10\o"CurrentDocument"CSng函數(shù) 12\o"CurrentDocument"CStr函數(shù) 12\o"CurrentDocument"Date函數(shù) 13\o"CurrentDocument"DateAdd函數(shù) 14DateDiff函數(shù) 14\o"CurrentDocument"DatePart 函數(shù) 15\o"CurrentDocument"DateSerial 函數(shù) 17\o"CurrentDocument"DateValue 函數(shù) 18\o"CurrentDocument"Day函數(shù) 18\o"CurrentDocument"Eval函數(shù) 19\o"CurrentDocument"Exp函數(shù) 20\o"CurrentDocument"Filter函數(shù) 20\o"CurrentDocument"FormatCurrency函數(shù) 22\o"CurrentDocument"FormatDateTime函數(shù) 23\o"CurrentDocument"FormatNumber 函數(shù) 24\o"CurrentDocument"FormatPercent 函數(shù) 25\o"CurrentDocument"GetLocale 函數(shù) 26\o"CurrentDocument"GetObject 函數(shù) 27\o"CurrentDocument"GetRef函數(shù) 29\o"CurrentDocument"Hex函數(shù) 30\o"CurrentDocument"Hour函數(shù) 31\o"CurrentDocument"InputBox函數(shù) 31\o"CurrentDocument"InStr函數(shù) 32\o"CurrentDocument"InStrRev 函數(shù) 34\o"CurrentDocument"Int、Fix函數(shù) 36\o"CurrentDocument"IsArray函數(shù) 36\o"CurrentDocument"IsDate函數(shù) 37\o"CurrentDocument"IsEmpty函數(shù) 38\o"CurrentDocument"IsNull函數(shù) 38\o"CurrentDocument"IsNumeric函數(shù) 39\o"CurrentDocument"IsObject函數(shù) 39\o"CurrentDocument"Join函數(shù) 40\o"CurrentDocument"LBound函數(shù) 41\o"CurrentDocument"LCase函數(shù) 41\o"CurrentDocument"Left 函數(shù) 42\o"CurrentDocument"Len 函數(shù) 43\o"CurrentDocument"LoadPicture函數(shù) 43\o"CurrentDocument"Log 函數(shù) 44\o"CurrentDocument"LTrim、RTrim和Trim函數(shù) 44\o"CurrentDocument"Mid 函數(shù) 45\o"CurrentDocument"Minute 46\o"CurrentDocument"Month函數(shù) 46\o"CurrentDocument"MonthName函數(shù) 46\o"CurrentDocument"MsgBox函數(shù) 47\o"CurrentDocument"Now 49\o"CurrentDocument"Oct 50\o"CurrentDocument"Replace函數(shù) 50RGB函數(shù) 52Right函數(shù) 53Rnd函數(shù) 53Round函數(shù) 54Microsoft(R)VisualBasic(R)ScriptingEdition 55ScriptEngineMajorVersion 函數(shù) 56ScriptEngineMinorVersion 函數(shù) 56Second函數(shù) 57SetLocale 函數(shù) 57Sgn函數(shù) 58Sin函數(shù) 59Space函數(shù) 60Split函數(shù) 60Sqr函數(shù) 61StrComp 函數(shù) 62String函數(shù) 63StrReverse 函數(shù) 64Tan函數(shù) 64Time函數(shù) 65Timer函數(shù) 65TimeSerial 函數(shù) 65TimeValue 66TypeName函數(shù) 67UBound 函數(shù) 68UCase函數(shù) 69VarType 函數(shù) 69Weekday函數(shù) 70WeekDayName函數(shù) 72Year函數(shù) 73VBS函數(shù)大全Abs函數(shù)返回數(shù)字的絕對值。Abs(number)number參數(shù)可以是任意有效的數(shù)值表達(dá)式。如果number包含Null,則返回Null;如果是未初始化變量,則返回0。說明數(shù)字的絕對值是其無符號的數(shù)值大小。例如,Abs(-1)和Abs(1)都返回1。下面示例利用Abs函數(shù)計算數(shù)字的絕對值:DimMyNumberMyNumber=Abs(50.3) '返回50.3。MyNumber=Abs(-50.3) '返回50.3。Array函數(shù)返回包含數(shù)組的Variant。Array(arglist)arglist 參數(shù)是賦給包含在Variant 中的數(shù)組元素的值的列表(用逗號分隔)。如果沒有指定此參數(shù),則將會創(chuàng)建零長度的數(shù)組。說明用于引用數(shù)組元素的表示符,由跟隨有括號的變量名組成,括號中包含指示所需元素的索引號。在下面的示例中,第一條語句創(chuàng)建名為 A的變量。第二條語句將一個數(shù)組賦值給變量 Ao最后一條語句將包含在第二個數(shù)組元素中的值賦值給另一個變量。DimAA=Array(10,20,30)=A(2) 'Bisnow30。

注意未作為數(shù)組聲明的變量仍可以包含數(shù)組。雖然包含數(shù)組的 Variant 變量與包含Variant 元素的數(shù)組變量有概念上的不同,但訪問數(shù)組元素的方法是相同的。Asc函數(shù)返回與字符串的第一個字母對應(yīng)的 ANSI字符代碼。Asc(string)string 參數(shù)是任意有效的字符串表達(dá)式。如果string 參數(shù)未包含字符,則將發(fā)生 運(yùn)行時錯誤說明下面例子中,Asc返回每一個字符串首字母的 ANSI字符代碼:DimMyNumberMyNumber=Asc("A") '返回65。MyNumberAsc("a")返回MyNumberAsc("a")返回97MyNumber=Asc("Apple")'返回65。注意AscB 函數(shù)和包含字節(jié)數(shù)據(jù)的字符串一起使用。 AscB不是返回第一個字符的字符代碼,而是返回首字節(jié)。AscW是為使用Unicode字符的32位平臺提供的。 它返回Unicode (寬型)字符代碼,因此可以避免從ANSI至IUnicode的代碼轉(zhuǎn)換。Atn函數(shù)Atn函數(shù)返回數(shù)值的反正切值。Atn(number)number 參數(shù)可以是任意有效的數(shù)值表達(dá)式。說明Atn函數(shù)計算直角三角形兩個邊的比值 (number)并返回對應(yīng)角的弧度值。此比值是該角對邊的長度與鄰邊長度之比。 結(jié)果的范圍是從-pi_/2到pi/2弧度?;《茸儞Q為角度的方法是將弧度乘以 pi/180o反之,角度變換為弧度的方法是將角度乘以 180/pi下面的示例利用 Atn來計算pi的值:Dimpipi=4*Atn(1) '計算pi的值。注意Atn是Tan(將角作為參數(shù)返回直角三角形兩邊的比值) 的反三角函數(shù)。不要混淆Atn與余切(正切的倒數(shù)(1/tangent))函數(shù)。CBool函數(shù)返回表達(dá)式,此表達(dá)式已轉(zhuǎn)換為 Boolean子類型的VariantCBool(expression)expression 是任意有效的表達(dá)式。說明如果expression是零,則返回False;否則返回True。如果expression 不能解釋為數(shù)值,則將發(fā)生運(yùn)行時錯誤。下面的示例使用 CBool函數(shù)將一個表達(dá)式轉(zhuǎn)變成 Boolean類型。如果表達(dá)式所計算的值非零,則CBool函數(shù)返回True;否則返回 False。DimA,B,CheckA=5:B=5 '初始化變量。Check=CBool(A=B) '復(fù)選框設(shè)為TrueA=0 '定義變量。Check=CBool(A) '復(fù)選框設(shè)為 FalseCByte函數(shù)返回表達(dá)式,此表達(dá)式已被轉(zhuǎn)換為 Byte子類型的VariantCByte(expression)expression 參數(shù)是任意有效的表達(dá)式。說明通常,可以使用子類型轉(zhuǎn)換函數(shù)書寫代碼,以顯示某些操作的結(jié)果應(yīng)被表示為特定的數(shù)據(jù)類型,而不是默認(rèn)類型。例如,在出現(xiàn)貨幣、單精度、雙精度或整數(shù)運(yùn)算的情況下,使用CByte強(qiáng)制執(zhí)行字節(jié)運(yùn)算。CByte 函數(shù)用于進(jìn)行從其他數(shù)據(jù)類型到 Byte子類型的的國際公認(rèn)的格式轉(zhuǎn)換。例如對十進(jìn)制分隔符(如千分符)的識別,可能取決于系統(tǒng)的 區(qū)域設(shè)置。如果expression在Byte子類型可接受的范圍之外,則發(fā)生錯誤。下面的示例利用 CByte函數(shù)把expression轉(zhuǎn)換為byte:DimMyDouble,MyByteMyDouble=125.5678 'MyDouble 是一個雙精度值。MyByte=CByte(MyDouble) 'MyByte包含126。CCur函數(shù)返回表達(dá)式,此表達(dá)式已被轉(zhuǎn)換為 Currency 子類型的Variant。CCur(expression)expression 參數(shù)是任意有效的表達(dá)式。說明通常,您可以使用子類型數(shù)據(jù)轉(zhuǎn)換函數(shù)書寫代碼,以顯示某些操作的結(jié)果應(yīng)當(dāng)被表達(dá)為特定的數(shù)據(jù)類型,而非默認(rèn)的數(shù)據(jù)類型。例如在整數(shù)運(yùn)算的情況下,使用CCur函數(shù)強(qiáng)制進(jìn)行貨幣計算。CCur函數(shù)用于進(jìn)行從其他數(shù)據(jù)類型到 Currency 子類型的國際公認(rèn)的格式轉(zhuǎn)換。例如,對十進(jìn)制分隔符和千位分隔符的識別取決于系統(tǒng)的 區(qū)域設(shè)置。下面的示例使用CCur函數(shù)將一個表達(dá)式轉(zhuǎn)換成 Currency類型:DimMyDouble,MyCurrMyDouble=543.214588 'MyDouble 是雙精度的。MyCurr=CCur(MyDouble*2) '把MyDouble*2(1086.429176) 的結(jié)果轉(zhuǎn)換為Currency(1086.4292)。CDate函數(shù)返回表達(dá)式,此表達(dá)式已被轉(zhuǎn)換為 Date子類型的Variant。CDate(date)date參數(shù)是任意有效的日期表達(dá)式。說明IsDate 函數(shù)用于判斷date是否可以被轉(zhuǎn)換為日期或時間。 CDate識別日期文字和時間文字,以及一些在可接受的日期范圍內(nèi)的數(shù)字。在將數(shù)字轉(zhuǎn)換為日期時,數(shù)字的整數(shù)部分被轉(zhuǎn)換為日期,分?jǐn)?shù)部分被轉(zhuǎn)換為從午夜開始計算的時間。CDate根據(jù)系統(tǒng)的區(qū)域設(shè)置識別日期格式。如果數(shù)據(jù)的格式不能被日期設(shè)置識別,則不能判斷年、月、日的正確順序。另外,如果長日期格式包含表示星期幾的字符串,則不能被識別。下面的示例使用CDate函數(shù)將字符串轉(zhuǎn)換成日期類型。一般不推薦使用硬件譯碼日期和時間作為字符串(下面的例子已體現(xiàn))。而使用時間和日期文字 (如#10/19/1962#,#4:45:23PM#) 。MyDate="October19,1962" '定義日期。MyShortDate=CDate(MyDate) '轉(zhuǎn)換為日期數(shù)據(jù)類型。MyTime="4:35:47PM"'定義時間。MyShortTime=CDate(MyTime) '轉(zhuǎn)換為日期數(shù)據(jù)類型。CDbl函數(shù)返回表達(dá)式,此表達(dá)式已被轉(zhuǎn)換為 Double子類型的Variant。CDbl(expression)expression 參數(shù)是任意有效的表達(dá)式。說明通常,您可以使用子類型數(shù)據(jù)轉(zhuǎn)換函數(shù)書寫代碼,以顯示某些操作的結(jié)果應(yīng)當(dāng)被表達(dá)為特定的數(shù)據(jù)類型,而非默認(rèn)的數(shù)據(jù)類型。例如在出現(xiàn)貨幣或整數(shù)運(yùn)算的情況下,使用CDbl或CSng函數(shù)強(qiáng)制進(jìn)行雙精度或單精度算術(shù)運(yùn)算。CDbl函數(shù)用于進(jìn)行從其他數(shù)據(jù)類型到 Double 子類型的國際公認(rèn)的格式轉(zhuǎn)換。例如,十進(jìn)制分隔符和千位分隔符的識別取決于系統(tǒng)的 區(qū)域設(shè)置。expression expression 參數(shù)是任意有效的表達(dá)式。下面的示例利用 CDbl函數(shù)把expression轉(zhuǎn)換為DoubleDimMyCurr,MyDoubleMyCurr=CCur(234.456784)DimMyCurr,MyDoubleMyCurr=CCur(234.456784)MyDouble=CDbl(MyCurr*8.2*0.01)MyCurr是Currency型(234.4567)。

'把結(jié)果轉(zhuǎn)換為Double型(19.2254576)Chr函數(shù)返回與指定的ANSI字符代碼相對應(yīng)的字符。Chr(charcode)charcode 參數(shù)是可以標(biāo)識字符的數(shù)字。說明從0到31的數(shù)字表示標(biāo)準(zhǔn)的不可打印的 ASCII代碼。例如,Chr(10)返回?fù)Q行符下面例子利用Chr函數(shù)返回與指定的字符代碼相對應(yīng)的字符 :DimMyCharMyChar=Chr(65)‘返回AoMyChar=Chr(97)‘返回aoMyChar=Chr(62)‘返回>oMyChar=Chr(37)‘返回%,而總是Unicode注意ChrB函數(shù)與包含在字符串中的字節(jié)數(shù)據(jù)一起使用。 ChrB不是返回一個或兩個字節(jié)的字符,而總是Unicode返回單個字節(jié)的字符。ChrW是為使用Unicode字符的32位平臺提供的。它的參數(shù)是一個(寬字符)的字符代碼,因此可以避免將 ANSI轉(zhuǎn)化為Unicode字符。CInt函數(shù)返回表達(dá)式,此表達(dá)式已被轉(zhuǎn)換為Integer子類型的VariantCInt(expression)說明通常,可以使用子類型轉(zhuǎn)換函數(shù)書寫代碼,以顯示某些操作的結(jié)果應(yīng)被表示為特定的數(shù)據(jù)類型,而不是默認(rèn)類型。例如,在出現(xiàn)貨幣、單精度或雙精度運(yùn)算的情況下,使用CInt或CLng強(qiáng)制執(zhí)行整數(shù)運(yùn)算。CInt函數(shù)用于進(jìn)行從其他數(shù)據(jù)類型到 Integer 子類型的國際公認(rèn)的格式轉(zhuǎn)換。例如對十進(jìn)制分隔符(如千分符)的識別,可能取決于系統(tǒng)的 區(qū)域設(shè)置。如果expression在Integer 子類型可接受的范圍之外,則發(fā)生錯誤。下面的示例利用 CInt函數(shù)把值轉(zhuǎn)換為Integer:DimMyDouble,MyIntMyDouble=2345.5678 'MyDouble是Double。MyInt=CInt(MyDouble) 'MyInt包含2346。注意CInt不同于Fix和Int函數(shù)刪除數(shù)值的小數(shù)部分,而是采用四舍五入的方式。 當(dāng)小數(shù)部分正好等于0.5時,CInt總是將其四舍五入成最接近該數(shù)的偶數(shù)。例如,0.5四舍五入為0,以及1.5四舍五人為2.CLng函數(shù)返回表達(dá)式,此表達(dá)式已被轉(zhuǎn)換為 Long子類型的Variant。CLng(expression)expression 參數(shù)是任意有效的表達(dá)式。說明通常,您可以使用子類型數(shù)據(jù)轉(zhuǎn)換函數(shù)書寫代碼,以顯示某些操作的結(jié)果應(yīng)當(dāng)被表達(dá)為特定的數(shù)據(jù)類型,而非默認(rèn)的數(shù)據(jù)類型。例如,在出現(xiàn)貨幣運(yùn)算、單精度或雙精度算術(shù)運(yùn)算的情況下,使用 CInt或CLng函數(shù)強(qiáng)制進(jìn)行整數(shù)運(yùn)算。CLng函數(shù)用于進(jìn)行從其他數(shù)據(jù)類型到 Long子類型的的國際公認(rèn)的格式轉(zhuǎn)換。例如,對十進(jìn)制分隔符和千位分隔符的識別取決于系統(tǒng)的 區(qū)域設(shè)置。如果expression 取值不在Long子類型的允許范圍內(nèi),則會出現(xiàn)錯誤。下面的示例利用 CLng函數(shù)把值轉(zhuǎn)換為Long:

DimMyVal1,MyVal2,MyLong1,MyLong2MyVal1=25427.45: MyVal2=25427.55 'MyVal1,MyVal2是雙精度值MyLong1=CLng(MyVal1)'MyLong125427。MyLong2=CLng(MyVal2)'MyLong2包含25428 。注意CLng不同于Fix和Int函數(shù)刪除小數(shù)部分, 而是采用四舍五入的方式。 當(dāng)小數(shù)部分正好等于0.5時,CLng函數(shù)總是將其四舍五入為最接近該數(shù)的偶數(shù)。如,0.5四舍五入為0,以及1.5四舍五入為2。Cos函數(shù)返回某個角的余弦值。Cos(number)number 參數(shù)可以是任何將某個角表示為弧度的有效 數(shù)值表達(dá)式。說明Cos函數(shù)取某個角并返回直角三角形兩邊的比值。此比值是直角三角形中該角的鄰邊長度與斜邊長度之比。結(jié)果范圍在-1到1之間。角度轉(zhuǎn)化成弧度方法是用角度乘以 pi/180。反之,弧度轉(zhuǎn)化成角度的方法是用弧度乘以 180/pi下面的示例利用Cos函數(shù)返回一個角的余弦值:DimMyAngle,MySecantMyAngle=1.3 '用弧度定義一個角。MySecant=1/Cos(MyAngle)'計算正割。CreateObject函數(shù)創(chuàng)建并返回對Automation對象的引用。CreateObject(servername.typename[,CreateObject(servername.typename[,location])servername必選項。提供對象的應(yīng)用程序名稱。typename必選項。要創(chuàng)建的對象類型或類。location可選項。對象所在的網(wǎng)絡(luò)服務(wù)器將被創(chuàng)建。說明Automation服務(wù)器至少提供一種對象類型。例如,字處理應(yīng)用程序可以提供應(yīng)用程序?qū)ο?、文檔對象和工具條對象。要創(chuàng)建Automation對象,將CreateObject函數(shù)返回的對象賦值給某對象變量:DimExcelSheetSetExcelSheet=CreateObject("Excel.Sheet")上述代碼啟動創(chuàng)建對象(在此實(shí)例中,是 MicrosoftExcel電子表格)的應(yīng)用程序。對象創(chuàng)建后,就可以在代碼中使用定義的對象變量引用此對象。在下面的示例中,可使用對象變量、ExcelSheet和其他Excel對象,包括 Application對象和Cells集合訪問新對象的屬性和方法。例如:'MakeExcelvisiblethroughtheApplicationobject.ExcelSheet.Application.Visible =True'Placesometextinthefirstcellofthesheet.ExcelSheet.ActiveSheet.Cells(1,1).Value ="ThisiscolumnA,row1"'Savethesheet.ExcelSheet.SaveAs"C:\DOCS\TEST.XLS"'CloseExcelwiththeQuitmethodontheApplicationobject.ExcelSheet.Application.Quit'Releasetheobjectvariable.SetExcelSheet=Nothing在遠(yuǎn)程服務(wù)器上創(chuàng)建一個對象,當(dāng)Internet安全關(guān)閉時只能完成。通過傳遞計算機(jī)名到CreateObject服務(wù)器名的參數(shù),能在遠(yuǎn)程網(wǎng)絡(luò)上創(chuàng)建對象。該名稱如同共享部份的機(jī)器名。例如網(wǎng)絡(luò)共享名命名為:"\\myserver\public",servername是"myserver"。另外,只能指定servername使用DNS格式或IP地址。以下代碼返回運(yùn)行在命名為"myserver"的遠(yuǎn)程網(wǎng)絡(luò)計算機(jī)上 Excel實(shí)例的版本號:FunctionGetVersionDimXLApp

SetXLAppGetVersionSetXLAppGetVersionXLApp.VersionMyServer")EndFunctionMyServer")錯誤發(fā)生在指定的遠(yuǎn)程服務(wù)器不存在或無法找到CSng函數(shù)返回表達(dá)式,該表達(dá)式已被轉(zhuǎn)換為 Single 子類型的Variant。CSng(expression)expression 參數(shù)是任意有效的表達(dá)式。說明通常,可以使用子類型轉(zhuǎn)換函數(shù)書寫代碼,以顯示某些操作的結(jié)果應(yīng)被表示為特定的數(shù)據(jù)類型,而不是默認(rèn)類型。例如,在出現(xiàn)貨幣或整數(shù)運(yùn)算的情況下,使用CDbl或CSng強(qiáng)制執(zhí)行雙精度或單精度運(yùn)算。CSng函數(shù)用于進(jìn)行從其他數(shù)據(jù)類型到 Single 子類型的國際公認(rèn)的格式轉(zhuǎn)換。例如,對十進(jìn)制分隔符(如千分符)的識別取決于系統(tǒng)的區(qū)域設(shè)置。如果expression在Single子類型允許的范圍之外,則發(fā)生錯誤。下面的示例利用 CSng函數(shù)把值轉(zhuǎn)換為Single:DimMyDouble1,MyDouble2,MySingle1,MySingle2'MyDouble1,MyDouble2 是雙精度值。MyDouble1=75.3421115: MyDouble2=75.3421555MySingle1 = CSng( MyDouble1 ) 'MySingle1 包含 75.34211 。MySingle2 = CSng( MyDouble2 ) 'MySingle2 包含 75.34216 。返回表達(dá)式,該表達(dá)式已被轉(zhuǎn)換為String子類型的VariantCStr函數(shù)返回表達(dá)式,該表達(dá)式已被轉(zhuǎn)換為String子類型的VariantCStr(expression)expression 參數(shù)是任意有效的表達(dá)式。說明通常,可以使用子類型轉(zhuǎn)換函數(shù)書寫代碼,以顯示某些操作的結(jié)果應(yīng)被表示為特定的數(shù)據(jù)類型,而不是默認(rèn)類型。例如,使用CStr強(qiáng)制將結(jié)果表示為String。CStr函數(shù)用于替代Str函數(shù)來進(jìn)行從其他數(shù)據(jù)類型到 String 子類型的國際公認(rèn)的格式轉(zhuǎn)換。例如對十進(jìn)制分隔符的識別取決于系統(tǒng)的 區(qū)域設(shè)置。expression 根據(jù)下表決定返回的數(shù)據(jù):如果expression 為CStr返回Boolean字符串,包含True或False。Date字符串,包含系統(tǒng)的短日期格式日期。Null運(yùn)行時錯誤。Empty零長度字符串("")。Error字符串,包含跟隨有錯誤號碼的單詞Error。其他數(shù)值字符串,包含此數(shù)字。下面的示例利用 CStr函數(shù)把數(shù)字轉(zhuǎn)換為 String:DimMyDouble,MyStringMyDouble=437.324 'MyDouble 是雙精度值。MyString=CStr(MyDouble) 'MyString包含"437.324"。Date函數(shù)返回當(dāng)前系統(tǒng)日期。Date說明下面的示例利用Date函數(shù)返回當(dāng)前系統(tǒng)日期DimMyDateMyDateDimMyDateMyDate=DateMyDate包含當(dāng)前系統(tǒng)日期。DateAdd函數(shù)返回已添加指定時間間隔的日期。DateAdd(interval,number,date)參數(shù)interval必選項。字符串表達(dá)式,表示要添加的時間間隔。有關(guān)數(shù)值,請參閱 設(shè)置”部分。number必選項。數(shù)值表達(dá)式,表示要添加的時間間隔的個數(shù)。數(shù)值表達(dá)式可以是正數(shù)(得到未來的日期)或負(fù)數(shù)(得到過去的日期)。date必選項。Variant或要添加interval的表示日期的文字。DateDiff函數(shù)返回兩個日期之間的時間間隔。DateDiff(interval,datel,date2[,firstdayofweek[,firstweekofyear]] )DateDiff 函數(shù)的語法有以下參數(shù):參數(shù)interval必選項。Stringexpression 表示用于計算date1和date2之間的時間間隔。有關(guān)數(shù)值,請參閱設(shè)置”部分。date1,date2必選項。日期表達(dá)式。用于計算的兩個日期。Firstdayofweek可選項。指定星期中第一天的常數(shù)。如果沒有指定,則默認(rèn)為星期日。有關(guān)數(shù)值,請參閱 設(shè)置”部分。Firstweekofyear可選項。指定一年中第一周的常數(shù)。如果沒有指定,則默認(rèn)為 1月1日所在的星期。有關(guān)數(shù)值,請參閱設(shè)置”部分。DatePart函數(shù)返回給定日期的指定部分。DatePart(interval,date[,firstdayofweek[,firstweekofyear]] )Argumentsinterval必選項。字符串表達(dá)式表示要返回的時間間隔。有關(guān)數(shù)值,請參閱設(shè)置”部分。Date必選項。要計算的日期表達(dá)式。firstdayofweek可選項。指定星期中的第一天的常數(shù)。如果沒有指定,則默認(rèn)為星期日。有關(guān)數(shù)值,請參閱 設(shè)置”部分Firstweekofyear可選項。指定一年中第一周的常數(shù)。如果沒有指定,則默認(rèn)為 1月1日所在的星期。有關(guān)數(shù)值,請參閱設(shè)置”部分。設(shè)置interval 參數(shù)可以有以下值:設(shè)置描述

yyyy年q季度m月y一年的日數(shù)d日w一周的日數(shù)ww周h小時n分鐘s秒firstdayofweek 參數(shù)可以有以下值:常數(shù)值描述vbUseSystem0使用區(qū)域語言支持(NLS)API設(shè)置。vbSunday1星期日(默認(rèn))vbMonday2星期一vbTuesday3星期二vbWednesday4星期三vbThursday5星期四vbFriday6星期五vbSaturday7星期六firstweekofyear 參數(shù)可以有以下值:常數(shù)值描述vbUseSystem0使用區(qū)域語言支持(NLS)API設(shè)置。vbFirstJan11由1月1日所在的星期開始(默認(rèn))。vbFirstFourDays2由在新年中至少有四天的第一周開始。vbFirstFullWeek3由在新的一年中第一個完整的周(不跨年度)開始。說明DatePart 函數(shù)用于計算日期并返回指定的時間間隔。例如使用 DatePart 計算某一天是星期幾或當(dāng)前的時間。firstdayofweek參數(shù)會影響使用“WF口"ww澗隔符號的計算。

firstdayofweekdate被包含在引號("")中,如果datedate被包含在引號("")中,并且省略年份,則在代碼中每次計算 date表達(dá)式時,將插入當(dāng)前年份。這樣就可以編寫適用于不同年份的程序代碼。.下面的示例利用 DatePart下面的示例利用 DatePart函數(shù)獲得日期并顯示該日所在的季節(jié)oFunctionGetQuarter(TheDate)GetQuarterDatePart("q"GetQuarterDatePart("q",TheDate)EndFunctionDateSerial函數(shù)DateSerial函數(shù)對于指定的年、月、日,返回Date對于指定的年、月、日,返回Date子類型的VariantDateSerial(year,month,dayArgumentsYear從100到9999之間的數(shù)字或數(shù)值表達(dá)式。Month任意數(shù)值表達(dá)式。DateSerial(year,month,dayArgumentsYear從100到9999之間的數(shù)字或數(shù)值表達(dá)式。Month任意數(shù)值表達(dá)式。Day任意數(shù)值表達(dá)式。說明要指定日期,如1991年12月31日,DateSerial即日的取值應(yīng)在1和31之間,月的取值應(yīng)在 1和的年、月、日數(shù)目的數(shù)值表達(dá)式為每個參數(shù)指定相對日期。函數(shù)中每個參數(shù)的取值范圍都應(yīng)該是可接受的;12之間。但是,也可以使用表示某日之前或之后以下樣例中使用了數(shù)值表達(dá)式代替絕對日期。在這里,十年(1990-10)零兩個月(8以下樣例中使用了數(shù)值表達(dá)式代替絕對日期。在這里,十年(1990-10)零兩個月(8-2) 又一天(1-1)DateSerial的日期:即函數(shù)返回1980年1990年8月1日之前5月31日。DimMyDate1,MyDate2MyDate1DateSerial(1970,1,1)ReturnsJanuary1,1970.MyDate2DateSerial(1990MyDate1DateSerial(1970,1,1)ReturnsJanuary1,1970.MyDate2DateSerial(1990-10,8-2,1-1)'ReturnsMay31,1980.對于year參數(shù),若取值范圍是從0到99,則被解釋為1900到1999年。對于此范圍之外的year參數(shù),則使用四位數(shù)字表示年份(例如1800年)。當(dāng)任何一個參數(shù)的取值超出可接受的范圍時,則會適當(dāng)?shù)剡M(jìn)位到下一個較大的時間單位。例如,如果指定了35天,則這個天數(shù)被解釋成一個月加上多出來的日數(shù),多出來的日數(shù)取決于其年份和月份。但是如果參數(shù)值超出-32,768到32,767的范圍,或者由三個參數(shù)指定(無論是直接還是通過表達(dá)式指定) 的日期超出了可以接受的日期范圍,就會發(fā)生錯誤。DateValue函數(shù)返回Date子類型的Variant。DateValue(date)date參數(shù)應(yīng)是字符串表達(dá)式,表示從100年1月1日到9999年12月31日中的一個日期。但是,date也可以是表示上述范圍內(nèi)的日期、時間或日期時間混合的任意表達(dá)式。說明如果date參數(shù)包含時間信息,則DateValue不會返回時間信息。但是如果date包含無效的時間信息(如"89:98"),就會出現(xiàn)錯誤。如果date是某一字符串,其中僅包含由有效的日期分隔符分隔開的數(shù)字,則DateValue將會根據(jù)為系統(tǒng)指定的短日期格式識別月、日和年的順序。 DateValue還會識別包含月份名稱(無論是全名還是縮寫)的明確日期。例如,除了能夠識別 12/30/1991和12/30/91之外,DateValue 還能識另ijDecember30,1991和Dec30,1991 。如果省略了date的年份部分,DateValue 將使用計算機(jī)系統(tǒng)日期中的當(dāng)前年份。下面的示例利用DateValue 函數(shù)將字符串轉(zhuǎn)化成日期。也可以利用日期文字直接將日期分配給Variant變量,例如,MyDate=#9/11/63#.DimMyDateMyDate=DateValue("September11,1963") '返回日期。Day函數(shù)

返回1到31之間的一個整數(shù)(包括1和31),代表某月中的一天。date參數(shù)是任意可以代表日期的表達(dá)式。如果date參數(shù)中包含Null,則返回Null下面例子利用 Day函數(shù)得到一個給定日期月的天數(shù) :DimMyDayMyDay=Day("October19,1962")'MyDay包含19。Eval函數(shù)計算一個表達(dá)式的值并返回結(jié)果。[result=]Eval(expression)result可選項。 是一個受篁,用于接受返回的結(jié)果。如果未指定結(jié)果,應(yīng)考慮使用 Execute 語句代替。expression必選項??梢允前魏斡行?VBScript 表達(dá)式的字符串。說明在VBScript中,x=y可以有兩種解釋。第一種方式是賦值語句,將y的值賦予x。第二種解釋是測試x和y是否相等。如果相等,result為True;否則result為False。Eval方法總是采用第二種解釋,而Execute語句總是采用第一種。注意在Microsoft(R)VisualBasicScriptingEdition 中不存在這種比較與賦值的混淆,因?yàn)橘x值運(yùn)算符(=)與比較運(yùn)算符(==)不同。下面的例子說明了 Eval函數(shù)的用法:SubGuessANumberDimGuess,RndNumRndNum=Int((100) *Rnd(1)+1)GuessCInt(InputBox("Enteryourguess:",,0))GuessCInt(InputBox("Enteryourguess:",,0))DoIfEval("Guess=RndNum")ThenMsgBox"祝賀你!猜對了!"ExitSubElseGuess=CInt(InputBox(" 對不起,請再試一次”,,0))EndIfLoopUntilGuess=0EndSubExp函數(shù)返回e(自然對數(shù)的底)的嘉次方。Exp(number)number 參數(shù)可以是任意有效的數(shù)值表達(dá)式。說明2.718282如果number參數(shù)超過709.782712893 ,則出現(xiàn)錯誤。常數(shù)e的值約為2.718282注意Exp函數(shù)完成Log函數(shù)的反運(yùn)算,并且有時引用為反對數(shù)形式。下面的示例利用Exp函數(shù)返回e的嘉次方:DimMyAngle,MyHSin'用弧度定義角。MyAngle=1,3 '計算雙曲線的正弦。MyHSin=(Exp(MyAngle)-Exp(-1*MyAngle))/2Filter函數(shù)返回下標(biāo)從零開始的婺組,其中包含以特定過濾條件為基礎(chǔ)的字符串?dāng)?shù)組的子集。Filter(InputStrings,Value[,Include],Compare]]InputStrings必選項。一維數(shù)組,要在其中搜索字符串。Value必選項。要搜索的字符串。Include可選項。Boolean值,指定返回的子字符串是否包含 Value。如果Include為True,Filter將返回包含子字符串Value的數(shù)組子集。如果Include為False,Filter將返回不包含子字符串Value的數(shù)組子集。Compare可選項。數(shù)字值指出使用的比較字符串類型.請參閱值設(shè)置部分設(shè)置Compare 參數(shù)可以有以下值:常數(shù)值描述vbBinaryCompare0執(zhí)行二進(jìn)制比較。vbTextCompare1執(zhí)行文本比較。說明如果在InputStrings中沒有找到與Value匹配的值,F(xiàn)ilter 將返回空數(shù)組。如果InputStrings為Null或者不是一維數(shù)組,則會發(fā)生錯誤。由Filter 函數(shù)返回的數(shù)組僅包含足以包含匹配項數(shù)目的元素。下面例子利用Filter 函數(shù)返回包含搜索條件 "Mon"的數(shù)組:DimMyIndexDimMyArray(3)MyArray(0) = "Sunday"MyArray(1) = "Monday"MyArray(2) = "Tuesday"MyIndex=Filter(MyArray,"Mon")'MyIndex(0)包含"Monday"。

FormatCurrency函數(shù)FormatCurrency函數(shù)返回表達(dá)式,此表達(dá)式已被格式化為貨幣值(使用系統(tǒng)控制面板中定義的貨幣符號)。FormatCurrency(expression[,NumDigitsAfterDecimal[,IncludeLeadingDigit[,UseParensForNegativeNumbers[,GroupDigits]]]])參數(shù)Expression必選項。要被格式化的表達(dá)式。NumDigitsAfterDecimal可選項。指示小數(shù)點(diǎn)右側(cè)顯示位數(shù)的數(shù)值。默認(rèn)值為 -1,指示使用的是計算機(jī)的區(qū)域設(shè)置。IncludeLeadingDigit可選項。三態(tài)常數(shù),指示是否顯示小數(shù)值小數(shù)點(diǎn)前面的零。有關(guān)數(shù)值,請參閱設(shè)置”部分。UseParensForNegativeNumbers可選項。三態(tài)常數(shù),指示是否將負(fù)值置于括號中。有關(guān)數(shù)值,請參閱設(shè)置”部分。GroupDigits可選項。三態(tài)常數(shù),指示是否使用計算機(jī)區(qū)域設(shè)置中指定的數(shù)字分組符號將數(shù)字分組。 有關(guān)數(shù)值,請參閱設(shè)置”部分。設(shè)置IncludeLeadingDigit、UseParensForNegativeNumbers和GroupDigits 參數(shù)可以有以下值:常數(shù)值描述TristateTrue-1TrueTristateFalse0FalseTristateUseDefault-2使用計算機(jī)區(qū)域設(shè)置中的設(shè)置。說明

當(dāng)省略一個或多個可選項參數(shù)時, 由計算機(jī)區(qū)域設(shè)置提供被省略參數(shù)的值。 與貨幣值相關(guān)的貨幣符號的位置由系統(tǒng)的區(qū)域設(shè)置決定。貨幣”附注意除顯示起始的零”設(shè)置來自區(qū)域設(shè)置的數(shù)字”附簽外,所有其他設(shè)置信息均取自區(qū)域設(shè)置的簽。貨幣”附下面例子利用FormatCurrencyMyCurrency:下面例子利用FormatCurrencyMyCurrency:函數(shù)把expression格式化為currency 并且賦值給1000)'MyCurrency包含1000)'MyCurrency包含$1000.00MyCurrency=FormatCurrency(FormatDateTime函數(shù)返回表達(dá)式,此表達(dá)式已被格式化為日期或時間。FormatDateTime(Date[,NamedFormat])參數(shù)Date必選項。要被格式化的日期表達(dá)式。NamedFormat可選項。指示所使用的日期/時間格式的數(shù)值,如果省略,則使用vbGeneralDate設(shè)置NamedFormat 參數(shù)可以有以下值:常數(shù)值描述vbGeneralDate0顯示日期和/或時間。如果有日期部分,則將該部分顯示為短日期格式。如果有時間部分,則將該部分顯示為長時間格式。如果都存在,則顯示所有部分。vbLongDate1使用計算機(jī)區(qū)域設(shè)置中指定的長日期格式顯示日期。vbShortDate2使用計算機(jī)區(qū)域設(shè)置中指定的短日期格式顯示日期。vbLongTime3使用計算機(jī)區(qū)域設(shè)置中指定的時間格式顯示時間。vbShortTime4使用24小時格式(hh:mm)顯示時間。說明下面例子利用FormatDateTime函數(shù)把表達(dá)式格式化為長日期型并且把它賦給 MyDateTime:FunctionGetCurrentDate'FormatDateTime把日期型格式化為長日期型。GetCurrentDate=FormatDateTime(Date,1)EndFunctionFormatNumber函數(shù)返回表達(dá)式,此表達(dá)式已被格式化為數(shù)值。FormatNumber(expression[,NumDigitsAfterDecimal[,IncludeLeadingDigit[,UseParensForNegativeNumbers[,GroupDigits]]]])ArgumentsExpression必選項。要被格式化的表達(dá)式。NumDigitsAfterDecimal可選項。指示小數(shù)點(diǎn)右側(cè)顯示位數(shù)的數(shù)值。默認(rèn)值為-1,指示使用的是計算機(jī)的區(qū)域設(shè)置。IncludeLeadingDigit可選項。三態(tài)常數(shù),指示是否顯示小數(shù)值小數(shù)點(diǎn)前面的零。有關(guān)數(shù)值,請參閱“設(shè)置”部分。UseParensForNegativeNumbers可選項。三態(tài)常數(shù),指示是否將負(fù)值置于括號中。有關(guān)數(shù)值,請參閱“設(shè)置”部分。GroupDigits可選項。三態(tài)常數(shù),指示是否使用計算機(jī)區(qū)域設(shè)置中指定的數(shù)字分組符號將數(shù)字分組。有關(guān)數(shù)值,請參閱“設(shè)置”部分。設(shè)置和GroupDigits 參數(shù)可以有以下值:IncludeLeadingDigit和GroupDigits 參數(shù)可以有以下值:常數(shù)值描述TristateTrue-1TrueTristateFalse0FalseTristateUseDefault-2使用計算機(jī)區(qū)域設(shè)置中的設(shè)置。說明當(dāng)省略一個或多個可選項參數(shù)時,由計算機(jī)區(qū)域設(shè)置提供被省略參數(shù)的值。注意所有設(shè)置信息均取自區(qū)域設(shè)置的 數(shù)字”附簽。下面例子利用FormatNumber 函數(shù)把數(shù)值格式化為帶四位小數(shù)點(diǎn)的數(shù) :FunctionFormatNumberDemoDimMyAngle,MySecant,MyNumberMyAngle=1.3 '用弧度定義角。MySecant=1/Cos(MyAngle)'計算正割值。FormatNumberDemo=FormatNumber(MySecant,4)'把MySecant 格式化為帶四位小數(shù)點(diǎn)的數(shù)。EndFunctionFormatPercent函數(shù)返回表達(dá)式,此表達(dá)式已被格式化為尾隨有 %符號的百分比(乘以100)。FormatPercent(expression[,NumDigitsAfterDecimal[,IncludeLeadingDigit[UseParensForNegativeNumbers[,GroupDigits]]]] )FormatPercent 函數(shù)的語法有以下參數(shù):參數(shù)Expression必選項。要被格式化的表達(dá)式。NumDigitsAfterDecimal

可選項。指示小數(shù)點(diǎn)右側(cè)顯示位數(shù)的數(shù)值。默認(rèn)值為-1可選項。指示小數(shù)點(diǎn)右側(cè)顯示位數(shù)的數(shù)值。默認(rèn)值為-1,指示使用的是計算機(jī)的區(qū)域設(shè)置。IncludeLeadingDigit可選項。三態(tài)常數(shù),指示是否顯示小數(shù)值小數(shù)點(diǎn)前面的零。有關(guān)數(shù)值,請參閱設(shè)置”部分。UseParensForNegativeNumbers可選項。三態(tài)常數(shù),指示是否將負(fù)值置于括號中。有關(guān)數(shù)值,請參閱設(shè)置”部分。GroupDigits可選項。三態(tài)常數(shù),指示是否使用計算機(jī)區(qū)域設(shè)置中指定的數(shù)字分組符號將數(shù)字分組。 有關(guān)數(shù)值,請參閱設(shè)置”部分。設(shè)置IncludeLeadingDigit、UseParensForNegativeNumbers和GroupDigits參數(shù)可以有以下值:常數(shù)值描述TristateTrue-1TrueTristateFalse0FalseTristateUseDefault-2使用計算機(jī)區(qū)域設(shè)置中的設(shè)置。說明當(dāng)省略一個或多個可選項參數(shù)時,由計算機(jī)區(qū)域設(shè)置提供被省略參數(shù)的值。注意所有設(shè)置信息均取自區(qū)域設(shè)置的 數(shù)字”附簽。下面例子利用FormatPercent 函數(shù)把表達(dá)式格式化為百分?jǐn)?shù) :DimMyPercentMyPercent=FormatPercent(2/32)'MyPercent包含6.25%。GetLocale函數(shù)返回當(dāng)前區(qū)域設(shè)置ID值。GetLocale()說明locale是用戶參考信息集合,與用戶的語言、國家和文化傳統(tǒng)有關(guān)。 locale決定鍵盤布局、字母排序順序和日期、時間、數(shù)字與貨幣格式。返回值可以是任意一個 32-位的值,如區(qū)域設(shè)置ID所示:下面舉例說明GetLocale函數(shù)的用法。要使用該代碼,請復(fù)制標(biāo)準(zhǔn)HTML文件中<BODY>l標(biāo)志之間的所有內(nèi)容。EnterDate inUKformat: <input type="text" id="UKDate" size="20"><p>Here'sthe USequivalent: <input type="text" id="USdate" size="20"><p><inputtype="button"value="Convert"id="button1"><p>EnterapriceinGerman: <inputtype="text"id="GermanNumber"size="20"><p>Here'stheUKequivalent:<inputtype="text"id="USNumber"size="20"><p><inputtype="button"value="Convert"id="button2"><p><script language="vbscript">DimcurrentLocale'GetthecurrentlocalecurrentLocale=GetLocale SubButton1_onclickDimoriginaloriginal =SetLocale("en-gb")mydate =CDate(UKDate.value)'IEalwayssetsthelocaletoUSEnglishsousethe'currentLocalevariabletosetthelocaletoUSEnglishoriginal=SetLocale(currentLocale)USDate.value=FormatDateTime(mydate,vbShortDate)EndSubSubbutton2_onclickDimoriginaloriginal =SetLocale("de")myvalue=CCur(GermanNumber.value)original =SetLocale("en-gb")USNumber.value=FormatCurrency(myvalue)EndSub</script>GetObject函數(shù)返回對文件中Automation對象的引用GetObject([pathname][,class])Pathname可選項。字符串,包含待檢索對象的文件的完整路徑和名稱。如果省略pathname 則必須有classClass可選項。字符串,對象的差。class參數(shù)的語法格式為appname.objectype,其中包括以下部分:appname必選項。字符串,提供對象的應(yīng)用程序名稱。objectype必選項。字符串,要創(chuàng)建的對象的類型或類。說明使用GetObject 函數(shù)可以訪問文件中的 Automation對象,而且可以將該對象賦值給對象變量。使用Set語句將GetObject 返回的對象賦值給對象變量。例如:DimCADObjectSetCADObject=GetObject("C:\CAD\SCHEMA.CAD")在執(zhí)行上述代碼時,就會啟動與指定路徑名相關(guān)聯(lián)的應(yīng)用程序,同時激活指定文件中的對象。如果pathname 是零長度字符串(""),GetObject 返回指定類型的新對象實(shí)例。如果省略 pathname參數(shù),GetObject 將返回指定類型的當(dāng)前活動對象。如果沒有指定類型的對象,就會出現(xiàn)錯誤。某些應(yīng)用程序允許只激活文件的一部分, 方法是在文件名后加上一個驚嘆號 ⑴以及用于標(biāo)識要激活的文件部分的字符串。有關(guān)創(chuàng)建這種字符串的詳細(xì)信息,請參閱創(chuàng)建對象的應(yīng)用程序的有關(guān)文檔。例如,在繪圖應(yīng)用程序中,一個存放在文件中的圖可能有多層。 可以使用下述代碼來激活圖 SCHEMA.CAD中的某一層:SetLayerObject=GetObject("C:\CAD\SCHEMA.CAD!Layer3")如果沒有指定對象的類,則 Automation 會根據(jù)所提供的文件名,確定要啟動的應(yīng)用程序以及要激活的對象。但是,有些文件可能支持多個對象類。例如,圖可能支持三種不同類型的對象: Application對象、Drawing對象和Toolbar對象,所有這些都是同一個文件中的一部分。使用可選項的class參數(shù)可以指定文件中要激活的對象。例如:DimMyObjectSetMyObject=GetObject("C:\DRAWINGS\SAMPLE.DRW","FIGMENT.DRAWING")在上述樣例中,F(xiàn)IGMENT是繪圖應(yīng)用程序的名稱,而DRAWING則是它支持的一種對象類型。對象被激活之后,就可以在代碼中使用所定義的對象變量來引用它。在前面的例子中,可以使用對象變量MyObject訪問新對象的屋世和方法。例如:MyObject.Line9,90MyObject.InsertText9,100,“嗨,你好!”MyObject.SaveAs "C:\DRAWINGS\SAMPLE.DRW"注意在對象的當(dāng)前實(shí)例存在,或者要用已加載的文件創(chuàng)建對象時,請使用GetObject函數(shù)。如果沒有當(dāng)前實(shí)例,并且不準(zhǔn)備使用已加載的文件啟動對象,請使用CreateObject函數(shù)。如果對象已注冊為單個實(shí)例的對象,則無論執(zhí)行多少次 CreateObject,都只能創(chuàng)建該對象的一個實(shí)例。若使用單個實(shí)例對象,當(dāng)使用零長度字符串("")語法調(diào)用時,GetObject 總是返回同一個實(shí)例,而如果省略pathname參數(shù),則會出現(xiàn)錯誤。GetRef函數(shù)返回一個指向一過楚的引用,此過程可綁定某事件。Setobject.eventname=GetRef(procname)參數(shù)object必選項。事件所關(guān)聯(lián)的對象的名稱。eventname必選項。要與函數(shù)綁定的事件的名稱。procname過程的名稱,該過程與事件關(guān)聯(lián)。Sub或過程的名稱,該過程與事件關(guān)聯(lián)。Sub或Function說明

GetRef 函數(shù)可以用來將VBScript過程(Function或Sub)與DHTML(動態(tài)HTML)頁面中可用的任何事件聯(lián)系在一起。DHTML對象模型為不同對象提供了與各種可用事件有關(guān)的信息。在其他腳本和程序設(shè)計語言中, GetRef 所提供的功能被稱為函數(shù)指針,即它指向了在指定事件發(fā)生時要執(zhí)行的過程的地址。下面的例子說明了 GetRef函數(shù)的使用:〈SCRIPTLANGUAGE="VBScript”>Function GetRefTest()DimSplashSplash="GetRefTestVersion1.0" &vbCrLfSplash=Splash&Chr(169) &"YourCompany1999"MsgBoxSplashEndFunctionSetWindow.Onload=GetRef("GetRefTest")</SCRIPT>Hex函數(shù)返回表示十六進(jìn)制數(shù)字值的字符串。Hex(number)number 參數(shù)是任意有效的表達(dá)式。說明如果number參數(shù)不是整數(shù),則在進(jìn)行運(yùn)算前將其四舍五人為最接近的整數(shù)。如果number是Hex返回NullNull。Empty零(0)o其他數(shù)最大到八位的十六進(jìn)制字符。您可以通過在數(shù)字前面添加前綴 &H來表示十六進(jìn)制數(shù)。例如,在十六進(jìn)制計數(shù)法中, &H10表示十進(jìn)制數(shù)16。下面的示例利用Hex函數(shù)返回數(shù)字的十六進(jìn)制數(shù):返回5返回5MyHex=Hex(5)

MyHexMyHexHex(10)'返回AMyHexMyHexHex(459)'返回1CBHour函數(shù)返回0到23之間的一個整數(shù)(包括0和23),代表一天中的某一小時。Hour(time)time參數(shù)是任意可以代表時(的表達(dá)式。如果time參數(shù)中包含Null,則返回Null。下面的示例利用Hour函數(shù)得到當(dāng)前時間的小時:DimMyTime,MyHourMyTime=NowMyHour=Hour(MyTime)'MyHour包含代表當(dāng)前時間的數(shù)值。InputBox函數(shù)在對話框中顯示提示,等待用戶輸入文本或單擊按鈕,并返回文本框內(nèi)容。InputBox(prompt],title兒default][,xpos][,ypos兒helpfile,context] )參數(shù)prompt字符串表達(dá)式,作為消息顯示在對話框中。 prompt的最大長度大約是1024個字符,這取決于所使用的字符的寬度。如果prompt中包含多個行,則可在各行之間用回車符 (Chr(13))、換行符(Chr(10))或回車換行符的組合 (Chr(13)&Chr(10))以分隔各行。Titletitle,則應(yīng)用程序的名稱將顯布在標(biāo)題欄中顯示在對話框標(biāo)題欄中的字符串表達(dá)式。如果省略title,則應(yīng)用程序的名稱將顯布在標(biāo)題欄中Default

default,則文本框?yàn)轱@示在文本框中的字符串表達(dá)式,在沒有其它輸入時作為默認(rèn)的響應(yīng)值。如果省略default,則文本框?yàn)閄pos數(shù)值表達(dá)式,用于指定對話框的左邊緣與屏幕左邊緣的水平距離(單位為絹)。如果省略框會在水平方向居中。Ypos數(shù)值表達(dá)式,用于指定對話框的上邊緣與屏幕上邊緣的垂直距離(單位為絹)。如果省略框顯示在屏幕垂直方向距下邊緣大約三分之一處。Helpfile字符串表達(dá)式,用于標(biāo)識為對話框提供上下文相關(guān)幫助的幫助文件。如果已提供 helpfilecontext。Context數(shù)值表達(dá)式,用于標(biāo)識由幫助文件的作者指定給某個幫助主題的上下文編號。 如果已提供須提供helpfile。說明如果同時提供了 helpfile和context,就會在對話框中自動添加 幫助”按鈕。如果用戶單擊確定或按下ENTER,則InputBox函數(shù)返回文本框中的內(nèi)容。如果用戶單擊數(shù)返回一個零長度字符串("")。下面例子利用InputBox 函數(shù)顯示一輸入框并且把字符串賦值給輸入變量:DimInputInput=InputBox("輸入名字")MsgBox("輸入:"&Input)xpos,則對話ypos,則對話,則必須提供context,貝L[必xpos,則對話ypos,則對話,則必須提供context,貝L[必取消,則函返回某字符串在另一字符串中第一次出現(xiàn)的位置。InStr([start,]string1,string2[,compare]start可選項。數(shù)值表達(dá)式,用于設(shè)置每次搜索的開始位置。如果省略,將從第一個字符的位置開始搜索。如果start包含Null,則會出現(xiàn)錯誤。如果已指定 compare,則必須要有start參數(shù)。stringl必選項。接受搜索的字符串表達(dá)式。string2必選項。要搜索的字符串表達(dá)式。compare可選項。指示在計算子字符串時使用的比較類型的數(shù)值。有關(guān)數(shù)值,請參閱 設(shè)置”部分。如果省略,將執(zhí)行二進(jìn)制比較。設(shè)置compare 參數(shù)可以有以下值:常數(shù)值描述vbBinaryCompare0執(zhí)行二進(jìn)制比較。vbTextCompare1執(zhí)行文本比較。返回值InStr 函數(shù)返回以下值:如果InStr返回string1 為零長度0string1為NullNullstring2為零長度startstring2為NullNullstring2沒有找到0在string1中找到string2找到匹配字符串的位置start>Len(string2)0說明

MyPos下面的示例利用InStr 搜索字符串:MyPosDimSearchString,SearchChar,SearchString="XXpXXpXXPXXP"'Stringtosearchin.SearchChar"P"'Searchfor"P".MyPos=Instr(4,SearchString,SearchChar,1)’AtextualcomparisonstartingatpositionSearchString="XXpXXpXXPXXP"'Stringtosearchin.SearchChar"P"'Searchfor"P".MyPos=Instr(4,SearchString,SearchChar,1)’Atextualcomparisonstartingatposition4.Returns6.MyPos=Instr(1,SearchString,SearchChar,0)’AbinarycomparisonstartingatpositionMyPos=Instr(1,SearchString,SearchChar,0)’Abinarycomparisonstartingatposition1.Returns9.MyPos=Instr(SearchString,SearchChar)'Comparisonisbinarybydefault(lastargumentMyPos=Instr(SearchString,SearchChar)'Comparisonisbinarybydefault(lastargumentisomitted).Returns9.MyPos=Instr(1,SearchString,"W")'Abinarycomparisonstartingatposition1.Returns0("W'isnotfound).注意InStrB 函數(shù)使用包含在字符串中的字節(jié)數(shù)據(jù),所以MyPos=Instr(1,SearchString,"W")'Abinarycomparisonstartingatposition1.Returns0("W'isnotfound).注意InStrB 函數(shù)使用包含在字符串中的字節(jié)數(shù)據(jù),所以InStrB返回的不是一個字符串在另一個字符串中第一次出現(xiàn)的字符位置,而是字節(jié)位置。InStrRev函數(shù)返回某字符串在另一個字符串中出現(xiàn)的從結(jié)尾計起的位置。InStrRev(string1,string2[,start[,compare]] )參數(shù)string1必選項。接受搜索的字符串表達(dá)式。string2必選項。被搜索的字符串表達(dá)式。Start可選項。數(shù)值表達(dá)式,用于設(shè)置每次搜索的開始位置。如果省略,則默認(rèn)值為-1,表示從最后一個字符的位置開始搜索。如果start包含Null,則出現(xiàn)錯誤compare

可選項。在計算子字符串時,指示要使用的比較類型的數(shù)值。如果省略,將執(zhí)行二進(jìn)制比較。有關(guān)數(shù)值,請參閱設(shè)置”部分。設(shè)置compare 參數(shù)可以有以下值:常數(shù)Value描述vbBinaryCompare0執(zhí)行二進(jìn)制比較。vbDatabaseCompare執(zhí)行基于包含在數(shù)據(jù)庫(在此數(shù)據(jù)庫中執(zhí)行比較)中的信息的比較。返回值InStrRev 返回以下值:如果InStrRev 返回string1 為零長度0string1為NullNullstring2為零長度startstring2為NullNullstring2沒有找到0在string1中找到string2找到匹配字符串的位置start>Len(string2)0說明下面的示例利用InStr

溫馨提示

  • 1. 本站所有資源如無特殊說明,都需要本地電腦安裝OFFICE2007和PDF閱讀器。圖紙軟件為CAD,CAXA,PROE,UG,SolidWorks等.壓縮文件請下載最新的WinRAR軟件解壓。
  • 2. 本站的文檔不包含任何第三方提供的附件圖紙等,如果需要附件,請聯(lián)系上傳者。文件的所有權(quán)益歸上傳用戶所有。
  • 3. 本站RAR壓縮包中若帶圖紙,網(wǎng)頁內(nèi)容里面會有圖紙預(yù)覽,若沒有圖紙預(yù)覽就沒有圖紙。
  • 4. 未經(jīng)權(quán)益所有人同意不得將文件中的內(nèi)容挪作商業(yè)或盈利用途。
  • 5. 人人文庫網(wǎng)僅提供信息存儲空間,僅對用戶上傳內(nèi)容的表現(xiàn)方式做保護(hù)處理,對用戶上傳分享的文檔內(nèi)容本身不做任何修改或編輯,并不能對任何下載內(nèi)容負(fù)責(zé)。
  • 6. 下載文件中如有侵權(quán)或不適當(dāng)內(nèi)容,請與我們聯(lián)系,我們立即糾正。
  • 7. 本站不保證下載資源的準(zhǔn)確性、安全性和完整性, 同時也不承擔(dān)用戶因使用這些下載資源對自己和他人造成任何形式的傷害或損失。

評論

0/150

提交評論