大學(xué)計算機基礎(chǔ)(第7章)_第1頁
大學(xué)計算機基礎(chǔ)(第7章)_第2頁
大學(xué)計算機基礎(chǔ)(第7章)_第3頁
大學(xué)計算機基礎(chǔ)(第7章)_第4頁
大學(xué)計算機基礎(chǔ)(第7章)_第5頁
已閱讀5頁，還剩84頁未讀， 繼續(xù)免費閱讀

下載本文檔

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

文檔簡介

《大學(xué)計算機基礎(chǔ)》第7章VBScript程序設(shè)計計算機的任何功能源于程序的編制。程序設(shè)計語言是實現(xiàn)程序編制的重要工具，當(dāng)前的主流技術(shù)是面向?qū)ο蟮某绦蛟O(shè)計。VBScript是一種解釋性的網(wǎng)頁腳本語言，具有面向?qū)ο蟮奶匦?，是實現(xiàn)動態(tài)網(wǎng)頁的有效工具。VBScript程序設(shè)計概述7.1VBScript編程基礎(chǔ)7.2程序流程控制7.3過程7.4提綱事件處理7.5程序調(diào)試7.67.1.1程序設(shè)計語言的發(fā)展歷程

計算機語言可以分成機器語言，匯編語言，高級語言三大類。電腦每做的一次動作，一個步驟，都是按照已經(jīng)用計算機語言編好的程序來執(zhí)行的，程序是計算機要執(zhí)行的指令的集合，而程序全部都是用計算機語言來編寫的。1.機器語言

機器語言是第一代計算機語言。計算機發(fā)明之初，人們只能直接用計算機的語言控制計算機動作，就是寫出一串串由“0”和“1”組成的指令序列由計算機執(zhí)行，這種語言就是機器語言。由于機器語言使用的是針對特定型號計算機的語言，故運算效率是所有語言中最高的。7.1VBScript程序設(shè)計概述2.匯編語言

匯編語言是用一些簡潔的英文字母、符號串來替代一個特定的指令的二進制串，比如，用“ADD”代表加法，“MOV”代表數(shù)據(jù)傳遞等，降低編程的繁雜度。匯編語言同樣十分依賴于機器硬件，移植性不好，但效率仍十分高。3.高級語言

用高級語言編寫的程序需要經(jīng)過翻譯，計算機才能執(zhí)行。雖然程序編譯占去了一些計算機時間，但是實踐證明，高級語言是有效地使用計算機與計算機執(zhí)行效率之間的一個很好的折中手段。7.1VBScript程序設(shè)計概述

程序設(shè)計語言

機器語言：

匯編語言：

高級語言：1011000000000101………..MOVA,5ADDA,2………..LETX=5+220PRINTX………..7.1.2面向?qū)ο缶幊痰幕舅枷?/p>

面向?qū)ο笫且环N新興的程序設(shè)計方法，其基本思想是使用對象、類、繼承、封裝、消息等基本概念來進行程序設(shè)計。

面向?qū)ο蟪绦蛟O(shè)計方法是從現(xiàn)實世界中客觀存在的事物（即對象）出發(fā)來構(gòu)造軟件系統(tǒng)，并在系統(tǒng)構(gòu)造中盡可能運用人類的自然思維方式，強調(diào)直接以問題域（現(xiàn)實世界）中的事物為中心來思考問題、認識問題，并根據(jù)這些事物的本質(zhì)特點，把它們抽象地表示為系統(tǒng)中的對象，作為系統(tǒng)的基本構(gòu)成單位。7.1VBScript程序設(shè)計概述7.1.3VBScript語言特點與編程環(huán)境VBScript是一種解釋性的網(wǎng)頁腳本語言，具有面向?qū)ο蟮奶匦浴BScript既可以作為客戶端編程語言，也可以作為服務(wù)器端編程語言。

客戶端編程語言：可以由瀏覽器解釋執(zhí)行的語言。當(dāng)編制的腳本(程序)被下載到一個兼容的瀏覽器中時，瀏覽器將自動執(zhí)行該腳本。

服務(wù)器端編程語言：腳本在服務(wù)器上執(zhí)行。不受瀏覽器的限制，網(wǎng)頁通過網(wǎng)絡(luò)傳送給瀏覽器，Web瀏覽器收到的只是標(biāo)準(zhǔn)的HTML文件。7.1VBScript程序設(shè)計概述編制VBScript程序的工具：1.使用純文本編輯器

使用純文本編輯器（如Windows的記事本）編寫腳本程序，優(yōu)點是簡單、易用，缺點是不能支持腳本語言的特性，因此這種方法只適用于編寫和修改程序量不大的腳本程序。2.使用SPD2007

在SPD2007中，在“網(wǎng)頁”視圖中的“代碼”選項卡下可以直接編制HTML文檔，也可以輸入和編輯VBScript腳本程序代碼，并能在IE瀏覽器中瀏覽執(zhí)行結(jié)果。7.1VBScript程序設(shè)計概述

3.使用Microsoft腳本編輯器Microsoft腳本編輯器是SPD2007提供的一種專業(yè)化Web編程工具，用于查看和編輯HTML文檔，也可以調(diào)試VBScript腳本程序。

啟動MicrosoftScriptEditor的方法：在SPD2007中打開或新建任意一個HTML文檔，選擇“網(wǎng)頁”視圖下的“代碼”選項卡，執(zhí)行“工具”→“宏”命令，從彈出的子菜單中選擇“MicrosoftScriptEditor”選項，即可打開MicrosoftOffice內(nèi)置的腳本編輯器。7.1VBScript程序設(shè)計概述7.1.4程序代碼編寫規(guī)則

每一種程序設(shè)計語言都有一套嚴格的書寫規(guī)則。VBScript程序代碼也有自己的編寫規(guī)則，不能超越其規(guī)定自由發(fā)揮。

1.程序代碼中不區(qū)分字母的大小寫。

2.同一程序行上可以書寫多條語句。語句之間用冒號“:”分隔，例如：

a=10:b=25。VBScript規(guī)定，一個程序行的長度最多不能超過255個字符。

3.單行語句可分若干行書寫。需要續(xù)行時，在本行后加入續(xù)行符（一個空格后面跟隨一個下劃線“_”）。7.1VBScript程序設(shè)計概述4.注釋語句。注釋語句可以幫助其他程序員理解程序文件，在VBScript中的注釋語句以單引號（‘）或Rem表示。例如：

r=2:Remr表示圓的半徑s=3.14*r*r ‘求圓的面積

需要特別注意的是，編寫程序時一定要采用VBScript規(guī)定的有效符號。除注釋內(nèi)容及字符串以外，語句中使用的分號、引號、括號等符號都必須使用英文狀態(tài)下的符號，否則程序?qū)⒉荒苷＿\行。7.1VBScript程序設(shè)計概述

