Page 17 - eFC10810_程式語言與設計(下)_課本PDF
P. 17
例 2：（增值為負數）
Dim j As Integer 執行結果
每一次減 2
For j = 10 To 1 Step -2 j = 10
Debug.WriteLine("j=" & j) j = 8
Next j j = 6
5
Debug.WriteLine(" 跳出迴圈時的 j 值為 " & j) j = 4
重複結構
j = 2
跳出迴圈時的 j 值為 0
2 增值為 1 時，Step 可以省略。Next 後之控制變數可以省略。
例 2：（增值為正數）
Dim Sum, i As Integer 執行結果
Sum = 0 Sum 為 1 加到 10 的總和 =55
For i = 1 To 10
累加
6
Sum += i
陣列
Next
程式打卡 1
新增一個「Windows Form 應用程式」，檔案名稱命名為「造林運動」。
動作要求：
‧ 每天依序 1 平方、3 平方、5 平方…的速度造林，計算至 99 平方時的造林天數
7
及造林總數。
函式
與副程式
1. 表單佈置如圖所示。
8
綜合應用
7
'$ $) JOEE
