Vistas de página en total

jueves, 19 de abril de 2012

ESTRUCTURAS DE C O N T R O L


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