5.嚴格按照VB規(guī)定的格式和符號編寫程序

與其他高級語言一樣，在VB中使用的分號、引號、括號等符號都是英文狀態(tài)下的半角符號，而不能使用中文狀態(tài)下的全角符號。

許多程序錯誤都是由此而起!!!!

例如：

Ifa<5Thenx=10

Document.Write("x<1")

不能寫成

Ifa＜5Thenx=10

Document.Write(“x<1”)全角符號中文符號7.1.5一個簡單的VBScript程序VBScript采用小程序段的方式進行編程。當(dāng)客戶端請求一個含有VBScript腳本程序的網(wǎng)頁時，VBScript腳本程序會隨HTML文檔一起從服務(wù)器下載到客戶端，然后由客戶端瀏覽器解釋和執(zhí)行這個腳本程序，并以頁面的方式顯示出來。

在HTML文檔中，

<SCRIPT></SCRIPT>為腳本標(biāo)記，其中：type=“text/VBScript”表示腳本語言是VBScript，瀏覽器會激活VBScript處理器進行處理。另一種標(biāo)記方法是：LANGUAGE=“VBScript”，目前這兩種方法都可以表示<SCRIPT></SCRIPT>里的代碼是VBScript。7.1VBScript程序設(shè)計概述例7-1在瀏覽器上顯示“大家好！”、“節(jié)日快樂！”，VBScript程序如下：<HTML><HEAD><TITLE>例7-1</TITLE></HEAD><BODY><SCRIPTtype=“text/VBScript”>

Document.write("大家好!"&"<BR>")

x="節(jié)日快樂！"

Document.write(x)

</SCRIPT></BODY>

</HTML>7.1VBScript程序設(shè)計概述VBScript程序設(shè)計概述7.1VBScript編程基礎(chǔ)7.2程序流程控制7.3過程7.4提綱事件處理7.5程序調(diào)試7.6

用程序設(shè)計語言編制程序，最重要的兩個方面就是數(shù)據(jù)及程序控制。數(shù)據(jù)是程序要處理的對象，處理的結(jié)果也用數(shù)據(jù)來表示和存儲；而程序控制則是對程序運行流程的管理。7.2.1數(shù)據(jù)類型

VBScript只有一種數(shù)據(jù)類型，稱為Variant（變體型）。Variant是一種特殊的數(shù)據(jù)類型，根據(jù)使用的方式，它可以包含不同類別的信息。Variant變量會自動進行數(shù)據(jù)類型轉(zhuǎn)換。需要時使用VBScript的轉(zhuǎn)換函數(shù)可以轉(zhuǎn)換數(shù)據(jù)的子類型。7.2VBScript編程基礎(chǔ)7.2.2變量

變量是內(nèi)存中的臨時存儲單元，用于存儲程序運行期間其值可以發(fā)生變化的量。一個變量有3個要素：變量名、數(shù)據(jù)類型和變量值。使用變量并不需要了解變量在計算機內(nèi)存中的地址，只要通過變量名引用變量就可以查看或更改變量的值。

1.聲明變量

使用Dim語句在Script中顯式聲明變量。格式為：

Dim變量名列表

聲明多個變量時，使用逗號分隔變量。例如：

Dima,b,c,d

另一種方式是通過直接在Script中使用變量名這一簡單方式隱式聲明變量。7.2VBScript編程基礎(chǔ)2.變量命名規(guī)則第一個字符必須是字母。只能由字母、數(shù)字和下劃線組成，不能包含小數(shù)點、空格等字符。長度不能超過255個字符。不能使用VBScript的關(guān)鍵字（也稱保留字，如對象名、語句名、函數(shù)名等）作為變量名。在被聲明的作用域內(nèi)必須唯一。3.變量的作用域與生存期

變量的作用域由聲明它的位置決定。分為過程級變量和Script級變量。變量存在的時間稱為生存期。Script級變量的生存期從被聲明的一刻起，直到Script運行結(jié)束。對于過程級變量，其生存期僅是該過程運行的時間，該過程結(jié)束后，變量隨之消失。7.2VBScript編程基礎(chǔ)4.變量賦值

賦值形式：變量在表達式左邊，要賦的值在表達式右邊。例如：B=200 S=“VBScript程序設(shè)計”

5.標(biāo)量變量和數(shù)組變量

只包含一個值的變量被稱為標(biāo)量變量。包含一系列值的變量稱為數(shù)組變量。①

一維數(shù)組

DimA(10) ‘聲明一個包含11個元素的一維數(shù)組②

多維數(shù)組數(shù)組并不僅限于一維。VBScript中數(shù)組的維數(shù)最大可以為60 DimMyTable(5,10)‘聲明一個6行11列的二維數(shù)組7.2VBScript編程基礎(chǔ)“值可變”：當(dāng)將某個數(shù)據(jù)存放到一個變量時，就把變量中原有的值“沖”掉，換成新的值。例如，以下2個賦值語句：

a=3a=8

同一變量在不同時刻可以取不同的值“取之不盡”：在運算過程中，如果沒有改變該變量的值，那么，不管使用變量的值進行多少次運算，其值始終保持不變。例如

x=5a=3+x′x的值始終保持為5b=x*x–4*x變量的兩個重要特點7.2.3常量

常量是在程序執(zhí)行期間其值從不發(fā)生變化的數(shù)據(jù)。在VBScript中，常量分為普通常量和符號常量。1.普通常量

普通常量分為字符串常量、數(shù)字常量和日期型常量三種。

字符串常量簡稱字符串，它是由一對雙引號括起來的字符序列所組成，其中可以包含字母、漢字、數(shù)字、空格以及標(biāo)點符號等，長度不超過20億個字符。

數(shù)值常量分為整型、長整型和浮點型。整型數(shù)和長整型數(shù)都可以用十進制、八進制、十六進制三種表示形式。浮點型由尾數(shù)、指數(shù)符號和指數(shù)3部分組成。對于單精度浮點數(shù)，指數(shù)符號為E；對于雙精度浮點數(shù)，指數(shù)符號為D。日期型常量用來表示日期和時間。它采用兩個“#”號把日期和時間的值括起來，例如#05/10/2013#，#2010-10-01#等。7.2VBScript編程基礎(chǔ)2.符號常量

符號常量是用一個標(biāo)識符表示的常量，用于代替數(shù)字或字符串，其值從不發(fā)生改變。在VBScript中，符號常量分為預(yù)定義符號常量和用戶自定義常量。①

