Page 18 - eFC10810_程式語言與設計(下)_課本PDF
P. 18
2. 快按按鈕物件兩下，在 Button1_Click 事件中輸入下列程式碼。
Private Sub Button1_Click(…) Handles Button1.Click
Dim t, n As Integer
t = 0
n = 0
5
重複結構 For x = 1 To 99 Step 2
t = t + x ^ 2
n = n + 1
Next x
Label8.Text = n
Label10.Text = t
End Sub
6
3. 執行程式，按「計算」鈕，顯示造林天數及造林總數。
陣列
7
函式
與副程式
8
綜合應用
8
'$ $) JOEE
