Ripetizione di azioni: utilizzo di un ciclo For...Next
Aggiornamento: novembre 2007
In questa lezione verrà descritto come utilizzare l'istruzione For...Next per ripetere azioni nel programma e contare il numero di esecuzioni.
Quando si scrive un programma, spesso è necessario ripetere alcune azioni. Si supponga ad esempio di scrivere un metodo per la visualizzazione di una serie di numeri. Si desidera ripetere la riga di codice per la visualizzazione dei numeri tutte le volte necessarie.
Il ciclo For...Next consente di specificare un numero e di ripetere il codice contenuto nel ciclo per il numero di volte specificato. Nell'esempio riportato di seguito viene illustrato come appare nel codice un ciclo For...Next.
Dim i As Integer = 0
For i = 1 To 10
DisplayNumber(i)
Next
Il ciclo For...Next ha inizio con una variabile contatorei. Questa variabile viene utilizzata dal ciclo per contare il numero di esecuzioni. La riga successiva (For i = 1 to 10) indica al programma il numero di ripetizioni del ciclo e i valori da utilizzare per i.
Quando il codice avvia il ciclo For...Next, inizia con la variabile i impostata sul primo valore (in questo caso 1). Il programma quindi esegue le righe di codice tra For e Next, ovvero in questo caso la chiamata del metodo DisplayNumber con un parametro i (in questo caso sempre 1).
Quando viene raggiunta la riga Next, viene aggiunto 1 alla variabile contatore i e l'esecuzione del programma riprende dalla riga For. Questo processo si ripete fino a quando il valore di i è più grande del secondo numero nella riga For, in questo caso 10. A questo punto il programma prosegue con l'esecuzione del codice che segue la riga Next.
Procedura
Per utilizzare l'istruzione For...Next
Scegliere Nuovo progetto dal menu File.
Nel riquadro Modelli della finestra di dialogo Nuovo progetto fare clic su Applicazione Windows.
Digitare ForNext nella casella Nome, quindi scegliere OK.
Verrà aperto un nuovo progetto Windows Form.
Dalla Casella degli strumenti trascinare un controllo TextBox e un controllo Button nel form.
Fare doppio clic sul controllo Button per aprire l'editor di codice.
Nel gestore eventi Button1_Click digitare il seguente codice:
Dim i As Integer = 0 Dim NumberOfRepetitions As Integer = CInt(Textbox1.Text) For i = 1 To NumberOfRepetitions MsgBox("This line has been repeated " & i & " times") NextPremere F5 per eseguire il programma.
Digitare un numero nella casella di testo, quindi fare clic sul pulsante.
Una finestra di messaggio verrà visualizzata il numero di volte indicato nella casella di testo.
Passaggi successivi
In questo argomento è stato descritto come utilizzare il ciclo For...Next per ripetere codice per un numero di volte specificato. A questo punto è possibile proseguire con la lezione successiva della serie Scelta tra due possibilità: istruzione If...Then oppure analizzare un altro tipo di ciclo in Informazioni dettagliate: utilizzo di Do...While e Do...Until per la ripetizione di codice in base a una particolare condizione.
Vedere anche
Attività
Scrittura di una routine per l'esecuzione di un'azione