預(yù)定義符號常量。在VBScript中，提供了許多預(yù)定義符號常量，在使用之前無需定義。VBScript符號常量通常以前綴“vb”開始，例如：vbCrLf表示回車符和換行符的組合，vbGreen表示綠色的數(shù)值。②

用戶自定義常量。通過Const語句來創(chuàng)建，使用Const語句可以創(chuàng)建名稱具有一定含義的字符串型或數(shù)值型常量。ConstMyString="這是一個字符串"ConstPI=3.1415926ConstCutoffDate=#6-1-2013#7.2VBScript編程基礎(chǔ)7.2.4運算符與表達式VBScript有4類運算符，包括算術(shù)運算符、連接運算符、比較運算符和邏輯運算符。1.算術(shù)運算符VBScript有8種算術(shù)運算符：

^(乘方)→-(求負)→*/→\→Mod→+-

示例：5*x^10+x/6–x^(1/3)

15Mod67.2VBScript編程基礎(chǔ)求整除后的余數(shù)，結(jié)果為32.連接運算符

連接運算符有兩個：&和+，其作用都是將兩個字符串連接起來，合并成一個新字符串。例如：“高性能”&“計算” ‘結(jié)果是“高性能計算”“Office”&2010 ‘結(jié)果是“Office2010”“1234”+“5678” ‘結(jié)果是“12345678”

當(dāng)連接的兩個數(shù)據(jù)都是字符串時，“&”和“+”的作用完全相同。但“&”會自動將非字符串類型的數(shù)據(jù)轉(zhuǎn)換為字符串后再進行連接，而“+”則不能自動進行轉(zhuǎn)換。7.2VBScript編程基礎(chǔ)3.比較運算符

比較運算符又稱為關(guān)系運算符，用于對兩個表達式進行比較，比較結(jié)果為邏輯值。在VBScript中共有6個比較運算符，包括：=、<>、<、>、<=、>=。比較運算符的優(yōu)先級都相同，按照從左到右的順序進行計算。

字符串?dāng)?shù)據(jù)也能比較大小，它是按其ASCII碼值進行比較的。比較兩個字符串時，從第一個字符開始比較，其ASCII碼值大的字符串大。如果第一個字符相同，則取第二個字符進行比較，依此類推。例如：“A”小于“B”“12”小于“2”“ABC”大于“AB2”“ABC”大于“AB”7.2VBScript編程基礎(chǔ)4.邏輯運算符

邏輯運算符的作用是將操作數(shù)進行邏輯運算，結(jié)果是邏輯值。基本的邏輯運算符有三種，即And、Or、Not。進行邏輯運算時，運算符的優(yōu)先級依次是Not、AnD、Or，括號優(yōu)先。

例：Not(1<3) ‘結(jié)果為假5<=5And4<5+1 ‘結(jié)果為真“3”<=”3”O(jiān)R5>2 ‘結(jié)果為真7.2VBScript編程基礎(chǔ)5.表達式與運算符優(yōu)先級

（1）表達式

將常量、變量或函數(shù)等用運算符連接起來構(gòu)成的式子就是表達式。表達式的運算結(jié)果是一個值。例如，a+b–c，a*b/c，a+20*b/12，aANDbORc等，都是合法的表達式。

表達式書寫規(guī)則：①

不能使用上標(biāo)或下標(biāo)。例如X2必須寫為X^2，X1+X2必須寫為X1+X2；②

所有運算符都不能省略。例如3X必須寫為3*X；③

表達式中的括號都要用圓括號，且必須成對出現(xiàn)。7.2VBScript編程基礎(chǔ)（2）運算符優(yōu)先級

當(dāng)表達式包含多個運算符時，將按預(yù)定順序計算每一部分，這個順序被稱為運算符優(yōu)先級?？梢允褂美ㄌ栐竭^這種優(yōu)先級順序，強制首先計算表達式的某些部分。運算時，總是先執(zhí)行括號中的運算符，然后再執(zhí)行括號外的運算符。但是，在括號中仍遵循標(biāo)準(zhǔn)運算符優(yōu)先級。優(yōu)先級相同的按照從左到右的順序計算。當(dāng)表達式包含多種運算符時，首先計算算術(shù)運算符，其次連接運算符，然后計算比較運算符，最后計算邏輯運算符。7.2VBScript編程基礎(chǔ)1+2*14Mod17\6/2=？

求出下列表達式的值想一想思考題

1+28Mod5

結(jié)果為41.按運算符的優(yōu)先級分成若干運算步驟先乘除，再整除\和求Mod，后加運算

2.根據(jù)運算符的運算功能求出各步驟的結(jié)果7.2.5函數(shù)

函數(shù)是系統(tǒng)提供的實用功能。VBScript中的內(nèi)部函數(shù)也稱為標(biāo)準(zhǔn)函數(shù)，每個內(nèi)部函數(shù)完成特定的功能。函數(shù)調(diào)用的一般格式為：函數(shù)名(參數(shù)1，參數(shù)2，…)例如，要求某個數(shù)x的平方根，可以調(diào)用Sqr函數(shù)：y=Sqr(x)VBScript常用內(nèi)部函數(shù)可以分為4類：轉(zhuǎn)換函數(shù)、字符串函數(shù)、數(shù)學(xué)函數(shù)和日期函數(shù)。VBScript中所有函數(shù)的返回值的數(shù)據(jù)類型都是Variant。1.轉(zhuǎn)換函數(shù)

在VBScript中，Variant變量一般會根據(jù)需要自動轉(zhuǎn)換成合適的數(shù)據(jù)類型；但有時自動轉(zhuǎn)換有可能造成數(shù)據(jù)類型不匹配錯誤。此時，就應(yīng)使用VBScript的轉(zhuǎn)換函數(shù)來強制轉(zhuǎn)換數(shù)據(jù)的子類型。VBScript中常用的類型轉(zhuǎn)換函數(shù)見表7-6。7.2VBScript編程基礎(chǔ)<HTML><HEAD><TITLE>例7-2</TITLE></HEAD><BODY><SCRIPTtype=“text/VBScript”>

Num=1000

