In questa lezione vi spiegherò la struttura alternativa chiamata "if".
La struttura è molto semplice e si presenta così:
CODICE
se(condizione è vera) allora
istruzioni
altrimenti
istruzioni
fine se
Tradotta in linguaggio visual basic si scrive:
CODICE
if(condizione è vera) then
istruzioni
else
istruzioni
end if
Adesso faremo un esercizio di prova della struttura if.
Prepariamo il form in questo modo:
Adesso facendo doppio click sul commandbutton "Calcola" vi si apre la finestra del codice dove andremo a scrivere:
CODICE
private sub cmdcalcola_click()
if(val(txtquantità.text) <= 100)then 'se il valore di txtquantità.text è minore o uguale a 100
txtrisultato.text = val(txtquantità.text) * val(txtprezzo.text) - (val(txtquantità.text) * val(txtprezzo.text) * 0.05)
' txtrisultato.text = valore di txtquantità.text * valore di txtprezzo.text - e poi calcoliamo lo sconto del 5%
else 'se no
txtrisultato.text = val(txtquantità.text) * val(txtprezzo.text) - (val(txtquantità.text) * val(txtprezzo.text) * 0.10)
'uguale a quello di prima solo che esegue lo sconto del 10%
end if 'fine se
end sub
La traduzione in italiano sarebbe:
CODICE
private sub cmdcalcola_click()
se(quantità <= 100) allora
risultato = quantità * prezzo - (quantità * prezzo * 0.005)
se no
risultato = quantità * prezzo - (quantità * prezzo *0.10)
fine se
end sub
Qui finisce la lezione sulla struttura alternativa, per domande rispondere nel topic