VBScript語言教學(xué)課件

VBScript言

>VBScript簡介

A數(shù)據(jù)類型、常量、變量

A運(yùn)算符與表達(dá)式

A過程與函數(shù)

?流程控制

VBScript簡介

VBScript是一種腳本語言，區(qū)別于局級語言

的先編譯后執(zhí)行，其特點(diǎn)是解釋一句執(zhí)行

一句，是高級語言VB的一個子集。

VBScript用途

一、開發(fā)客戶端程序：在用戶瀏覽器端執(zhí)行的程序。

方法：在HTML中嵌入VBScript

一般位于Vhead>標(biāo)記對內(nèi)或V/html>后

格式：

<scriptlanguage=nvbscriptn>

VBScript腳本

</script>

二、開發(fā)服務(wù)器端程序：在程序所在服務(wù)器端執(zhí)行

演示分析

1、按鈕能根據(jù)鼠標(biāo)的不同動作作出相應(yīng)處理。

2、有的按鈕對鼠標(biāo)動作有反映，但有的沒有。

為什么?

事件驅(qū)動

事件：能被對象識別的外部動作。任何對象都能

識別一系列外部動作［事件］O如在按鈕上單擊鼠標(biāo)

時，鼠標(biāo)能識別，稱在按鈕上有事件（單擊）發(fā)生。

事件驅(qū)動：對象根據(jù)具體的事件（外部動作）做

出相應(yīng)的響應(yīng)處理。

希望某對象對某特定事件做出響應(yīng)處理，需在其特

定事件中編寫代碼實(shí)現(xiàn)。

o

VBScript的數(shù)據(jù)類型

在VB、C++等高級語言中，有整數(shù)、字符、浮點(diǎn)

數(shù)等不同的數(shù)據(jù)類型，而VBScript只有一種數(shù)據(jù)類型一

—Variant,稱變體數(shù)據(jù)類型，它在不同的場合代表不

同類型的數(shù)據(jù)。

VBScript中定義變量時，不需指定具體數(shù)據(jù)類型，

均為Variant類型，系統(tǒng)根據(jù)值進(jìn)行相應(yīng)處理。P109

VBScript常量

在程序的運(yùn)行中，常量一經(jīng)聲明，其值將不能再改。

在VBScript中，使用Const語句聲明常量。常量一般采

用大寫字母。

例如：

ConstPI=3.1415926'表示數(shù)值型常數(shù)

ConstS=“這是一個字符串。八'表示字符串形常數(shù)

VBScript變量

變量：在程序運(yùn)行期間其值可變的量。

特點(diǎn)：在一個時刻只能存放一個值。

變量聲明：VBScript中的變量可不聲明而直接使用，但

應(yīng)養(yǎng)成先聲明后使用的習(xí)慣。

聲明格式：Dim變量名dimx

<%optionexplicit%>強(qiáng)制要求顯式聲明腳本中的所有

變量，該語句必須出現(xiàn)在腳本的任何其他語句之前。

變量命名觀（Bpii3

1、變量名組成：由英文、數(shù)字和下劃線組成，

第一個字符一定要使用英文字符。

2、VBScript內(nèi)預(yù)設(shè)定詞匯（dim,if等）不能作為

變量名使用。

VBScript運(yùn)算符與表達(dá)式

口算術(shù)運(yùn)算符

□字符串連接符

□關(guān)系［比較］運(yùn)算符

□邏輯/布爾運(yùn)算符

拈4t留磔

舁不JE舁付

算術(shù)運(yùn)算包括：+、-、*、/四則運(yùn)算和取模（％）

\—A-A-

運(yùn)算。

取模胎取余運(yùn)算，7%2=1,4%2=0

算數(shù)表達(dá)式：由算數(shù)運(yùn)算符組成的表達(dá)式稱?

例：3*5-3

字符串連接

1、&:字符串連接

“中國”&“人民”——"中國人民”

2、+：當(dāng)兩側(cè)為字符串，實(shí)現(xiàn)字符串連

接，如兩側(cè)為數(shù)字，則進(jìn)行相加運(yùn)算。

“中國”&“人民”——“中國人民”

2+4結(jié)果為：6

關(guān)系運(yùn)算符

6種：=、＜＞、＜、＜=、＞、＞二

關(guān)系表達(dá)式：由關(guān)系運(yùn)算符組成的表達(dá)式。

例：x＞9

作用：用來比較兩個運(yùn)算量之間的關(guān)系，關(guān)系表達(dá)式的

運(yùn)算結(jié)果為布爾值。若關(guān)系成立結(jié)果為True；若關(guān)系

不成立為FaIseo

例：y=4>7則-False

返輯運(yùn)算符

and---"與”

or——“或”

not——“非”

邏輯表達(dá)式：利用布爾值做運(yùn)算體，運(yùn)算結(jié)果為布

爾值［true/faIse］。

y=(3>5)and(4>3)y???

VBScript過程

過程是一組能完成特定任務(wù)且具有返回值的代碼。