Document.Write(typename(Num)&“<BR>”)Document.Write(“歡迎第”&CStr(Num)&“個來訪者"&“<BR>”)Document.Write(typename(CStr(Num))

</SCRIPT></BODY>

</HTML>7.2VBScript編程基礎(chǔ)例7-2使用類型轉(zhuǎn)換函數(shù)示例。顯示數(shù)值變量類型，并將數(shù)值變量轉(zhuǎn)換為字符串變量。類型轉(zhuǎn)換2.字符串函數(shù)

字符串在編程中使用廣泛，如用戶注冊時輸入的用戶名、密碼等信息，留言板中的留言標(biāo)題、內(nèi)容、留言人等信息，都是作為字符串處理的。VBScript提供了一些用于字符串查找、比較、截取等處理的函數(shù)，見表7-7。

①

函數(shù)Instr在“字符串1”中查找“字符串2”，如果找不到，返回值為0；如果找到了，則返回“字符串2”的第一個字符在“字符串1”中的位置。f和k都是可選參數(shù)，f表示開始搜索的位置（默認值為1），k表示比較方式，若k為0（默認），表示區(qū)分大小寫；若k為1，則不區(qū)分大小寫。例如：Instr(3,“A12a34A56”,“A”)，結(jié)果為7，Instr(3,“A12a34A56”,“A”,1)，結(jié)果為4；

②

在函數(shù)String中，字符也可以用ASCII代碼（見附錄B）來表示，例如String(6,42)與String(6,“*”)作用相同。7.2VBScript編程基礎(chǔ)<HTML><HEAD><TITLE>例7-3</TITLE></HEAD><BODY><SCRIPTTYPE="text/VBScript">dimuser_name,StrTempuser_name=Ucase("WangDonFang")

document.write(user_name&"<BR>")

StrTemp=Mid("Heisagoodprimeminister",9,4)

document.writeStrTemp </SCRIPT>

</BODY></HTML>7.2VBScript編程基礎(chǔ)例7-3使用字符串函數(shù)示例。將用戶名小寫字母轉(zhuǎn)換為大寫字母；取字符串中的子串。3.數(shù)學(xué)函數(shù)

VBScript提供了10多種數(shù)學(xué)處理的函數(shù)，表7-8列出了常用的6種數(shù)學(xué)函數(shù)。

其中隨機函數(shù)Rnd用于產(chǎn)生介于0和1之間的隨機數(shù)。所謂隨機數(shù)是人們預(yù)先不能估計到的數(shù)。Rnd通常與Int函數(shù)配合使用，

要生成[a,b]區(qū)間內(nèi)的隨機整數(shù)，可以使用公式：Int((b-a+1)*Rnd+a)

默認情況下，每次運行一個應(yīng)用程序，VBScript會提供相同的“種子數(shù)”，使Rnd產(chǎn)生相同序列的隨機數(shù)。為了每次運行時產(chǎn)生不同序列的隨機數(shù)，可先執(zhí)行Randomize語句。7.2VBScript編程基礎(chǔ)

生成[1,5]區(qū)間范圍內(nèi)的隨機整數(shù)，可以采用：

Int(5*Rnd+1)

產(chǎn)生的隨機數(shù)可以是1，2，3,4或5，這由VB運行時隨機給定。5*Rnd的結(jié)果為下列的一種：

0.……1.……2.……3.……

5.……例7-4用隨機函數(shù)產(chǎn)生20個在[1,100]之間的正整數(shù)，找出其中的最大數(shù)和最小數(shù)并輸出，同時輸出下標(biāo)。程序代碼如下：<HTML><HEAD><TITLE>例7-4</TITLE></HEAD><BODY><SCRIPTtype=“text/VBScript”>Dima(20)

Dimm,n,i,Max,MinRandomizeFori=1To20a(i)=Int(Rnd*100+1) Document.write(a(i)&“”)NextDocument.write(“<BR>”)7.2VBScript編程基礎(chǔ)定義數(shù)組產(chǎn)生隨機數(shù)Max=a(1)Min=a(1)Fori=2To20 Ifa(i)>MaxThenMax=a(i):m=i

Ifa(i)<MinThenMin=a(i):n=iNextDocument.write("最大的數(shù)是："&Max&",下標(biāo)是："&m&"<BR>")Document.write("最小的數(shù)是："&Min&",下標(biāo)是："&n&"<BR>")

</SCRIPT></BODY></HTML>7.2VBScript編程基礎(chǔ)保留最大數(shù)，記錄下標(biāo)4.日期與時間函數(shù)

日期/時間函數(shù)用于進行有關(guān)日期和時間的處理，VBScript常用的日期/時間函數(shù)見表7-9。

例7-5

利用VBScript在網(wǎng)頁中輸出當(dāng)前

的日期、時間、星期。程序代碼如下：7.2VBScript編程基礎(chǔ)<HTML><HEAD><TITLE>例7-5</TITLE></HEAD><BODY><SCRIPTtype=“text/VBScript”>Document.Write("當(dāng)前日期:"&Date()&"<BR>")Document.Write("當(dāng)前星期:"&Weekday(Date())&"<BR>")Document.Write("當(dāng)前時間:"&Time()&"<BR>")</SCRIPT></BODY></HTML>VBScript程序設(shè)計概述7.1VBScript編程基礎(chǔ)7.2程序流程控制7.3過程7.4提綱事件處理7.5程序調(diào)試7.6結(jié)構(gòu)化程序設(shè)計方法包含3種基本結(jié)構(gòu)，即順序結(jié)構(gòu)、選擇結(jié)構(gòu)和循環(huán)結(jié)構(gòu)。VBScript支持結(jié)構(gòu)化的程序設(shè)計方法，可以用這3種基本結(jié)構(gòu)及其組合來構(gòu)造程序，從而使程序結(jié)構(gòu)清晰、可讀性好，也易于調(diào)試和修改。7.3程序流程控制7.3.1順序結(jié)構(gòu)順序結(jié)構(gòu)是最基本的程序結(jié)構(gòu)。顧名思義，順序結(jié)構(gòu)是按程序中語句編寫的先后順序逐條執(zhí)行，只有在遇到分支結(jié)構(gòu)、循環(huán)結(jié)構(gòu)等時才會改變執(zhí)行的順序。

在順序結(jié)構(gòu)中,按程序中語句編寫的先后順序逐條執(zhí)行。主要包括以下一些簡單語句。

輸入數(shù)據(jù)：

賦值語句變量=表達式為變量賦值

InputBox函數(shù)通過輸入對話框接收數(shù)據(jù)

輸出結(jié)果：

Document.Write方法輸出信息到網(wǎng)頁

MsgBox函數(shù)以消息框形式輸出信息通常程序包含三部分內(nèi)容：輸入→處理→輸出1.賦值語句

格式：[Let]變量=表達式功能：計算右端的表達式，并把結(jié)果賦值給左端的變量。Let表示賦值，通常省略。符號“=”被稱為賦值號。例如：

sum=99'把數(shù)值99賦給變量sum

txt="程序設(shè)計"

'把字符串賦給變量txt1

說明：(1)表達式中的變量必須是賦過值的，否則變量的初值自動取零值(變長字符串變量取空字符)。例如：

a=1c=a+b+3

'b未賦過值，為0

執(zhí)行后，c值為4

(2)賦值語句跟數(shù)學(xué)中等式具有不同的含意，例如

x=x+1

表示把變量x的當(dāng)前值加上1后再將結(jié)果賦給變量“先讀后寫”：讀出x的內(nèi)容→加1→寫回x（覆蓋原有內(nèi)容）

(3)變量出現(xiàn)在賦值號的右邊和左邊，其用途是不相同的。出現(xiàn)在右邊表達式中時，變量是參與運算的元素(其值被讀出)；出現(xiàn)在左邊時，變量起存放表達式的值的作用(被賦值)。例如

x=2a=3x=2*a+5

當(dāng)執(zhí)行第3行語句“x=2*a+5”時，將讀出變量a的值(即3)，把該值乘2后加5，然后將結(jié)果(11)賦值給變量x。例7-6給定一個兩位數(shù)，要求交換個位數(shù)和十位數(shù)的位置，然后把交換后的數(shù)顯示在網(wǎng)頁上。程序代碼如下：<HTML><HEAD><TITLE>例7-6</TITLE></HEAD><BODY><SCRIPTtype=“text/VBScript”>Dimx,a,b,c ‘定義4個變量

x=86 ‘給定一個2位數(shù)

a=Int(x/10) ‘取十位數(shù)

b=xMod10 ‘取個位數(shù)

c=b*10+a ‘個、十位交換

Document.Write("交換后的數(shù):"&c)

</SCRIPT></BODY></HTML>7.3程序流程控制

處理方法兩位數(shù)

ab

b②取出個位數(shù)

a①取出十位數(shù)

③組成新兩位數(shù):b*10+a2.Document.Write輸出方式Document(文檔)對象是Web瀏覽器中的一個重要對象，它代表當(dāng)前的整個網(wǎng)頁。使用Document對象的Write方法可以向網(wǎng)頁輸出信息。常用格式：

Document.Write(輸出項)

例：

Document.Write(x)Document.Write("x="&x)Document.Write("x="&x&",y="&y)

3.消息對話框使用MsgBox函數(shù)可以產(chǎn)生一個消息對話框。一般格式如下：

MsgBox(輸出信息)

或MsgBox輸出信息

4.輸入對話框格式：InputBox(提示信息)

功能：產(chǎn)生一個輸入對話框，在對話框中顯示“提示信息”，并能接收用戶輸入的一行信息。例7-7使用InputBox函數(shù)輸入一個用戶名，然后通過MsgBox函數(shù)輸出信息。程序代碼如下：<HTML><HEAD><TITLE>例7-7</TITLE></HEAD><BODY><SCRIPTtype=“text/VBScript”>Dimnamename=InputBox("請輸入用戶名：")

MsgBox("尊敬的"&name&"，歡迎登錄網(wǎng)站!")

</SCRIPT></BODY>

</HTML>7.3程序流程控制7.3.2選擇結(jié)構(gòu)在實際應(yīng)用中，有許多問題需要判斷某些條件，根據(jù)判斷的結(jié)果決定程序的流程。使用選擇結(jié)構(gòu)可以實現(xiàn)這種處理。在VBScript中實現(xiàn)選擇結(jié)構(gòu)主要有兩類語句：條件語句(if)和多分支語句(selectcase)。7.3程序流程控制1.If語句If語句有以下兩種形式：

（1）If…Then語句If…Then語句常用的語法格式：

If條件Then

語句塊

EndIf其中“條件”是一個比較表達式或邏輯表達式。功能：若“條件”成立（值為真），則執(zhí)行Then后面的“語句塊”（一個或多個語句），否則直接執(zhí)行“EndIf”的下一條語句。注意：EndIf表示語句的結(jié)束，輸入時End和If之間至少要留一個空格，否則程序語法檢查時會出錯。其他語句如EndSuB、EndDo等，也必須按此處理。7.3程序流程控制

在IF條件中，有時需要判斷字符的大小。字符大小是按其ASCII碼值進行比較的。

1.下列字符中，____字符最大，____字符最小。

A.1

B.ZC.*

D.a

2.假設(shè)a=1，b=2，下列邏輯表達式中其值為真的有

A.a<=0B.a>=0Andb>2C.a<=0Or"b">"ab"D.a>=0AndNotb<2E.2*a=-bOra>0Andb>0

請你給出答案想一想思考題最大字符：D最小字符：CFFTTT例7-8任給兩個數(shù)，判斷其中較大的數(shù)并顯示出來。程序代碼如下：<HTML><HEAD><TITLE>例7-8</TITLE></HEAD><BODY><SCRIPTtype=“text/VBScript”>dimx,y,mx=Csng(InputBox(“請輸入第一個數(shù)：”)) ‘轉(zhuǎn)換為單精度數(shù)

y=Csng(InputBox(“請輸入第二個數(shù)：”))

m=xifm<ythen ‘兩數(shù)比較

m=y ‘最大數(shù)保存在m中

EndIfDocument.write(“最大的數(shù)是：”&m)</SCRIPT></BODY>

</HTML>7.3程序流程控制（2）If…Then…Else語句

格式：

If條件Then

語句塊1Else

語句塊2EndIf

功能：首先測試條件，如果條件成立(即值為真)，則執(zhí)行Then后面的語句塊1，如果條件不成立(即值為假)，則執(zhí)行Else后面的語句塊2。而在執(zhí)行Then或Else之后的語句塊后，會從EndIf之后的語句繼續(xù)執(zhí)行。真假ABEa=1:b=3

c=4*a-bIfa*2-1<=bThenb=2*b+cEndIfIfb-a>cThena=a+1c=c-1Elsea=a-1EndIf

下列程序段運行后，a、b、c的值是？想一想思考題270（3）條件語句的嵌套在條件語句中，Then和Else后面的語句塊也可以包含另一個條件語句，這就形成條件語句的嵌套。使用這種結(jié)構(gòu)，可以控制基于多種可能的程序流程。使用條件語句嵌套時，一定要注意If與Else、If與EndIF的配對關(guān)系。在多個條件中進行選擇的更好方法是使用SelectCase語句。7.3程序流程控制例7-10輸入某課程的百分制成績，顯示出對應(yīng)的成績等級。例如輸入56，則顯示“不及格”。本例采用條件語句的嵌套，程序代碼如下：<SCRIPTTYPE="text/VBScript">Dimmarkmark=Csng(inputbox("輸入成績："))

Ifmark<60ThenMsgBox("不及格！")

ElseIfmark<80ThenMsgBox("及格！")

ElseIfmark<90thenMsgbox("良好！")

ElseMsgbox("優(yōu)秀！")

EndIfEndIfEndIf</SCRIPT>7.3程序流程控制2.SelectCase語句

SelectCase結(jié)構(gòu)提供了If…Then…Else結(jié)構(gòu)的一個變通形式，可以從多個語句塊中選擇執(zhí)行其中的一個。SelectCase語句提供的功能與If…Then…Else語句類似，但是可以使代碼更加簡練易讀。格式如下：SelectCase<表達式>

Case<結(jié)果1>

<語句1>

Case<結(jié)果2>

<語句2>

……

Case<結(jié)果n>

<語句n>

CaseElse

<語句n+1>EndSelect7.3程序流程控制說明：首先對表達式進行運算。該運算可以為數(shù)學(xué)運算或字符串運算。然后將運算結(jié)果依次與結(jié)果1到結(jié)果n作比較，當(dāng)找到與計算結(jié)果相等的結(jié)果時就執(zhí)行該語句段，執(zhí)行完畢就跳出selectcase條件式。而當(dāng)運算結(jié)果與所有的結(jié)果都不相等時，就執(zhí)行caseelse后面的語句段n+1。例7-11根據(jù)輸入的數(shù)字，顯示相應(yīng)的學(xué)位。例如輸入1，則顯示“學(xué)士”。程序代碼如下：<HTML><HEAD><TITLE>例7-11</TITLE></HEAD><BODY><SCRIPTtype=“text/VBScript”>dimaa=int(inputbox("請輸入一個1--4的值：")) ‘轉(zhuǎn)換為整型數(shù)selectcaseacase1msgbox("學(xué)士")case2msgbox("碩士")case3msgbox("博士")case4msgbox("博士后")caseelsemsgbox("輸入錯誤！")endselect</SCRIPT></BODY>

</HTML>7.3程序流程控制7.3.3循環(huán)結(jié)構(gòu)在程序設(shè)計中，經(jīng)常要對某一處理過程反復(fù)執(zhí)行多次，這就需要使用循環(huán)結(jié)構(gòu)。VBScript提供了多種設(shè)計循環(huán)結(jié)構(gòu)程序的語句，其中最常用的是For…Next和Do…Loop語句。

采用循環(huán)程序可以解決一些按一定規(guī)則重復(fù)執(zhí)行的問題。循環(huán)是指在指定的條件下多次重復(fù)執(zhí)行一組語句，被重復(fù)執(zhí)行的一組語句稱為循環(huán)體。7.3程序流程控制1.For…Next語句For…Next語句用于按指定的次數(shù)運行語句塊。在循環(huán)中使用計數(shù)器變量，該變量的值隨每一次循環(huán)增加或減少。

For…Next語句的一般語法格式如下：

For循環(huán)變量=初值To終值[Step步長值]循環(huán)體

Next7.3程序流程控制

功能：控制重復(fù)執(zhí)行循環(huán)體中的一組語句。本語句使用一個起計數(shù)器作用的循環(huán)變量，每重復(fù)執(zhí)行一次循環(huán)之后，循環(huán)變量就會按一定的步長增加或者減少，直到超過規(guī)定的終值為止。初值、終值和步長值都是數(shù)值表達式，步長值可以是正數(shù)（稱為遞增循環(huán)），也可以是負數(shù)（稱為遞減循環(huán)）。若步長值為1，則Step1可以省略。（1）單重循環(huán)單重循環(huán)的執(zhí)行步驟如下：①保存初值、終值和步長值②將初值賦給循環(huán)變量；③判斷循環(huán)變量值是否超過終值。若超過終值則退出循環(huán)，執(zhí)行Next后面的語句；④執(zhí)行循環(huán)體；⑤遇到Next語句時，修改循環(huán)變量，即把循環(huán)變量的當(dāng)前值加上步長值后賦給循環(huán)變量；⑥轉(zhuǎn)③判斷循環(huán)條件及繼續(xù)執(zhí)行。（2）循環(huán)的嵌套循環(huán)的嵌套是指一個循環(huán)體內(nèi)包含另一個完整的循環(huán)結(jié)構(gòu)，又稱多重循環(huán)。其執(zhí)行規(guī)則是，外層循環(huán)每執(zhí)行一次，內(nèi)層循環(huán)就要從頭開始執(zhí)行一輪。7.3程序流程控制例7-12在某次比賽中，有7個評委打分（由鍵盤輸入7個評委的分數(shù)），去掉一個最高分，去掉一個最低分后，求出平均分為該參賽者的最終得分。程序代碼如下：<SCRIPTtype=“text/VBScript”>Dimn,s,max,min,avgs=0max=0 ‘賦初值min=100Fori=1To7 ‘輸入7個評分

n=Csng(InputBox("請輸入第"&i&"位評委的分數(shù)："))‘轉(zhuǎn)換為單精度數(shù)

Ifn>maxThenmax=nIfn<minThenmin=ns=s+nNexts=s-max-min ‘去掉最高分、最低分avg=s/5 ‘計算平均值Document.Write("最高分是："&max&“<BR>”)Document.Write("最低分是："&min&“<BR>”)Document.Write("平均分是："&avg&“<BR>”)</SCRIPT>7.3程序流程控制例7-13

制作“九九乘法表”。1)由于“九九乘法表”是一個9行9列的二維表，故可采用兩重循環(huán)進行控制；2)假定i作為外循環(huán)變量、j作為內(nèi)循環(huán)變量，可利用內(nèi)循環(huán)變量作為被乘數(shù)、外循環(huán)變量作為乘數(shù)，內(nèi)循環(huán)每執(zhí)行一輪換一次乘數(shù)。使用Document.Write("<BR>")控制換行。7.3程序流程控制<HTML><HEAD><TITLE>例7-13</TITLE></HEAD><BODY><pre><FONTFACE="黑體"SIZE="4"COLOR="red">

