繼上一篇我們學習了腳本語言 VBScript 的函數和條件語句后,今天我們繼續來看看VBScript 中的循環語句。
循環語句的作用就是重復執行程序代碼,循環可分為三類:一類在條件變為“假”之前重復執行語句,一類在條件變為“真”之前重復執行語句,另一類按照指定的次數重復執行語句。在VBScript 中可使用下列循環語句:
Do...Loop: 當(或直到)條件為“真”時循環。
While...Wend: 當條件為“真”時循環。
For...Next: 指定循環次數,使用計數器重復運行語句。
For Each...Next: 對于集合中的每項或數組中的每個元素,重復執行一組語句。 我們先來看看 Do...Loop,它是可以多次(次數不定)運行語句塊。當條件為“真”時或條件變為“真”之前,重復執行語句塊。請看下例:
< html>< head>< title>DoLoop.asp< /title>< body bgcolor="#FFFFFF">< /head>< p>< /p>< p> 請將今年到本月為止的每個月份的銷售結算記錄填寫在本頁之上。< P> < % counter = 1thismonth = month(now())Do while counter < thismonth + 1response.write " " & counter & " 月份 : "response.write "______________________________" & "< BR>< br>"If counter >13 then exit do end if counter = counter+1Loop %> < hr>< /body>< /html>
這段 ASP 程序運用循環語句制作了一張銷售結算記錄表,將以上代碼剪貼至記事簿保存為 DoLoop.asp,并在瀏覽器中以 HTTP 方式進行瀏覽,根據當前的月份的不同,你將看到如下圖的結果。
<img src='http://arch.pconline.com.cn/pcedu/empolder/wz/asp/10111/pic/2001124_asp_11.gif'>
我們來分析一下此段程序,我們的目的是要根據當前的月份打印一張表格,首先我們建立一個計數器“count”并將其值設為 1,然后我們用函數 month() 和 now() 得到當前的月份,最后建立循環,當 count 的值小于當前月份的值加 1 的時候,即顯示月份值及一條橫線并將 count 的值加 1,循環語句重復執行直到以上條件為假時退出循環。其中如果 count 大于 13 則用 exit do 立即退出循環。
Do Loop 語句還可以使用以下語法:
Do
[statements][Exit Do]
[statements]Loop [{While | Until} condition]
While...Wend 語句是為那些熟悉其用法的用戶提供的。但是由于 While...Wend 缺少靈活性,所以建議最好使用 Do...Loop 語句。下面我們來看看 For Next 語句。For...Next 語句用于將語句塊運行指定的次數,在循環中使用計數器變量,該變量的值隨每一次循環增加或減少。
下面的示例將過程 MyProc 重復執行 50 次。For 語句指定計數器變量 x 及其起始值與終止值。Next 語句使計數器變量每次加 1。
新聞熱點
疑難解答