3_4.迴圈控制指令

VBScript的迴圈與QB的迴圈幾乎沒有兩樣,下列分別列示五種迴圈的用法

1.【條件為真則執行迴圈】
While 條件運算式
     指令區塊
Wend

2.【條件為真則執行迴圈】
DO WHILE 條件運算式
       指令區塊
LOOP

範例功能:計算1到100的數值總和。
範例說明:i變數初值為1用以產生1至100的數值,sum初值為0用以將i變數的值(1至100)累加起來,用while命令使i變數的值在100以內時繼續增加1並且將i變數累加至sum變數。
<script language="vbscript">
i=1 
sum=0 
while i<=100 
    sum=sum+i 
    i=i+1 
wend 
msgbox "結果為" & sum                    
</script>
3.【執行迴圈後,當條件為真時繼續執行迴圈】
DO
      指令區塊
LOOP WHILE
條件運算式

4.【條件為真時跳出迴圈】
DO UNTIL 條件運算式
      指令區塊
LOOP

5.【執行迴圈後,當條件為真時跳出迴圈】
DO
     指令區塊
LOOP UNTIL 
條件運算式

6.【執行迴圈,迴圈次數依變數的值由初值增加到終值來決定】
For 變數=初值 to 終值 [step 間隔值]
      指令區塊
NEXT
範例功能:計算1到100的數值總和。
範例說明:sum變數存放總和,剛開始將sum變數設初值為0,利用for/next產生1至100的數值並累加於sum變數。
<script language="vbscript">
sum=0     
for i=1 to 100     
    sum=sum+i     
next   
msgbox "答案是" & sum     
</script>

7.【執行迴圈時,當執行此命令可跳離迴圈】
EXIT FOR 指令。

8.【自定函數】
Function 函數名稱(宣告參數資料型別)
   指令區塊
End Function