Ripetere le azioni con i cicli

    Nei programmi spesso è necessario svolgere molte volte una determinata azione, variando solamente alcuni parametri. I comandi descritti in questa sezione eseguono ripetutamente le stesse istruzioni, finché non si verifica una determinata condizione.
    Il ciclo "For.. Next" esegue ripetutamente un blocco di codice incrementando (o decrementando) una variabile specifica, finche l'indice non raggiunge il valore indicato dall'attributo "To". Esempio:
    	Sub CicloFor()
        	   For i = 1 To 10
            	MsgBox "Il valore incremento è " & i, _ 
    		vbInformation, "Ciclo For"
        	   Next
    	End Sub
    	
    Ora prova a sostituire la riga
    "For i = 1 To 10"
    con
    "For i = 10 To 1 step -1"
    Il ciclo "Do… loop" continua ad eseguire il codice fino a quando non è soddisfatta una condizione. Se non viene specificata una condizione d’interruzione, o se la condizione non è impostata in modo non corretto, il ciclo continua all’infinito.
    Esistono tre tipologie di ciclo "Do":
    • Ripeti finchè la condizione non risulta falsa (cicla per falso).
      	Sub CicloDo()
          	   i = 1
          	   Do
              	MsgBox "Il valore incremento è " & i, _ 
      		vbInformation, "Ciclo For"
              	i = i + 1
          	   Loop Until i > 10
      	End Sub
      	
    • Ripeti finchè la condizione non risulta vera (cicla per vero).
      	Sub CicloDo()
      	    i = 1
      	    Do While i < 10
      	        MsgBox "Il valore incremento è " & i, _ 
      		vbInformation, "Ciclo For"
      	        i = i + 1
      	    Loop
      	End Sub
      	
    • Uscita anticipata dal ciclo:
      	Sub CicloDo()
      	    i = 1
      	    Do
      	        MsgBox "Il valore incremento è " & i, _ 
      		vbInformation, "Ciclo For"
      	        i = i + 1
      	        If i > 10 Then Exit Do
      	    Loop
      	End Sub