通常，將需經(jīng)常重復(fù)執(zhí)行的操作代碼編寫成過程，在需

要時只要調(diào)用過程名即可。

在VBScript中，過程被分為兩類：Sub子程序和

Function函數(shù)。兩者的區(qū)別在于Sub子程序只執(zhí)行操作

但不返回值，而Function函數(shù)可以將執(zhí)行操作后結(jié)果返

回給調(diào)用程序。

Sub子程序

語法格式如下：

Sub子程序名（參數(shù)1,參數(shù)2,…）

■■■

EndSub

或

Sub子程序名（）

■■■

EndSub

調(diào)用Sub子程序

調(diào)用Sub子程序有兩種方法：

使用Call語句：

Call子程序名（參數(shù)1,參數(shù)2,…）

不使用Call語句：

子程序名（參數(shù)1,參數(shù)2,…）

Function函數(shù)

語法格式：

Function函數(shù)名（參數(shù)1,參數(shù)2,??.）

■■■

EndFunction

或

Function函數(shù)名O

■■■

EndFunction

調(diào)用Function

調(diào)用Function函數(shù)的方法是直接引用函數(shù)名，與Sub子

程序不同的是調(diào)用Function函數(shù)一定有一個返回值。

變量名二函數(shù)名（參數(shù)1,參數(shù)2…?.）

函數(shù)

內(nèi)部函數(shù)：P129

VBScript系統(tǒng)函數(shù)

l.Cstr：將表達(dá)式轉(zhuǎn)換為String子類型。

例如：str=Cstr(34.5),貝Ijstr的內(nèi)容為“34?5”

2.Cint將表達(dá)式轉(zhuǎn)換務(wù)Integer子類型。

例如：Cint(88.88),則返回89

3.Len:字符串長度

4.Mid(string,start,length)：從字符串string中返回從

start指定的位置開始的length長度的字符串。

例如：str=Mid("abcdefghigk",4,3)”,則str內(nèi)容為"def”

5.Left(string,length)：從字符串string左起返回指定數(shù)

目的字符串。

例如：str=Left("abcdefg”,4),則str的內(nèi)容為"abedv

6.Right(string,length)從字符串string右起返回指定數(shù)目

的字符串。

例如：str=Right("abedefg”,3),則str的內(nèi)容為"efg"

變量作用域和存活期

流程控制

一般情況下，VBScript腳本總是按代碼書寫的先后順序

來執(zhí)行的。但在實(shí)際使用中，通常要根據(jù)條件的成立與否

來判斷程序的執(zhí)行順序，這就需要使用控制語句。在VBS中,

控制語句有兩種，即條件控制語句和循環(huán)控制語句。

選擇結(jié)構(gòu)

在VBScript中條件語句有兩種格式:

1、If：［重點(diǎn)掌握］

2、SelectCase

單分支If…Then…EndIf

語法格式：

If條件語句Then

語句組

EndIf

執(zhí)行方法：若條件成立[為True],則執(zhí)行語句組，否則跳

出該條件語句。

雙分支If…Then…Else…EndIf

語法格式：

If條件語句Then

語句組1

Else

語句組2

EndIf

執(zhí)行：若條件語句為True,則執(zhí)行語句組1,否則執(zhí)行語

句組2。

SelectCase處理多分枝

語法格式：、

執(zhí)行時，先對表達(dá)式進(jìn)行運(yùn)算,

SelectCase表達(dá)式

這個運(yùn)算可以為數(shù)學(xué)運(yùn)算或字

Case結(jié)果1

符串運(yùn)算。然后將運(yùn)算結(jié)果依

語句1

次與結(jié)果到結(jié)果進(jìn)行比較，

Case結(jié)果21n

當(dāng)找到與運(yùn)算結(jié)果相匹配的結(jié)

語句2

■■■果i時就執(zhí)行相應(yīng)的語句i,然

后跳出語句；若

Case結(jié)果nSelectCase

一直比較到結(jié)果都沒有匹配

語句nn

到符合的結(jié)果，則執(zhí)行語句

CaseElse

語句n+1n+1o

EndSelect

該語句又稱為多路分支語句，是分支嵌套語句的另一種形

式。比分支嵌套語句更加簡潔明了。

根據(jù)學(xué)號判斷學(xué)生所在系

<%optionexplicit%>

<HTML>

<%

Dimnumber,Num

Number="0423438F'為了簡單，直接賦值了，一般應(yīng)從頁面上獲取

或從數(shù)據(jù)庫中讀取

Num=Mid(Number,4,l),Number即“學(xué)號"中的第四位代表專業(yè)，

利用Mid函數(shù)將第四位取出來

SelectCaseNum

Casenln

Response.Write”工商管理專業(yè)”

Case''2''

Response.Write”金融保險專業(yè)”

CaseG”

Response.Write”電子商務(wù)專業(yè)”

CaseElse

Response.Write”您的學(xué)號輸錯了！”

EndSelect

%>

</BODY>

</html>

循環(huán)控制語句

循環(huán)結(jié)構(gòu)用于重復(fù)執(zhí)行一組語句。在VBS

中提供了三種循環(huán)結(jié)構(gòu)：

ADo循環(huán)

AFor循環(huán)

AForEach循環(huán)

For循環(huán)

語法格式如下：

For循環(huán)變量二循環(huán)初值to循環(huán)終值［step步長］

語句組

Next

執(zhí)行：

1、首先給循環(huán)變量賦初值；

2、判斷循環(huán)變量值是否超出循

環(huán)終止值，如“是”則退出循環(huán)

體；

3、執(zhí)行語句組，改變循環(huán)變量

當(dāng)前值——循環(huán)變量=循環(huán)變量

+步長，并返回2執(zhí)行；

求1-100之間的奇數(shù)之和

optionexplicit

DimSum,i,n

Sum=0

n=100

Fori=ltonStep2

Sum=Sum+i

Next

ForEach...In循環(huán)

ForEach…In循環(huán)與For循環(huán)類似，但它是對數(shù)組或集

合中的每個元素重復(fù)一組語句，而不是重復(fù)一定的次

數(shù)。如果不知道一個集合內(nèi)有多少個元素，可以使用

此種循環(huán)。

語法格式：

ForEach元素In集合

執(zhí)行語句

Next

對數(shù)組中的數(shù)進(jìn)行累加，然后輸出結(jié)果

<HTML>

<BODY>

<%

DimA()

RedimA(2)用來更改某個已聲明數(shù)組的一個或多個維度的大<|

A(0)=100

A(l)=200

A(2)=300

ForEachiInA

Sum=Sum+i

Next

Response.Write”數(shù)組A的元素之和為n&Cstr(Sum)

%>

</BODY>

</HTML>

Do循環(huán)

Do

語法格式一：

DoWhile條件假

語句組條件

Loop

t

循環(huán)體

執(zhí)行：首先判斷條件是否成立，L

1、如果條件為False,那么跳過循環(huán)體，執(zhí)

行循環(huán)體以后的語句；

2、如果條件為True,則執(zhí)行循環(huán)體內(nèi)的語t

句，執(zhí)行后再判斷條件是否成立，直到條

件變?yōu)镕alse,退出循環(huán)，執(zhí)行循環(huán)體以后

的語句。

求（MOO之間的自然數(shù)之和

optionexplicit

DimSum工n

Sum=0

n=100

i=l

DoWhilei<=n

Sum=Sum+i

i=i+l

Loop

語法格式二：

DoUntil條件

執(zhí)行語句

Loop

或

Do

執(zhí)行語句

LoopUntil條件

這種循環(huán)語法格式也是語法格式一的變種。與語法格式一

不同的是，語法格式二是如果條件為False,就執(zhí)行循環(huán)

體內(nèi)的語句，直到條件變?yōu)門rue。

