Las estructuras de control permiten tomar decisiones y realizan procesos repetidas veces. Visual Basic dispone de las siguientes estrucutras:
If...  Then...  Endif
Select Case
Do ...  Loop
For ....   Next
Procedimiento en donde se aplica la estructura Do Loop y For
Sub Form_Click( )
  Dim I As Integer, Suma As Integer
  I = 1
     Do While I <=  99
       Suma = Suma + I
     Loop
     Print Suma
End Sub
Sub Form_Click(  )
     Dim I As Integer, Suma As Integer
     For I = 1 To 99 Step 2
          Suma = Suma + I
     Next I
     Print Suma
End Sub