九九乘法表</FONT><BR><SCRIPTtype="text/VBScript">Dimi,jdocument.Write("<BR>")'換行

Fori=1To9 '九行

Forj=1To9'九列

ifi*j<=9thendocument.Write(j&"*"&i&"="&j*i&"")elsedocument.Write(j&"*"&i&"="&j*i&"")endifNextdocument.Write("<BR>")'換行

Next</SCRIPT></pre></BODY></HTML>7.3程序流程控制（3）利用循環(huán)實現(xiàn)累加和連乘的計算

在循環(huán)程序中，常用的算法是累加和連乘。累加（如s=s+k）是在原有和的基礎(chǔ)上每次再加一個數(shù)，連乘（c=c*k）則是在原有積的基礎(chǔ)上每次再乘一個數(shù)。例7-14計算s=1+2+3+…+10的值。程序代碼如下：<HTML><HEAD><TITLE>例7-14</TITLE></HEAD><BODY><SCRIPTTYPE="text/VBScript">Dims,ks=0 '累加器清0

Fork=1To10s=s+k '累加

Next document.write("s="&s) </SCRIPT></BODY></HTML>如果要計算的是s=1+2+3+…+n，則程序結(jié)構(gòu)不用改變，只需將上述程序代碼中的終值10改為n就可以了。7.3程序流程控制

