版權(quán)說明：本文檔由用戶提供并上傳，收益歸屬內(nèi)容提供方，若內(nèi)容存在侵權(quán)，請進(jìn)行舉報或認(rèn)領(lǐng)
文檔簡介
第3章VBScript腳本語言
3.1腳本語言概述3.2VBScript基本語法3.3VBScript常用函數(shù)3.4VBScript的對象和事件3.1腳本語言概述
HTML語言生成的文檔是一種靜態(tài)文檔，很難滿足用戶和Web頁面之間實現(xiàn)交互功能的需要。腳本語言可以實現(xiàn)制作動態(tài)頁面的要求，使程序更具有交互能力3.1.1腳本語言概述
腳本是嵌在HTML網(wǎng)頁中的一段程序。編寫簡單，可以用任何文本編輯器編寫，只要保存為純ASCII文本文件即可。較流行的腳本語言有：VBScript和JavaScript。其中，VBScript（MicrosoftVisualBasicScriptingEdition，簡稱VBScript）是程序開發(fā)語言VisualBasic家族的成員。
ASP默認(rèn)使用VBScript，作用是用來彌補(bǔ)網(wǎng)頁嵌入控件（如JavaApplet或ActiveX等）的不足，它與HTML的完美結(jié)合，使得網(wǎng)頁操作更加的靈活。3.1腳本語言概述
VBScript與JavaScript性能比較相關(guān)性能VBScriptJavaScript程序格式嵌入到HTML中嵌入到HTML中數(shù)據(jù)類型采用復(fù)合的單一變量類型，使用DIM定義后使用采用松散數(shù)據(jù)類型，變量不用定義可直接使用對象概念無法自定義對象類型，使用系統(tǒng)對象，無類和繼承的概念，可定義函數(shù)過程和子程序過程無法自定義對象類型，使用系統(tǒng)對象，無類和繼承的概念，只能定義函數(shù)執(zhí)行方式瀏覽器內(nèi)部虛擬機(jī)處理瀏覽器內(nèi)部虛擬機(jī)處理安全性安全性高，嚴(yán)禁寫入磁盤安全性高，嚴(yán)禁寫入磁盤難易度較容易（與VB語法類似）較難（與C++語法相似）3.1腳本語言概述應(yīng)用ASP技術(shù)編程時默認(rèn)是使用VBScript。也可設(shè)置腳本語言：在IIS中設(shè)定（備注）在網(wǎng)頁中指定腳本語言格式：<%@LANGUAGE=VBScript%>利用<SCRIPT>設(shè)定腳本語言例如：<SCRIPT
LANGUAGE="VBScript"RUNAT="Server">
3.1腳本語言概述3.1.2腳本語言類型
分為服務(wù)器端腳本和客戶端腳本，主要區(qū)別是:1.運(yùn)行方式不同：服務(wù)器端腳本在Web服務(wù)器上執(zhí)行，由服務(wù)器根據(jù)腳本的執(zhí)行結(jié)果生成相應(yīng)的HTML頁面并發(fā)送到客戶端瀏覽器中并顯示。只有服務(wù)器端腳本才能真正地實現(xiàn)“動態(tài)網(wǎng)頁”。服務(wù)器端腳本的執(zhí)行不受瀏覽器的限制，腳本在網(wǎng)頁通過網(wǎng)絡(luò)傳送給瀏覽器之前被執(zhí)行，Web瀏覽器收到的只是標(biāo)準(zhǔn)的HTML文件?？蛻舳四_本由瀏覽器解釋執(zhí)行。由于客戶端腳本隨著HTML頁面下載到客戶端瀏覽器，在用戶本地執(zhí)行，因此其執(zhí)行速度明顯快于服務(wù)器端腳本。3.1腳本語言概述2.語法格式不同：（1）服務(wù)器端腳本：<SCRIPT
LANGUAGE=”VBScript”RUNAT=”server”><!--腳本代碼--></SCRIPT>或<%VBScript腳本程序片段%>3.1腳本語言概述<%@LANGUAGE="VBScript"%><HTML><BODY><FONTSIZE=7>
<%"歡迎使用VBScript腳本語言！"%></FONT></BODY></HTML>3.1腳本語言概述（2）客戶器端腳本：一般形式如下：<SCRIPTLANGUAGE="language"[EVENT="event"][FOR="object"]><!--腳本代碼--></SCRIPT>屬性的意義：LANGUAGE:指定使用哪一種腳本語言，不同的瀏覽器支持的腳本語言是不一樣的。EVENT：指定與此段腳本相關(guān)聯(lián)的事件。FOR：指定與事件相關(guān)聯(lián)的對象。3.1腳本語言概述<HTML><HEAD><TITLE>客戶端腳本編寫舉例程序</TITLE>
<SCRIPT
LANGUAGE=VBScriptEVENT="OnClick"FOR="Button1">
<!--
DimfrmTmp'聲明一個變量
IfIsNumeric(frmTmp.Text1.Value)ThenIffrmTmp.Text1.Value<10orfrmTmp.Text1.Value>30ThenMsgBox"請輸入10到30之間的數(shù)字!"ElseFrmTmp.Submit'輸入正確，傳遞到服務(wù)器EndIfElseMsgBox"請輸入數(shù)字!"Endif-->
</SCRIPT></HEAD>
3.1腳本語言概述<BODY
bgColor="White">
<H2>請輸入10到30之間的數(shù)字：</H2><HR>
<FORM
NAME="Form1">
<INPUT
NAME="Text1"TYPE="TEXT">
<INPUT
NAME="Button1"TYPE="BUTTON"VALUE="提交">
</FORM>
</BODY></HTML>
3.1腳本語言概述例：3-31.htm:將特定代碼編寫成一過程或函數(shù)<HTML>
<HEAD><TITLE>客戶端腳本編寫舉例程序</TITLE>
<SCRIPT
LANGUAGE=VBScript>
<!--
SubButton1_OnClick
DimfrmTmp'聲明一個變量
IfIsNumeric(frmTmp.Text1.Value)ThenIffrmTmp.Text1.Value<10orfrmTmp.Text1.Value>30ThenMsgBox"請輸入10到30之間的數(shù)字!"ElseFrmTmp.Submit'輸入正確，傳遞到服務(wù)器EndIfElseMsgBox"請輸入數(shù)字!"EndifEndSub-->
</SCRIPT></HEAD>
3.1腳本語言概述<BODY
bgColor="White">
<H2>請輸入10到30之間的數(shù)字：</H2><HR>
<FORM
NAME="Form1">
<INPUT
NAME="Text1"TYPE="TEXT">
<INPUT
NAME="Button1"TYPE="BUTTON"VALUE="提交">
</FORM>
</BODY></HTML>
3.1腳本語言概述注意：VBScript的用戶界面元素（如MsgBox和InputBox）不能在服務(wù)器端腳本中使用。MsgBox用于顯示一個信息框，InputBox用于產(chǎn)生一個輸入框，它們只能在客戶端執(zhí)行。<%@LANGUAGE="VBScript"%><HTML><BODY><FONTSIZE=7><%"歡迎使用VBScript腳本語言！"%><%MsgBox"請輸入數(shù)字!"%></FONT></BODY></HTML>運(yùn)行后出錯：返回3.2VBScript基本語法3.2.1編程技巧
使用續(xù)行符“_”（由一個空格和一個下劃線組成），將長的語句分成多行書寫。在編寫程序時，為了方便以后對程序進(jìn)行修改和維護(hù)必須添加必要的注釋，這樣能夠很容易地讀懂程序。注釋的一般格式為：格式一：Rem注釋內(nèi)容格式二：′注釋內(nèi)容或語句′注釋內(nèi)容3.2VBScript基本語法<HTML><HEAD><TITLE>將單行語句分成多行程序舉例</TITLE><SCRIPTLANGUAGE="VBScript">SubShowMessage′定義子過程ShowMessagestrExmp="歡迎您光臨本網(wǎng)站，"&_"您可以瀏覽最新圖書信息，"&_"如果您有什么意見和建議，請來信！"MsgBoxstrExmpEndSubCallShowMessage′調(diào)用子過程ShowMessage</SCRIPT></HEAD><BODY>……</BODY></HTML>3.2VBScript基本語法默認(rèn)為十進(jìn)制數(shù):10、250十六進(jìn)制：加前綴&H(如&H9)八進(jìn)制：加前綴&0（數(shù)字0）或&O(字母O)（如&011或&O11）3.2VBScript基本語法3.2.2數(shù)據(jù)類型在VBScript中，只有一種數(shù)據(jù)類型，即Variant類型，所以它也是VBScript中所有函數(shù)的返回值的數(shù)據(jù)類型。但變量可以根據(jù)所賦值的不同而代表不同類型的數(shù)據(jù)。最簡單的Variant可以包含數(shù)字或字符串信息。Variant用于數(shù)字上下文中時作為數(shù)字處理，用于字符串上下文中時作為字符串處理。這就是說，如果使用看起來象是數(shù)字的數(shù)據(jù)，則VBScript會假定其為數(shù)字并以適用于數(shù)字的方式處理。與此類似，如果使用的數(shù)據(jù)只可能是字符串，則VBScript將按字符串處理。當(dāng)然，也可以將數(shù)字包含在引號("")中使其成為字符串。3.2VBScript基本語法Variant子類型除簡單數(shù)字或字符串以外，Variant可以進(jìn)一步區(qū)分?jǐn)?shù)值信息的特定含義。例如使用數(shù)值信息表示日期或時間。此類數(shù)據(jù)在與其他日期或時間數(shù)據(jù)一起使用時，結(jié)果也總是表示為日期或時間。當(dāng)然，從Boolean值到浮點(diǎn)數(shù)，數(shù)值信息是多種多樣的。Variant包含的數(shù)值信息類型稱為子類型。大多數(shù)情況下，可將所需的數(shù)據(jù)放進(jìn)Variant中，而Variant也會按照最適用于其包含的數(shù)據(jù)的方式進(jìn)行操作。Variant子類型Empty：未初始化的Variant。對于數(shù)值變量，值為0；對于字符串變量，值為零長度字符串(“”)。Null：不包含任何有效數(shù)據(jù)的Variant。Boolean：包含True
或False。Byte
：包含0到255之間的整數(shù)。
Integer
：包含-32,768到32,767之間的整數(shù)。Currency：-922,337,203,685,477.5808到。Variant子類型Long：包含-2,147,483,648到2,147,483,647之間的整數(shù)。Single：包含單精度浮點(diǎn)數(shù)，負(fù)數(shù)范圍從-3.402823E38到，正數(shù)范圍從1.401298E-45到。Double：包含雙精度浮點(diǎn)數(shù)，負(fù)數(shù)范圍從-1.79769313486232E308到，正數(shù)范圍從4.94065645841247E-324到。Variant子類型Date(Time)：包含表示日期的數(shù)字，日期范圍從公元100年1月1日到公元9999年12月31日。String：包含變長字符串，最大長度可為20億個字符。Object：包含對象。Error：包含錯誤號。可以使用轉(zhuǎn)換函數(shù)來轉(zhuǎn)換數(shù)據(jù)的子類型。另外，可使用VarType
函數(shù)返回數(shù)據(jù)的Variant子類型。Variant子類型注意：任何Variant類型變量經(jīng)聲明后如果未指定值，則其值未定義（Empty），這個未定義與空值（Null）是不同的，Null代表無效數(shù)據(jù)，Empty的變量在使用時是值為0或為空的字符串，Null的變量必須為其賦初值才可用。3.2VBScript基本語法3.2.3常量
1．文字常量
（1）字符串常量：用雙引號作為定界符，由ASCII碼字符組成（除雙引號和回車符外），長度不能超過20億個字符。例如："中華人民共和國"、"1233.45"等。（2）數(shù)值常量：包括整型數(shù)、長整型數(shù)和浮點(diǎn)數(shù)。例如：0、300、-4125、&H85（表示十六進(jìn)制數(shù)85）、&O226（表示八進(jìn)制數(shù)226）、1.23E8、3.54E-5等。（3）日期時間型常量：用#號括起來。例如：#2001-3-15#、#2003-4-208:38:25AM#等。3.2VBScript基本語法2．符號常量通過關(guān)鍵字Const定義例如：Const
PI
Const
Add=“理工”常量名稱常量含義True表示布爾真值False表示布爾假值Null表示空值Empty表示沒有初始化之前的值vbCr表示回車vbCrLf表示回車/換行vbTab表示制表符3.2VBScript基本語法3.2.4變量1．變量命名約定（1）變量的名字只能由字母、數(shù)字和下劃線組成；（2）名字只能以字母開頭；（3）名字的最大長度不能超過255個字符；（4）不能和VBScript中的關(guān)鍵字（保留字）相同，但是可以作為變量名的一部分；（5）變量名在被聲明的同一個作用范圍內(nèi)必須是唯一的。注意：VBScript中變量不區(qū)分字母大小寫3.2VBScript基本語法為了區(qū)分不同類型的變量，可以通過變量名的前綴來指明該變量的子類型。子類型前綴示例子類型前綴示例IntegerIntIntYearLongLngLngNumberCurrencyCurCurMoneySingleSngSngSalaryDoubleDblDblPopulationByteBytBytCharacterBooleanBlnBlnRetiredStringStrStrNameDate(Time)DtmDtmSystemObjectObjObjTemp3.2VBScript基本語法2．聲明變量（1）隱式聲明方式。使用一個變量前并不需要聲明，而可以直接在腳本代碼中使用，系統(tǒng)會自動地在內(nèi)存中開辟存儲區(qū)域登記變量名。<%@LANGUAGE=VBScript%><%dtmToday=Now()%>當(dāng)前的日期和時間是：<%=dtmToday%>3.2VBScript基本語法（2）顯式聲明方式。使用變量聲明語句Dim、Public和Private語句。顯式聲明可以在定義變量的時候為變量在內(nèi)存中預(yù)留空間，登記變量名。使用OptionExplicit語句來強(qiáng)制顯示聲明
<%@LANGUAGE=VBScript%><%OptionExplicit
DimstudentAge
Dim
studentA%>3.2VBScript基本語法Public和Private語句聲明變量的格式和Dim語句一樣。例如：
Public
va11，var2
Private
Age，NamePublic語句用來聲明全局變量，這些變量可以在網(wǎng)頁頁面中所有腳本使用。Private語句用來聲明私有變量，這些變量只能在聲明它們的腳本使用，即在聲明它們的<Script></Script>標(biāo)記中間使用。Public和Private語句聲明變量時都必須在過程之前的腳本級使用，控制變量的作用范圍。3.2VBScript基本語法3．變量的作用域
變量的作用域指的是變量的有效范圍，因為變量被聲明后不是在任何地方都可以被使用，每個變量都有它的使用范圍，在作用域內(nèi)可以使用變量，在作用域外則變量不可見。在VBScript中分為過程內(nèi)有效和整個程序中都有效。在過程內(nèi)部聲明的變量稱為過程級變量或局部變量，這樣的變量只有在聲明它們的過程中才能使用，即無法在過程外部訪問；過程外部聲明的變量稱為腳本級變量或全局變量，即在同一個.asp文件中的任何腳本命令均可訪問和修改該變量的值。3.2VBScript基本語法<%OptionExplicit
Dim
intX'聲明腳本級變量
intX=1'給腳本級變量賦值callSetLocalVariab1e'調(diào)用過程修改過程級變量的值Response.WriteintX'將腳本級變量的值發(fā)送到瀏覽器，值仍為1
SubSetLocalVariab1e
DimintX'聲明過程級變量IntX=2'給過程級變量賦值
EndSub%>3.2VBScript基本語法<%OptionExplicit
Dim
intX
'聲明腳本級變量
IntX=1'給腳本級變量賦值SetLocalVariable'調(diào)用過程修改變量的值Response.WriteintX'將腳本級變量的值發(fā)送到瀏覽器，值為2
SubSetLocalVariable
IntX=2'給腳本級變量賦值
EndSub%>3.2VBScript基本語法3.2.5數(shù)組
VBScript中的數(shù)組有以下幾個特點(diǎn)：使用數(shù)組之前要先進(jìn)行定義，然后才能使用。通常用Dim語句來定義數(shù)組。數(shù)組下標(biāo)的下界一律從0開始。聲明數(shù)組時可以給出數(shù)組的上界。一個數(shù)組中可以含有不同數(shù)據(jù)類型的數(shù)組元素。3.2VBScript基本語法1．靜態(tài)數(shù)組
靜態(tài)數(shù)組可分為一維數(shù)組、二維數(shù)組或多維數(shù)組。數(shù)組的維數(shù)和大小由數(shù)組名之后緊跟的括號中的數(shù)字的個數(shù)和數(shù)值的大小來決定。靜態(tài)數(shù)組的大小在運(yùn)行時不可改變。它是在編譯時開辟內(nèi)存區(qū)的。例如：Dim
ArrStu（3）Dim
arrTwoDim(2,3)賦值方法：是給數(shù)組的各個元素分別賦值A(chǔ)rrStu（0）=”20080101”ArrStu（1）=”wanghai”ArrStu（2）=19ArrStu（3）=#3-15-90#
3.2VBScript基本語法2．動態(tài)數(shù)組動態(tài)數(shù)組是運(yùn)行時大小可變的數(shù)組。當(dāng)程序沒有運(yùn)行時，動態(tài)數(shù)組不占內(nèi)存，在程序運(yùn)行時才開辟內(nèi)存區(qū)。定義一般分兩步：首先用Dim語句聲明一個括號內(nèi)不包含下標(biāo)的數(shù)組，然后在使用數(shù)組之前用ReDim語句根據(jù)實際需要重新定義下標(biāo)值。也可以用ReDim語句直接定義動態(tài)數(shù)組。RemDim語句格式為：RemDim[Preserve]變量（下標(biāo)）Preserve：保持?jǐn)?shù)組原有數(shù)據(jù)不變3.2VBScript基本語法例如：定義Dimarr1（）使用時可不斷地改變數(shù)組元素個數(shù)RemDimarr1（10）RemDimarr1（20）每次執(zhí)行RemDim語句時數(shù)組中的數(shù)據(jù)會丟失，如希望改變元素個數(shù)時保持?jǐn)?shù)據(jù)。RemDimPreservearr1（Ubound（arr1）+1）注意：RemDim只能改變數(shù)組元素個數(shù)，但不能改變數(shù)組維數(shù)。Ubound（）函數(shù)返回數(shù)組上界3.2VBScript基本語法3.2.6VBScript的表達(dá)式與運(yùn)算符表達(dá)式的類型：數(shù)學(xué)表達(dá)式、條件表達(dá)式和字符串表達(dá)式。數(shù)學(xué)表達(dá)式用于常規(guī)的數(shù)值運(yùn)算，運(yùn)算結(jié)果仍然為數(shù)值；條件表達(dá)式常用于根據(jù)一系列事件的最后結(jié)果做出判斷，并采取相應(yīng)的動作，運(yùn)算結(jié)果為布爾值True或者False；字符串表達(dá)式用來將多個字符串連接成一個較長的字符串，運(yùn)算結(jié)果仍為字符串。VBScript中的每一種表達(dá)式都要使用一些特殊的運(yùn)算符來幫助完成功能，運(yùn)算符一般分為兩種：單目運(yùn)算符和雙目運(yùn)算符。3.2VBScript基本語法1、VBScript的數(shù)學(xué)表達(dá)式及其運(yùn)算符運(yùn)算符名稱表達(dá)式例子運(yùn)算符名稱表達(dá)式例子^乘方a^b-取負(fù)-c*乘法a*b/浮點(diǎn)除法a/b\整數(shù)除法a\bMod求余的模運(yùn)算aModb+加法a+b-減法a-b3.2VBScript基本語法2、VBScript的條件表達(dá)式及其運(yùn)算符運(yùn)算符描述True如果False如果Null如果<小于表達(dá)式1<表達(dá)式2表達(dá)式1>=表達(dá)式2表達(dá)式1or表達(dá)式2=Null<=小于或等于表達(dá)式1<=表達(dá)式2表達(dá)式1>表達(dá)式2表達(dá)式1or表達(dá)式2=Null>大于表達(dá)式1>表達(dá)式2表達(dá)式1<=表達(dá)式2表達(dá)式1or表達(dá)式2=Null>=大于或等于表達(dá)式1>=表達(dá)式1表達(dá)式1<表達(dá)式2表達(dá)式1or表達(dá)式2=Null=等于表達(dá)式1=表達(dá)式2表達(dá)式1<>表達(dá)式2表達(dá)式1or表達(dá)式2=Null<>不等于表達(dá)式<>表達(dá)式2表達(dá)式1=表達(dá)式2表達(dá)式1or表達(dá)式2=NullIs用于對象
表達(dá)式1or表達(dá)式2=Nullresult=object1
Is
object2說明：比較運(yùn)算符IS是指：如果object1與object2引用的是同一個對象，則result為true；否則為false。3.2VBScript基本語法邏輯運(yùn)算符值為：True,兩個表達(dá)式的值同為真或假，整個表達(dá)式為假，否則為真。10>8Xor8<6邏輯異或Xor值為：False,由真變假或由假變真，進(jìn)行取“反”操作。Not(1>0)非Not值為：True,兩個表達(dá)式中只要一個值為真，結(jié)果就為真，只有兩個表達(dá)式的值均為假，結(jié)果才為假。(4>5)or(3<4)
或Or值為：False，兩個表達(dá)式的值均為真，結(jié)果才為真。(4>5)And(3<4)
與And說明例子名稱運(yùn)算符3.2VBScript基本語法邏輯運(yùn)算符續(xù)值為：False,當(dāng)?shù)谝槐磉_(dá)式為真，第二個表達(dá)式的值為假，結(jié)果就為假，否則結(jié)果為真。(3<4)Imp(4>5)蘊(yùn)涵Imp值為：True，兩個表達(dá)式的值同為真或假，整個表達(dá)式為真，否則為假。(4<5)Eqv(3<4)
等價Eqv說明例子名稱運(yùn)算符3.2VBScript基本語法3、VBScript的字符串表達(dá)式字符串表達(dá)式：在進(jìn)行字符串處理時，經(jīng)常要把兩個或者更多個字符串進(jìn)行連接，形成一句完整的語句。VBScript提供了字符串表達(dá)式。連接運(yùn)算符：連接運(yùn)算符是將兩個字符串表達(dá)式連接起來，生成一個新的字符串。連接運(yùn)算符有兩個：“+”和“＆”。＆：參與連接的兩個表達(dá)式可以不全是字符串。
3.2VBScript基本語法+：如果連接的兩個操作數(shù)中一個是非數(shù)字字符串，另一個是數(shù)字，則會出錯。如以下代碼就會產(chǎn)生錯誤：
intNum=22
strTemp=“學(xué)號是”+
intNum
如果連接的兩個操作數(shù)中一個是數(shù)字字符串，另一個是數(shù)字，則結(jié)果為兩個數(shù)字相加3.2VBScript基本語法運(yùn)算符的優(yōu)先順序Xor12Or11And10Not邏輯運(yùn)算符9=、<>、<、>、<=、>=、Is比較運(yùn)算符8&（字符串連接）連接運(yùn)算符7+、-(加法和減法）6Mod（求余運(yùn)算）5\（整數(shù)除法）4*、/（乘法和除法）3-（負(fù)數(shù)運(yùn)算）2^（指數(shù)運(yùn)算）算術(shù)運(yùn)算符1運(yùn)算符運(yùn)算符類型優(yōu)先順序13、Eqv
14、Imp3.2VBScript基本語法3.2.7控制結(jié)構(gòu)
VBScript提供了兩種類型的控制語句：流程控制語句和循環(huán)控制語句。流程控制語句通常情況下用來控制程序流程的條件轉(zhuǎn)向和選擇問題等，包括選擇語句（If…Then…Else）多分支選擇語句（Select…Case）循環(huán)控制語句用來編寫程序中所需要的特定條件下執(zhí)行過程相似的循環(huán)流程，包括For循環(huán)控制語句（For…Next）Do循環(huán)控制語句（Do…Loop）While循環(huán)控制語句（While…Wend）3.2VBScript基本語法一、條件控制語句1、條件（選擇）結(jié)構(gòu)（1）簡單條件控制語句。其語法如下：
If條件表達(dá)式Then語句體1[Else語句體2]例<HTML><HEAD><TITLE>選擇結(jié)構(gòu)程序舉例1</TITLE><SCRIPTLANGUAGE="VBScript">SubShowMessage
dim
x,y,z
x=2
if
x>0
then
y=x
z=-x
else
y=-x
z=x
endif
'以對話框的形式輸出x，y和z的值
MsgBox"x的值為"&x&",y的值為"&y&",z的值為"&zEndSubcallShowMessage'調(diào)用ShowMessage過程</SCRIPT></HEAD><BODY>……</BODY></HTML>3.2VBScript基本語法（2）嵌套條件控制語句。語法格式如下：
If條件表達(dá)式1Then
[語句體1][ElseIf條件表達(dá)式2Then
[語句體2]]…[Else
[語句體n]]
EndIf
SubShowMessage
dim
x,y
x=InputBox("請輸入x的值：")
if
not
isnumeric(x)then
MsgBox"輸入錯誤，請輸入數(shù)字！"
elseif
x>0
then
y=x
elseif
x<0
then
y=-x
else
y=0
endif
ifisnumeric(x)then
MsgBox"x的值為"&
x
&",y的值為"&
yendifEndSubcallShowMessage'調(diào)用ShowMessage過程3.2VBScript基本語法2．多分支結(jié)構(gòu)可以用多分支結(jié)構(gòu)來替代塊結(jié)構(gòu)的條件語句，多分支結(jié)構(gòu)比塊結(jié)構(gòu)的條件語句容易閱讀。多分支結(jié)構(gòu)的語法如下：SelectCase
測試表達(dá)式[Case
表達(dá)式1[語句體1]][Case
表達(dá)式2[語句體2]]…[CaseElse[語句體n]]EndSelect<HTML>
<HEAD><TITLE>多分支結(jié)構(gòu)程序舉例</TITLE>
<SCRIPT
LANGUAGE="VBScript">
SubShowMessagedim
x
x=InputBox("請輸入x的值(1-7)：")if
notisnumeric(x)then
x=""selectcase
x
case""MsgBox"輸入錯誤，請輸入數(shù)字！"case1
MsgBox"星期一"case2
MsgBox"星期二"case
3
MsgBox"星期三"case
4
MsgBox"星期四"case
5
MsgBox"星期五"case
6
MsgBox"星期六"case
7
MsgBox"星期日"caseelse
MsgBox"請輸入1-7中的數(shù)字！"endselect
EndSub
callShowMessage'調(diào)用ShowMessage過程</SCRIPT>
</HEAD><BODY>……</BODY></HTML>
3.2VBScript基本語法二、循環(huán)控制語句1．For循環(huán)演示（1）For…Next語句：指定循環(huán)次數(shù)，使用計數(shù)器重復(fù)運(yùn)行語句。格式For
循環(huán)變量=初值To終值[Step步長]循環(huán)體[ExitFor]
Next[循環(huán)變量]如：'計算1加到10的總和
Total=0
For
Conter=1To10
Total=Total+Counter
Next演示<HTML>
<HEAD><TITLE>For循環(huán)結(jié)構(gòu)程序舉例</TITLE>
<SCRIPT
LANGUAGE=VBScript>
<!--
SubShowMessage
dimi,intSum,flag,result
intSum=0
result=""
Fori=3To100Step2
flag=1
Forj=2Toi-1Step1
Ifimodj=0Then
flag=0
ExitFor
EndIf
NextIfflag=1then
result=result&i&";"EndIfNext
MsgBox"3到100之間的素數(shù)為："&result
EndSub
callShowMessage'調(diào)用ShowMessage過程
-->
</SCRIPT></HEAD><BODY>......</BODY></HTML>
3.2VBScript基本語法（2）ForEach…Next語句：對于集合中的每項或數(shù)組中的每個元素，重復(fù)執(zhí)行一組語句，格式ForEach
元素
In集合語句體
Next[元素]演示如：
Dim
Score(3)'定義一個有4個變量的數(shù)組Score(0)=90Score(1)=86Score(2)=99Score(3)=54'用循環(huán)輸出每一位學(xué)生的成績
ForEachIIn
Score‘此時數(shù)組只需寫出名稱Msg=Msg&I&Chr(13)&Chr(10)
NextMsgBoxMsg<%@LANGUAGE="VBScript"%><HTML><BODY><FONTSIZE=7>
ForEach
item
InResponse.WriteRequest.Form(item)Response.Write"<br>"
Next%></FONT></BODY></HTML>3.2VBScript基本語法2．Do循環(huán)演示
第一種：先判斷
Do[While|Until循環(huán)條件]循環(huán)體[ExitDo]
Loop
第二種：后判斷，循環(huán)體至少執(zhí)行一次
Do循環(huán)體[ExitDo]Loop[While|Until循環(huán)條件]演示<HTML>
<HEAD><TITLE>Do循環(huán)結(jié)構(gòu)程序舉例</TITLE>
<SCRIPT
LANGUAGE=VBScript>
<!--
SubShowMessage
dimi,intSum,flag,result
intSum=0
result=""
i=3
演示
DoWhilei<=100
flag=1
j=2
DoUntilj>i-1
Ifimodj=0Then
flag=0
ExitDo
EndIf
j=j+1
LoopIfflag=1then
result=result&I&";"EndIf
i=i+1
Loop
演示MsgBox"3到100之間的素數(shù)為："&result
EndSub
callShowMessage'調(diào)用ShowMessage過程
-->
</SCRIPT></HEAD>
<BODY>
......</BODY></HTML>
3.2VBScript基本語法3．While循環(huán)演示格式：While
循環(huán)條件
循環(huán)體WendWhile循環(huán)是先判斷循環(huán)條件，根據(jù)循環(huán)條件的值來決定是否執(zhí)行循環(huán)體。如果循環(huán)條件為真或不為0時執(zhí)行循環(huán)體，直到循環(huán)條件不滿足時退出While循環(huán)。例:While
i<=100
intSum=intSum+ii=i+1
Wend
3.2VBScript基本語法三、其他常用簡單語句1．Rem語句
Rem注釋語句2．Erase語句用來將非動態(tài)數(shù)組的所有元素的值重新設(shè)置為空類型
Erase數(shù)組名3．Set語句和Let語句
Set用來把對象的引用賦給變量
Set
objectVar=數(shù)值Let用來把表達(dá)式的值賦給變量Leta=a+14．Rnd函數(shù)用于產(chǎn)生隨機(jī)數(shù)，數(shù)值在0和1之間。變量＝Rnd*倍數(shù)
intVar=int（Rnd*100）DimintArray(5)Fori=0to5intArray(i)=i+1NextEraseintArray3.2VBScript基本語法3.2.8過程VBScript的過程有如下幾個特點(diǎn)：過程只能有單一入口，但可以有多個出口。在瀏覽器的任何一個網(wǎng)頁中都可以定義過程，習(xí)慣上將過程定義在<HEAD>和</HEAD>中?？梢杂脼g覽器所特有的事件來調(diào)用。通過過程可以將重復(fù)使用的代碼單獨(dú)定義，提高代碼利用率。使得查錯和改錯工作變得簡單?？梢韵蜻^程中傳遞任何有效的參數(shù)。3.2VBScript基本語法1.Sub過程
Sub過程是沒有返回值的過程，它可以被任何腳本程序的過程調(diào)用，一般語法格式如下：
[Private][Public]Sub
過程名[(參數(shù)列表)][語句塊][ExitSub][語句塊]
EndSub
注意:Sub過程不能嵌套定義,即不能在一個Sub過程內(nèi)部定義另一個Sub過程.但Sub過程可以嵌套調(diào)用,即在一個Sub過程內(nèi)部可以調(diào)用另一個Sub過程.Private:表示私有過程,只能被進(jìn)行過的腳本的其他過程調(diào)用;Public:表示公有過程,可以被腳本中的其他任何過程調(diào)用;省略此關(guān)鍵字,則默認(rèn)為Public3.2VBScript基本語法Sub過程的調(diào)用方法有：（1）使用Call語句進(jìn)行調(diào)用。格式如下：
Call
子過程名[（實際參數(shù)）]演示注意：實際參數(shù)的個數(shù)要和形式參數(shù)的個數(shù)完全相同，它是傳遞給子過程的變量或常數(shù)。例如：
CallCountNum(120,84)
（2）直接將子過程名作為一個語句來調(diào)用：
子過程名[實際參數(shù)]演示括號必須有必須沒有括號演示dimx,yx=CDbl(InputBox("請輸入x的值"))y=CDbl(InputBox("請輸入y的值"))callOutputAdd(x,y)'調(diào)用OutputAdd過程，并傳遞x和y的值SubOutputAdd(a,b)
dimzz=a+bMsgBox"兩數(shù)之和是："&zEndSub
演示dimx,yx=InputBox("請輸入x的值")y=InputBox("請輸入y的值")OutputAddx,y'調(diào)用OutputAdd過程，并傳遞x和y的值SubOutputAdd(a,b)dimzifnotisnumeric(a)thenMsgBox"x的值輸入錯誤！"ExitSubendififnotisnumeric(b)thenMsgBox"y的值輸入錯誤！"ExitSubendifa=cdbl(a)b=cdbl(b)z=a+bMsgBox"兩數(shù)之和是："&zEndSub3.2VBScript基本語法2.函數(shù)演示函數(shù)的定義語法格式如下：[Private][Public]Function
函數(shù)名[(參數(shù)列表)][語句塊]
函數(shù)名=表達(dá)式[ExitFunction][語句塊]
EndFunction
注意:函數(shù)名=表達(dá)式:至少要有一個這樣的式子,設(shè)置函數(shù)的返回值3.2VBScript基本語法Function過程的調(diào)用方法有：Call
函數(shù)名[（實際參數(shù)）]如：
Call
Add（x，y）函數(shù)名[（實際參數(shù)）]如：
Addx，y變量=函數(shù)名（實參列表）如：
Sum=Add（x，y)返回演示dimx,y,FuncResultx=cdbl(InputBox("請輸入x的值"))y=cdbl(InputBox("請輸入y的值"))FuncResult=OutputAdd(x,y)'調(diào)用OutputAdd函數(shù)，并傳遞x和y的值MsgBox"兩數(shù)之和是："&FuncResultFunctionOutputAdd(a,b)dimzz=a+bOutputAdd=zEndFunction3.3VBScript的常用函數(shù)
3.3.1MsgBox函數(shù)在VBScript中，基本輸出操作是通過向用戶顯示一個信息框來完成的。實現(xiàn)這個功能的方法是使用MsgBox函數(shù)。在前面的程序中已經(jīng)多次使用過這個函數(shù)。函數(shù)的一般格式如下所示：
MsgBox(prompt[,buttons][,title][,helpfile,context])3.3VBScript的常用函數(shù)Prompt：作為消息顯示在對話框中的字符串表達(dá)式。prompt的最大長度大約是1024個字符，這取決于所使用的字符的寬度。如果prompt中包含多個行，則可在各行之間用回車符(Chr(13))、換行符(Chr(10))或回車換行符的組合(Chr(13)&Chr(10))分隔各行。3.3VBScript的常用函數(shù)Buttons數(shù)值表達(dá)式，是表示指定顯示按鈕的數(shù)目和類型、使用的圖標(biāo)樣式，默認(rèn)按鈕的標(biāo)識以及消息框樣式的數(shù)值的總和。有關(guān)數(shù)值，請參閱“設(shè)置”部分。如果省略，則buttons的默認(rèn)值為0。第一組值(0-5)
用于描述對話框中顯示的按鈕類型與數(shù)目；第二組值(16,32,48,64)
用于描述圖標(biāo)的樣式；第三組值(0,256,512)
用于確定默認(rèn)按鈕；在將這些數(shù)字相加以生成buttons參數(shù)值時，只能從每組值中取用一個數(shù)字。3.3VBScript的常用函數(shù)常數(shù)值描述vbOKOnly0只顯示OK按鈕VbOKCancel1顯示
OK及Cancel按鈕VbAbortRetryIgnore2顯示Abort、Retry及Ignore按鈕VbYesNoCancel3顯示Yes、No及Cancel按鈕VbYesNo4顯示Yes及No按鈕VbRetryCancel5顯示Retry及Cancel按鈕VbCritical16顯示CriticalMessage圖標(biāo)VbQuestion32顯示W(wǎng)arningQuery圖標(biāo)VbExclamation48顯示W(wǎng)arningMessage圖標(biāo)VbInformation64顯示InformationMessage圖標(biāo)Buttons參數(shù)常用的設(shè)置值：3.3VBScript的常用函數(shù)Buttons參數(shù)常用的設(shè)置值vbDefaultButton10第一個按鈕是缺省值vbDefaultButton2256第二個按鈕是缺省值vbDefaultButton3512第三個按鈕是缺省值vbDefaultButton4768第四個按鈕是缺省值常數(shù)值描述3.3VBScript的常用函數(shù)不同的命令按鈕對應(yīng)的函數(shù)的返回值：
常數(shù)值描述vbOK1OKvbCancel2CancelvbAbort3AbortvbRetry4RetryvbIgnore5IgnorevbYes6YesvbNo7No3.3VBScript的常用函數(shù)Title顯示在對話框標(biāo)題欄中的字符串表達(dá)式。如果省略title，則將應(yīng)用程序的名稱顯示在標(biāo)題欄中。Helpfile字符串表達(dá)式，用于標(biāo)識為對話框提供上下文相關(guān)幫助的幫助文件。如果已提供helpfile，則必須提供context。在16位系統(tǒng)平臺上不可用。Context數(shù)值表達(dá)式，用于標(biāo)識由幫助文件的作者指定給某個幫助主題的上下文編號。如果已提供context，則必須提供helpfile。在16位系統(tǒng)平臺上不可用。3.3VBScript的常用函數(shù)說明如果同時提供了helpfile和context，則用戶可以按F1鍵以查看與上下文相對應(yīng)的幫助主題。如果對話框顯示取消按鈕，則按ESC鍵與單擊取消的效果相同。如果對話框包含幫助按鈕，則有為對話框提供的上下文相關(guān)幫助。但是在單擊其他按鈕之前，不會返回任何值。當(dāng)MicroSoftInternetExplorer使用MsgBox函數(shù)時，任何對話框的標(biāo)題總是包含"VBScript",以便于將其與標(biāo)準(zhǔn)對話框區(qū)別開來。下面的例子演示了MsgBox函數(shù)的用法：DimMyVarMyVar=MsgBox
("HelloWorld!",65,"MsgBoxExample")
'MyVarcontainseither1or2,dependingonwhichbuttonisclicked.演示<HTML><HEAD><TITLE>MsgBox使用方法</TITLE>
<SCRIPT
LANGUAGE="VBScript">
<!--
DimintResult
intResult=MsgBox("VBScript是很有用的，“&chr(13)&chr(10)&"你很想學(xué)好VBScript嗎？",4+32,"請你選擇：")
ifintResult=6then
MsgBox("你是個好學(xué)生，我們會盡全力的！“&chr(13)&chr(10)&"一起努力吧！")
else
MsgBox("你好殘忍，你就這樣放棄了我！")
endif
-->
</Script></HEAD>
<BODY>
</BODY>
</HTML>
3-8Lxmsgbox.htm練習(xí)<HTML><HEAD><TITLE>MsgBox函數(shù)</TITLE><SCRIPTLANGUAGE="VBScript"><!--Dimynyn=MsgBox("歡迎走進(jìn)飄飄聊天室！"&chr(13)&_"你是第一次來到本站嗎？",4+64,"飄飄聊天室!")Ifyn="6"Then'回答是MsgBox("歡迎你，新朋友！有空多來坐坐！")ElseMsgBox("原來是老朋友呀，熱烈歡迎！")EndIf--></SCRIPT></HEAD>3.3VBScript的常用函數(shù)
3.3.2InputBox函數(shù)如果需要用戶在鍵盤上輸入數(shù)據(jù)，可使用InputBox函數(shù)。函數(shù)執(zhí)行時會顯示一個對話框，等待用戶輸入正文或按下按鈕，函數(shù)會將用戶的輸入信息作為字符串返回。函數(shù)的一般格式如下所示：InputBox(prompt[,title][,default][,xpos][,ypos][,helpfile,context])3.3VBScript的常用函數(shù)prompt:同MsgBoxTitle:同MsgBoxHelpfile:同MsgBoxContext:同MsgBoxDefault:顯示在文本框中的字符串表達(dá)式，在沒有其它輸入時作為默認(rèn)的響應(yīng)值。如果省略default，則文本框為空。3.3VBScript的常用函數(shù)Xpos:數(shù)值表達(dá)式，用于指定對話框的左邊緣與屏幕左邊緣的水平距離（單位為緹）。如果省略xpos，則對話框會在水平方向居中。Ypos:數(shù)值表達(dá)式，用于指定對話框的上邊緣與屏幕上邊緣的垂直距離（單位為緹）。如果省略ypos，則對話框顯示在屏幕垂直方向距下邊緣大約三分之一處。3.3VBScript的常用函數(shù)說明如果同時提供了helpfile和context，就會在對話框中自動添加“幫助”按鈕。如果用戶單擊確定或按下ENTER，則InputBox函數(shù)返回文本框中的內(nèi)容。如果用戶單擊取消，則函數(shù)返回一個零長度字符串("")。下面例子利用InputBox函數(shù)顯示一輸入框并且把字符串賦值給輸入變量：DimInputInput=InputBox("輸入名字")
MsgBox("輸入："&Input)<HTML><HEAD><TITLE>InputBox函數(shù)的使用</TITLE>
</HEAD><BODY>
<SCRIPT
LANGUAGE="VBScript">
<!--
DimstrUserName,strUserAddress
strUserName=InputBox("請輸入您的名字：","用戶信息記錄")
strUserAddress=InputBox("請輸入您的住址：","用戶信息記錄")
MsgBox("您的基本信息為："&chr(13)&chr(10)&"姓名："&strUserName&chr(13)&chr(10)&"住址："&chr(13)&chr(10)&strUserAddress)
-->
</SCRIPT>
</BODY></HTML>
3-9Lxinputbox.htm練習(xí)<HTML><HEAD><TITLE>INPUTBOX&MSGBOX練習(xí)</TITLE><SCRIPTLANGUAGE="VBSCRIPT">'INPUTBOX&MSGBOX應(yīng)用示例NAME=INPUTBOX("請輸入大名：","請輸入你的名字")SCORE=INPUTBOX("請輸入成績：","請輸入成績","88")IFSCORE>=60THENMSG="及格!"ELSEMSG="不及格!"ENDIFMSGBOXNAME&",您的電腦成績是"&SCORE&"分,"&MSG</SCRIPT></HEAD></HTML>3.3VBScript的常用函數(shù)
3.3.3數(shù)學(xué)函數(shù)求平方根函數(shù)（Sqr）求絕對值函數(shù)（Abs）指數(shù)函數(shù)（Exp）對數(shù)函數(shù)（Log）符號函數(shù)（Sgn）三角函數(shù)3.3VBScript的常用函數(shù)Sqr函數(shù)：返回數(shù)值的平方根。Sqr(number)number參數(shù)可以是任意有效的大于或等于零的數(shù)值表達(dá)式。說明下面的示例利用Sqr函數(shù)計算數(shù)值的平方根：DimMySqrMySqr=Sqr(4)'返回2。MySqr=Sqr(23)'返回4.79583152331272。MySqr=Sqr(0)'返回0。MySqr=Sqr(-4)'產(chǎn)生實時錯誤。3.3VBScript的常用函數(shù)Abs函數(shù)：返回數(shù)字的絕對值。Abs(number)number參數(shù)可以是任意有效的數(shù)值表達(dá)式。如果number包含Null，則返回Null；如果是未初始化變量，則返回0。說明數(shù)字的絕對值是其無符號的數(shù)值大小。下面示例利用Abs函數(shù)計算數(shù)字的絕對值：
DimMyNumberMyNumber=Abs(50.3)
’返回50.3。MyNumber=Abs(-50.3)
'返回50.3。3.3VBScript的常用函數(shù)Exp函數(shù)：返回e（自然對數(shù)的底）的冪次方。Exp(number)number參數(shù)可以是任意有效的數(shù)值表達(dá)式。說明如果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))/23.3VBScript的常用函數(shù)Log函數(shù)：返回數(shù)值的自然對數(shù)。Log(number)number參數(shù)是任意大于0的有效數(shù)值表達(dá)式。說明自然對數(shù)是以e為底的對數(shù)。常數(shù)e的值約為2.718282。用n的自然對數(shù)除x的自然對數(shù)，可以得到以n為底的x的對數(shù)。如下所示：Logn(x)=Log(x)/Log(n)以下示例為一個自定義的過程，該過程計算以10為底的對數(shù)：FunctionLog10(X)‘函數(shù)
Log10=Log(X)/Log(10)EndFunction3.3VBScript的常用函數(shù)Sgn函數(shù)：返回表示數(shù)字符號的整數(shù)。Sgn(number)
number參數(shù)可以是任意有效的數(shù)值表達(dá)式。Sgn函數(shù)有如下返回值：如果number為Sgn返回大于零1等于零0小于零-1說明number參數(shù)的符號決定Sgn函數(shù)的返回值。下面的示例利用Sgn函數(shù)決定數(shù)值的符號：
DimMyVar1,MyVar2,MyVar3,MySignMyVar1=12:MyVar2=-2.4:MyVar3=0MySign=Sgn(MyVar1)'返回1。MySign=Sgn(MyVar2)'返回-1。MySign=Sgn(MyVar3)'返回0。3.3VBScript的常用函數(shù)Sin函數(shù)返回某個角的正弦值。Sin(number)number參數(shù)可以是任何將某個角表示為弧度的有效數(shù)值表達(dá)式。說明Sin函數(shù)取某個角并返回直角三角形兩邊的比值。此比值是直角三角形中該角的對邊長度與斜邊長度之比。結(jié)果的范圍在-1到1之間。將角度乘以pi/180即可轉(zhuǎn)換為弧度，將弧度乘以180/pi即可轉(zhuǎn)換為角度。下面例子利用Sin返回角度的正弦：DimMyAngle,MyCosecantMyAngle=1.3‘用弧度定義角度。MyCosecant=1/Sin(MyAngle)'計算余割。3.3VBScript的常用函數(shù)Cos函數(shù)：返回某個角的余弦值。Cos(number)number參數(shù)可以是任何將某個角表示為弧度的有效數(shù)值表達(dá)式。說明Cos函數(shù)取某個角并返回直角三角形兩邊的比值。此比值是直角三角形中該角的鄰邊長度與斜邊長度之比。結(jié)果范圍在-1到1之間。下面的示例利用Cos函數(shù)返回一個角的余弦值:DimMyAngle,MySecantMyAngle=1.3'用弧度定義一個角。MySecant=1/Cos(MyAngle)'計算正割。3.3VBScript的常用函數(shù)Tan函數(shù)：返回某個角的正切值。Tan(number)number參數(shù)可以是任何將某個角表示為弧度的有效數(shù)值表達(dá)式。說明Tan取某個角并返回直角三角形兩個直角邊的比值。此比值是直角三角形中該角的對邊長度與鄰邊長度之比。
下面的示例利用Tan函數(shù)返回角度的正切：DimMyAngle,MyCotangentMyAngle=1.3'用弧度定義角度。MyCotangent=1/Tan(MyAngle)'計算余切。3.3VBScript的常用函數(shù)Atn函數(shù)返回數(shù)值的反正切值。Atn(number)number參數(shù)可以是任意有效的數(shù)值表達(dá)式。說明Atn函數(shù)計算直角三角形兩個邊的比值(number)并返回對應(yīng)角的弧度值。此比值是該角對邊的長度與鄰邊長度之比。結(jié)果的范圍是從-pi/2到pi/2弧度。下面的示例利用Atn來計算pi的值:Dimpipi=4*Atn(1)'計算pi的值。注意:Atn是Tan（將角作為參數(shù)返回直角三角形兩邊的比值）的反三角函數(shù)。不要混淆Atn與余切（正切的倒數(shù)(1/tangent)）函數(shù)。演示例<HTML><HEAD><TITLE>數(shù)學(xué)函數(shù)</TITLE><SCRIPTLANGUAGE="VBSCRIPT"><!--'計算0-180度之間的sin、cos值COUNT=0
Dos=COUNT*3.14159/180'角度轉(zhuǎn)換為弧度s=Round(s,3)'返回按指定位數(shù)進(jìn)行四舍五入的數(shù)("<center><p><b><fontsize=5>"_&"sin("&s&")="&round(sin(s),3)&_",cos("&s&")="&round(cos(s),3)&_"</font></b></p></center>")COUNT=COUNT+20
LoopUntilCOUNT>180--></SCRIPT></HEAD><BODY></BODY></HTML>3.3VBScript的常用函數(shù)3.3.4字符串函數(shù)空格函數(shù)Space(n)刪除空白字符函數(shù)Trim(字符串)字符串長度測試函數(shù)Len(字符串|變量名)字符串截取函數(shù)字母大小寫轉(zhuǎn)換函數(shù)字母串匹配函數(shù)3.3VBScript的常用函數(shù)Space函數(shù):返回由指定數(shù)目的空格組成的字符串。Space(number)number參數(shù)為字符串中用戶所需的空格數(shù)。說明下面的示例利用Space函數(shù)返回由指定數(shù)目空格組成的字符串：DimMyStringMyString=Space(10)'返回具有10個空格的字符串。MyString="Hello"&Space(10)&"World"'在兩個字符串之間插入10個空格。3.3VBScript的常用函數(shù)LTrim、RTrim和Trim函數(shù)返回不帶前導(dǎo)空格(LTrim)、后續(xù)空格(RTrim)或前導(dǎo)與后續(xù)空格(Trim)的字符串副本。LTrim(string)RTrim(string)Trim(string)string參數(shù)是任意有效的字符串表達(dá)式。如果string參數(shù)中包含Null，則返回Null。說明下面的示例利用LTrim,RTrim,和Trim函數(shù)分別用來除去字符串開始的空格、尾部空格、開始和尾部空格：DimMyVarMyVar=LTrim("vbscript")'MyVar包含"vbscript"。MyVar=RTrim("vbscript")'MyVar包含"vbscript"。MyVar=Trim("vbscript")'MyVar包含"vbscript"。3.3VBScript的常用函數(shù)Len函數(shù)返回字符串內(nèi)字符的數(shù)目，或是存儲一變量所需的字節(jié)數(shù)。Len(string|varname)參數(shù)string任意有效的字符串表達(dá)式。如果string參數(shù)包含Null，則返回Null。Varname任意有效的變量名。如果varname參數(shù)包含Null，則返回Null。說明下面的示例利用Len函數(shù)返回字符串中的字符數(shù)目：DimMyStringMyString=Len("VBSCRIPT")'MyString包含8。3.3VBScript的常用函數(shù)Left函數(shù)返回指定數(shù)目的從字符串的左邊算起的字符。Left(string,length)參數(shù)string字符串表達(dá)式，其最左邊的字符被返回。如果string參數(shù)中包含Null，則返回Null。Length數(shù)值表達(dá)式，指明要返回的字符數(shù)目。如果是0，返回零長度字符串("")；如果大于或等于string參數(shù)中的字符總數(shù)，則返回整個字符串。說明可使用Len函數(shù)確定string參數(shù)中的字符數(shù)目。下面的示例利用Left函數(shù)返回MyString的左邊三個字母：DimMyString,LeftStringMyString="VBSCript"LeftString=Left(MyString,3)'LeftString包含"VBS"。3.3VBScript的常用函數(shù)Mid函數(shù):從字符串中返回指定數(shù)目的字符。Mid(string,start[,length])參數(shù)string字符串表達(dá)式，從中返回字符。如果string包含Null，則返回Null。Startstring中被提取的字符部分的開始位置。如果start超過了string中字符的數(shù)目，Mid將返回零長度字符串("")。Length要返回的字符數(shù)。如果省略或length超過文本的字符數(shù)（包括start處的字符），將返回字符串中從start到字符串結(jié)束的所有字符。說明要判斷string中字符的數(shù)目，可使用Len函數(shù)。下面的示例利用M
溫馨提示
- 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)用戶因使用這些下載資源對自己和他人造成任何形式的傷害或損失。
最新文檔
- 淄博市巡游出租汽車駕駛員區(qū)域科目考試題庫及答案（供參考）
- 2025年河北女子職業(yè)技術(shù)學(xué)院高職單招高職單招英語2016-2024歷年頻考點(diǎn)試題含答案解析
- 普通合伙合同協(xié)議書
- 隔音降噪合同范本
- 幼兒園中班建康活動策劃方案五篇
- 信號工勞務(wù)合同
- 標(biāo)準(zhǔn)鋼材購銷合同樣本
- 智能設(shè)備研發(fā)與生產(chǎn)合作合同
- 代理的合同范本
- 2024年數(shù)字化教育平臺推廣合同
- 測井監(jiān)督管理手冊
- 冷庫庫房招商方案
- 芯片可靠性分析
- 2023年貴州省畢節(jié)市中考物理試題(原卷+解析版)真題含答案
- 口腔種植技術(shù)臨床應(yīng)用能力評估報告范本
- 從中國制造到中國創(chuàng)造(優(yōu)秀課件)
- 新華字典第12版電子版
- 【考試版】蘇教版2022-2023學(xué)年四年級數(shù)學(xué)下冊開學(xué)摸底考試卷(五)含答案與解析
- 血液透析個案護(hù)理兩篇
- 第八章 客戶關(guān)系管理
- 新版人教版高中英語選修一、選修二詞匯表
評論
0/150
提交評論