OpenOffice.org BASIC Guide - OpenOffice.org wiki

Case Else
' ... all other instances
End Select
Branching
The statement (Var = 8) evaluates to TRUE if Var is 8, and FALSE otherwise. TRUE is -1 and FALSE is 0. The
Select Case statement evaluates the expression, which is TRUE or FALSE, and then compares that value to Var.
When Var is 0, there is a match. If you understand the last example, then you also know why this example does
not do what it appears
Select Case Var
Case Var > 8 And Var < 11
' ... Var is 0
Case Else
' ... all other instances
End Select
Loops
A loop executes a code block for the number of passes that are specified. You can also have loops with an
undefined number of passes.
For...Next
The For...Next loop has a fixed number of passes. The loop counter defines the number of times that the loop
is to be executed. In the following example, variable I is the loop counter, with an initial value of 1. The counter
is incremented by 1 at the end of each pass. When variable I equals 10, the loop stops.
Dim I
For I = 1 To 10
' ... Inner part of loop
Next I
If you want to increment the loop counter by a value other than 1 at the end of each pass, use the Step function:
Dim I
For I = 1 To 10 Step 0.5
' ... Inner part of loop
Next I
In the preceding example, the counter is increased by 0.5 at the end of each pass and the loop is executed 19
times.
You can also use negative step values:
Dim I
For I = 10 To 1 Step -1
' ... Inner part of loop
Next I
In this example, the counter begins at 10 and is reduced by 1 at the end of each pass until the counter is 1.
The Exit For instruction allows you to exit a For loop prematurely. In the following example, the loop is
terminated during the fifth pass:
Dim I
For I = 1 To 10
If I = 5 Then
Exit For
End If
' ... Inner part of loop
Next I
For Each
The For Each...Next loop variation in VBA is supported in OpenOffice.org Basic. For Each loops do not
Chapter 2 · The Language of OpenOffice.org BASIC 25