s=0'累加器初值為0

Fork=1To10s=s+k'累加器，在原有和的基礎(chǔ)上每次加一個數(shù)

NextDocument.Write("s="&s)

程序執(zhí)行結(jié)果是：s＝55

分析例7-14累加器

s=s+k舊值。前n項之和新加的數(shù)k=1s←s+k01k=3s←s+k1+23k=2s←s+k12k=8s←s+k1+2+…78……例7-15計算s=1×2×3×…×10的值。程序代碼如下：<HTML><HEAD><TITLE>例7-15</TITLE></HEAD><BODY><SCRIPTTYPE="text/VBScript">Dimk,cc=1

'置初值

Fork=1To10c=c*k'累乘

Next document.write("c="&c) </SCRIPT></BODY></HTML>語句c=c*k起連乘的作用。在連乘之前，必須先將c置1（不能置0）。顯然，上述程序若把循環(huán)終值改為n，也可以計算n項連乘的情況。7.3程序流程控制

t=1'累乘器初值為１

Forc=1To10t=t*c'累乘器，在原有積的基礎(chǔ)上每次乘一個數(shù)

NextDocument.Write("T="&t)

程序執(zhí)行結(jié)果是：T＝3628800

分析例7-15c=1t←t*c11c=3t←t*c1*23c=2t←t*c12c=8t←t*c1*2*…78……累乘器