循環(huán)的選擇

For：用于循環(huán)次數(shù)已知的情況；

Do：用于循環(huán)次數(shù)未知，但循環(huán)終止條件已

知的情況；

循環(huán)嵌套與強(qiáng)行退出

所謂嵌套，就是在一個大的循環(huán)內(nèi)可以套一個小循環(huán)。

循環(huán)可以嵌套，但不可以交叉。

強(qiáng)行退出循環(huán)

一般在執(zhí)行循環(huán)命令時，退出循環(huán)都是根據(jù)循環(huán)條件去

判斷，當(dāng)條件不滿足時，退出循環(huán)。但有時根據(jù)需要要

強(qiáng)行退出循環(huán)。在Fo福環(huán)結(jié)構(gòu)中可以用ExitFor來完成

此項(xiàng)功能，在Do循環(huán)結(jié)構(gòu)中用ExitDo強(qiáng)行退出循環(huán)。

注釋語句

注釋語句在程序中不執(zhí)行，也不會顯示在頁面上，只是

在程序中起到注釋的作用，方便自己和他人閱讀。同時

在調(diào)試程序時，也可以把暫時不執(zhí)行的語句加上注釋標(biāo)

記，方便程序的調(diào)試。

一般用Rem或'符號（單引號）來表示該符號所在行的

語句是注釋語句，語法如下：

<%

Rem注釋行

%>

或

<%

’注釋行

%>

容錯語句

在ASP程序執(zhí)行時，如果發(fā)生錯誤，會終止程序的運(yùn)行,

并在頁面上顯示錯誤信息。我們有時希望當(dāng)程序發(fā)生錯

誤時，不停止運(yùn)行，也不讓錯誤信息暴露在訪問者面前,

這時就需要用到容錯語。

容錯語句為：

OnErrorResumeNext

這句話的意思是，如果碰到錯誤，就跳過去繼續(xù)執(zhí)行下

一條語句。

需要注意的是，調(diào)試程序中加了這條語句，就不會發(fā)現(xiàn)

錯誤了。

服務(wù)器端VBScript

格式1:

<%VBScript代碼%>

格式2:

<ScriptLanguage=