Come utilizzare i cicli in VB6

June 29

Capire come i cicli di lavoro in Visual Basic 6 (VB6) è importante perché permette di eseguire blocchi di codice più volte. I due principali tipi di loop sono "per" e "fanno" loop. A "per" loop è una versione abbreviata di un loop "do" che viene utilizzato quando il numero di iterazioni è noto in anticipo. Alcuni usi di un ciclo sono la lettura in linee da un file, stampa il nome di tutti da un elenco dei dipendenti e l'ordinamento attraverso un allineamento alla ricerca di un valore specifico.

istruzione

1 Aprire il file di origine in Visual Basic 6.

2 Aggiungere un ciclo "for" digitando il seguente codice nella funzione:

Dim X As Integer

conteggio Dim As Integer

x = 0

Per count = 1 a 6 Fase 2

X = X + 2

Il prossimo

A "a" ciclo consiste di un contatore, l'intervallo del contatore, un passo e comandi da eseguire durante ogni iterazione. L'argomento "step" definisce quanto il contatore aumenta tra le iterazioni. Se si omette la parola chiave "step" è impostato al valore predefinito di 1. Nel esempio, durante la prima iterazione, "conteggio" è uguale a 1 e "X" è impostato su 2 (0 + 2). Sulla ripetizione secondo "conteggio" è impostato a 3 e "X" è impostato su 4 (2 + 2).

Se si desidera ciclo in un elenco, invece, aggiungere il seguente codice:

MyColors Dim (2) come String

colore Dim come stringa

MyColors (0) = "Blue"

MyColors (1) = "verde"

MyColors (2) = "Giallo"

Per ogni colore In MyColors

colore Debug.Print

Il prossimo

I itera ciclo per ogni valore nella lista, che in genere è una matrice o collezione. La variabile iterazione, "colore" deve essere dello stesso tipo degli elementi nella lista.

3 Aggiungere un loop "do" digitando il seguente codice:

Dim X as Integer

x = 0

Do While X <10

X = X + 2

Ciclo continuo

Il ciclo continua iterazione mentre la condizione dopo la parola chiave "Do" è soddisfatta. La condizione viene verificata all'inizio prima di ogni nuova iterazione. In alternativa, è possibile impostare per iterare fino a quando una condizione è soddisfatta aggiungendo il seguente codice:

Fare

X = X + 2

Loop Fino X> 10

In un "loop fino" strutturare la condizione viene verificata dopo la fine di ogni iterazione. Se si vuole uscire dal ciclo prima che la condizione è soddisfatta, aggiungere "Exit Do" all'interno del ciclo.

4 Salvare il file VB6, compilare ed eseguire il programma per visualizzare il loop.