t=t*k舊值。前n項之積新乘的數(shù)2.

Do…Loop語句可以使用Do…Loop語句多次（次數(shù)不定）運行語句塊。當(dāng)條件為True時或條件變?yōu)門rue之前，重復(fù)執(zhí)行語句塊。

常用語法格式：DoWhile條件循環(huán)體Loop或：Do循環(huán)體LoopWhile條件7.3程序流程控制功能：根據(jù)條件重復(fù)執(zhí)行循環(huán)體中的一組語句。第一種語句格式首先判斷條件，如果條件為真，則執(zhí)行循環(huán)體，否則循環(huán)結(jié)束。因此，如果一開始條件就不滿足，循環(huán)體可能一次也不執(zhí)行；第二種語句格式先執(zhí)行循環(huán)體，然后再判斷條件，如果為真，則繼續(xù)執(zhí)行循環(huán)體，否則循環(huán)結(jié)束。因此，第二種語句格式最少執(zhí)行循環(huán)體一次。例7-16檢查用戶密碼輸入是否正確。如果輸入錯誤超過三次，將結(jié)束程序。代碼編寫如下：<HTML><HEAD><TITLE>例7-16</TITLE></HEAD><BODY><SCRIPTtype=“text/VBScript”>DimPassword,CounterConstP=“123456”Counter=1DoWhileCounter<4Password=inputbox(“請輸入六位密碼：”,”密碼輸入”)

IfPassword=PthenMsgbox(“恭喜您，密碼正確！”)Exitdo

Else

