Ciao a tutti, rieccomi dopo un po di tempo a rifare guide sul visual basic 6.
In questa lezione vi spiego come utilizzare l'inputbox, il ciclo "do-loop until", le variabili accumulatrici e quelle contatore.
InputBoxL'inputbox è quella funzione che fa apparire una finestra di dialogo che permette di inserire un valore, è la classica finestra con una textbox, un pulsante "ok" e un pulsante "annulla".
Do-Loop UntilQuesto ciclo permette di eseguire più volte delle istruzioni fino a che la condizione non diventa vera.
La sintassi è:
Do
istruzioni
Loop Until condizione
Quindi il programma appena arriva alla riga con scritto "do" eseguirà tutte le istruzioni, quando poi arriverà alla riga "loop until" verifica se la condizione è vera o meno.
Se la condizione è vera, il programma proseguirà con le istruzioni successive, se invece la condizione è falsa, il programma tornerà alla riga "do".
AccumulatricePer prima cosa definiamo questi due tipi di variabili:
- Le variabili accumulatrici sono quelle variabili che immagazzinano tutti i valori inseriti per esempio durante un ciclo, per una stessa variabile oppure più variabili.
ContatoreLa variabile contatore è quella variabile che ci permette di memorizzare il numero di valori inseriti per una certa variabile, o più variabili.
[Esempio in basso]
Esempio:
CODICE
dim prezzo, prezzototale, mediaprezzi as currency
dim numeromacchine as integer
dim modello as string
Private sub cmdcalcola_click()
do
modello = inputbox("Inserisci il modello dell'auto","modello")
prezzo =val(Inputbox("Inserisci il prezzo","Prezzo"))
numeromacchine = numeromacchine + 1 'contatore
prezzototale = prezzototale + prezzo 'accumulatore
rirposta = inputbox("Uscire?","Uscire?")
loop until risposta = "si"
mediaprezzi = prezzitotali / numeromacchine
lblrisultato.caption = prezzototale
lblmedia.caption = mediaprezzi
End Sub
Andiamo ad analizzare l'esempio precedente.
1- Abbiamo dichiarato le variabili di facile comprensione visto i nomi;
2- Abbiamo aperto l'evento "cmdcalcola_click()"
3- Abbiamo inserito il ciclo "Do-Loop Until" quindi dentro le istruzioni;
4- Abbiamo inserito la variabile contatore "numeromacchine". Inizialmente, la prima volta che si esegue il ciclo, la variabile ha come valore 0, quindi la riga:
numeromacchine = numeromacchine + 1 è uguale a dire 0 = 0 + 1 . La seconda volta che si esegue il ciclo sarà 1 = 1 + 1 e così via.
5- Abbiamo inserito la variabile accumulatrice "prezzototale". Inizialmente, la prima volta che si esegue il ciclo, ha come valore 0 e mano a mano che si inseriscono i valori alla variabile "prezzo", vanno a sommarsi alla variabile "prezzototale", per esempio: 0 = 0 + 15000 la seconda volta diventerà 15000 = 15000 + 20000 e così via.
6- Abbiamo inserito la condizione (risposta = inputbox...) che ci permetterà di uscire dal ciclo.
7- Diciamo al programma di prendere in considerazione la condizione, quindi se è vera esce dal ciclo, se è falsa ritorna alla riga "Do" (come sopra citato).
8- Abbiamo messo fine all'evento che abbiamo aperto prima, quindi private sub cmdcalcola_click()
Per errori, chiarimenti, commenti ed altro rispondere al topic.
Buona lezione