For...Next迴圈

'FOR...NEXT Statements
'   You can use this to execute a block of codes, when you know how many repetitions you want.
'   it loops a group of statements a specified number of times
'   The general form is
'   For [variable] = [start] to [end] Step [step]
'       [statements]
'       Next
'       [statements]

Sub Main()
   
Dim Index As Byte
   
Dim Sum As Byte
   
    Sum=
0
   
For Index = 1 To 10 Step 1
    Sum+=Index                     
'Add each integer from 1 to 10
    Next
   
Debug "1+2+...+10=", Sum
   
End Sub