Msgbox(“對不起。密碼錯誤！”Counter=Counter+1

EndIfLoopIfCounter=4thenMsgBox"抱歉，您今日的輸入次數(shù)已達到3次，請明日再試，謝謝參與！"Endif

</SCRIPT></BODY>

</HTML>7.3程序流程控制VBScript程序設(shè)計概述7.1VBScript編程基礎(chǔ)7.2程序流程控制7.3過程7.4提綱事件處理7.5程序調(diào)試7.6過程是完成某種特殊功能的一組獨立的程序代碼。過程有兩個重要作用：一是把一個復(fù)雜的任務(wù)分解為若干個小任務(wù)，可以用過程來表達，從而使任務(wù)更易理解，更易實現(xiàn)和維護；二是代碼重用，使同一段代碼可以重復(fù)使用。在VBScript中，過程分為兩類：Sub過程和Function過程。7.4.1Sub過程

Sub過程是包含在Sub和EndSub語句之間的一組VBScript語句。使用Sub過程的方式，首先是用Sub…EndSub定義過程，然后用Call語句調(diào)用該過程。7.4過程1.定義Sub過程定義Sub過程的語句格式如下：

Sub過程名([參數(shù)表])過程體

EndSub

Sub過程可以帶參數(shù)（也稱形式參數(shù)或形參），參數(shù)的實際值（也稱實際參數(shù)或?qū)崊ⅲ┯烧{(diào)用程序在調(diào)用過程時賦給。通過參數(shù)，調(diào)用程序和被調(diào)用過程之間可以傳遞數(shù)據(jù)。如果Sub過程無任何參數(shù)，Sub語句也必須包含空括號()。為使程序結(jié)構(gòu)清晰和便于調(diào)用，VBscript中通常把Sub過程安排在頭部（HEAD）中。7.4過程

對于重復(fù)使用的程序段，為了避免程序代碼的重復(fù)，可以把這一程序段獨立出來，編成一個過程。當(dāng)程序需要執(zhí)行這個任務(wù)時，可使用調(diào)用語句(如Call)實行調(diào)用。子過程執(zhí)行完后，會返回調(diào)用程序中的調(diào)用語句Call的后續(xù)語句繼續(xù)執(zhí)行。

過程調(diào)用示例

調(diào)用過程

……CallSubA……CallSubA……過程SubA使用過程……程序段程序段……相同處理的程序段可編成獨立的過程（如SubA）2.調(diào)用Sub過程當(dāng)程序中需要執(zhí)行Sub過程時，可以使用Call語句實現(xiàn)調(diào)用。如果Sub過程有參數(shù)，必須輸入過程名及所有參數(shù)值，參數(shù)值之間使用逗號分隔，所有參數(shù)包含在括號之中。其語句格式如下：Call過程名([實參表])例7-17使用Sub過程實例。程序代碼如下：<HTML><HEAD><TITLE>例7-17</TITLE><SCRIPTtype=“text/VBScript”>

Subputname(name) '定義過程

Document.Write(name&“,”&“您好！<BR>”)

EndSub</SCRIPT></HEAD><BODY><SCRIPTtype=“text/VBScript”>Dimnn=InutBox(“請輸入姓名：”)Callputname(n) '調(diào)用過程

Document.Write(“祝您身體健康！”)

</SCRIPT></BODY>

</HTML>7.4過程7.4.2Function過程

Function過程是包含在Function和EndFunction語句之間的一組VBScript語句。Function過程與Sub過程類似，但是Function過程可以返回值。即使Function過程無任何參數(shù)，F(xiàn)unction語句也必須包含空括號()。Function過程通過函數(shù)名返回一個值，這個值是在過程的語句中賦給函數(shù)名的。

在下面的示例中，Celsius函數(shù)將華氏度換算為攝氏度。Sub過程ConvertTemp調(diào)用此函數(shù)時，包含參數(shù)值的變量被傳遞給函數(shù)。換算結(jié)果返回到調(diào)用過程并顯示在消息框中。SubConvertTemp()temp=InputBox("請輸入華氏溫度。",1)

MsgBox"溫度為"&Celsius(temp)&"攝氏度。"EndSubFunctionCelsius(fDegrees)Celsius=(fDegrees-32)*5/9EndFunction

調(diào)用Function過程時，函數(shù)名必須用在變量賦值語句的右端或表達式中。7.4過程VBScript程序設(shè)計概述7.1VBScript編程基礎(chǔ)7.2程序流程控制7.3過程7.4提綱事件處理7.5程序調(diào)試7.67.5.1事件的概念

事件（Event）是指由系統(tǒng)事先設(shè)定的、能被對象識別和響應(yīng)的動作。當(dāng)對象發(fā)生了某個事件，就會執(zhí)行與此對象的這個事件相應(yīng)的代碼，這段代碼被稱為“事件過程”。事件的發(fā)生多數(shù)與鼠標(biāo)的使用有關(guān)，如單擊（Click）、雙擊（DbClick）、移動到上面（MouseOver）、離開（MouseOut）等。每個對象都有自己所能識別的事件。7.5事件處理VBScript是采用事件驅(qū)動編程機制的語言。在事件驅(qū)動編程中，程序員只要編寫響應(yīng)用戶動作的程序，如選擇命令、移動鼠標(biāo)等，而不必考慮按精確次序執(zhí)行的每個步驟。在事件驅(qū)動的應(yīng)用程序中，代碼不是按照預(yù)定的路徑執(zhí)行，而是在響應(yīng)不同的事件時執(zhí)行不同的代碼片段。事件可以由用戶操作觸發(fā)，也可以由來自操作系統(tǒng)或其它應(yīng)用程序的消息觸發(fā)，甚至由應(yīng)用程序本身的消息觸發(fā)。這些事件的順序決定了代碼執(zhí)行的順序，因此應(yīng)用程序每次運行時所經(jīng)過的代碼的路徑都是不同的。在這種機制下，不必編寫一個大型程序，而是建立一個由若干個微小程序組成的應(yīng)用程序，這些微小程序都可以由用戶啟動的事件來激發(fā)。利用VBScript，可以方便地編寫此類應(yīng)用程序。7.5事件處理7.5.2鼠標(biāo)事件鼠標(biāo)事件是VBScript編程中最常用到的事件，多數(shù)控件都支持鼠標(biāo)操作，因此對鼠標(biāo)事件進行編程是非常重要的。鼠標(biāo)事件主要有以下幾種：Click：單擊事件，即單擊鼠標(biāo)時發(fā)生的事件。DblClick：雙擊事件，即雙擊鼠標(biāo)時發(fā)生的事件。MouseDown：鼠標(biāo)按下時發(fā)生的事件。MouseUp：鼠標(biāo)抬起時發(fā)生的事件。MouseMove：鼠標(biāo)移動時發(fā)生的事件，當(dāng)鼠標(biāo)移過此控件時就會觸發(fā)此事件，執(zhí)行其相應(yīng)代碼。鼠標(biāo)事件的發(fā)生順序是：(1)首先發(fā)生的是MouseMove事件，當(dāng)鼠標(biāo)移動時，將會連續(xù)觸發(fā)MoouseMove事件。(2)當(dāng)鼠標(biāo)按下時發(fā)生MouseDown事件。(3)鼠標(biāo)松開時發(fā)生MouseUp事件。(4)如果按住的是鼠標(biāo)左鍵，則Click事件在MouseUp之后發(fā)生。在上面所列出的這些事件中，最常用到的是Click事件和DblClcik事件7.5事件處理7.5.3鍵盤事件鍵盤事件是在鍵盤的某個鍵按下去時觸發(fā)。除了鼠標(biāo)事件外，通常需要對鍵盤事件進行編程。鍵盤事件主要有以下幾種：(1)KeyDown：當(dāng)鍵盤上某鍵被按下去時發(fā)生。(2)KeyUp：鍵盤上的鍵抬起來時發(fā)生。(3)KeyPree：此事件發(fā)生在鍵盤被按下后和字符被顯示出來之前發(fā)生。對于鍵盤事件，相對來說KeyDown事件和KeyUp事件使用比較少，通常情況下對KeyPress事件編程較多，因為此事件注重鍵盤被按下的是哪個鍵。KeyPress事件定義如下：PrivateSubTextl_KeyPress(KeyAsciiAsInteger)

語句塊EndSub其中，參數(shù)KeyAscii被定義為整型變量，表示被按下去鍵的Ascii碼，可以通過對變量KeyAscii值的判斷來執(zhí)行一些特殊操作。7.5事件處理7.5.4動態(tài)網(wǎng)頁編程方法在VBScript中，通過調(diào)用事件過程可以實現(xiàn)網(wǎng)頁的動態(tài)編程。調(diào)用事件過程的方法有多種，其中比較常用的一種，是通過過程名調(diào)用事件過程在Script標(biāo)記內(nèi)用Sub語句定義事件過程，并且要求過程名稱必須由對象名稱、下劃線（＿）以及事件名稱組合而成。例7-18編寫程序，在網(wǎng)頁上設(shè)置2個命令按鈕和一個文字塊（即文字“VBScript程序設(shè)計”）。打開網(wǎng)頁后，當(dāng)單擊“文字變大”命令按鈕時，文字塊的字體變大；單擊“文字變小”命令按鈕時，文字塊的字體變小。7.5事件處理<html><head><title>例7-18</title><SCRIPTTYPE="text/VBScript">subbutt1_OnClick() '命令按鈕butt1的單擊事件處理過程

Ifmyfont.size<

溫馨提示

  • 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)方式做保護處理，對用戶上傳分享的文檔內(nèi)容本身不做任何修改或編輯，并不能對任何下載內(nèi)容負責(zé)。
  • 6. 下載文件中如有侵權(quán)或不適當(dāng)內(nèi)容，請與我們聯(lián)系，我們立即糾正。
  • 7. 本站不保證下載資源的準(zhǔn)確性、安全性和完整性, 同時也不承擔(dān)用戶因使用這些下載資源對自己和他人造成任何形式的傷害或損失。

最新文檔

評論

0/150

提交評論