Post on 27-Jun-2015
Presentazione di Visual Basic
Di
D’avino Mariangela
classe 3c Mercurio
ESERCIZIO 50 PAG 301
Prima di ogni altra cosa bisogna leggere attentamente il testo dell’esercizio che ci viene dato e capire quali sono i dati output e i dati input.
PROBLEMA:
Dati N modelli di ciclomotori e motocicli (nome del modello, cilindrata, prezzo); visualizzare il prezzo massimo tra i modelli di cilindrata superiore a 50cc.ù
DATI INPUT: numero modelli, nome del modello,cilindrata,prezzo.
DATI OUTPUT: prezzo massimo tra i modelli di cilindrata superiore a 50cc
IMPORTANTE!
A questo punto possiamo iniziare a descrivere le variabili dividendole per tipo e se sono di lavoro o di input oppure di output. Dopo aver fatto la descrizione troviamo un altro passaggio che prende il nome di pseudocodice oppure possiamo fare il diagramma a blocchi che in pratica e la stessa cosa poi sta a voi decidere con quale dei due vi trovate bene. Però prima di passare alla traduzione in VISUAL BASIC dello pseudocodice dobbiamo fare SEMPRE la verifica che serve appunto per verificare se lo pseudocodice torna oppure No.
DESCRIZIONE DELLE VARIABILI:
VARIABILE CONTENUTO TIPO I/O/L
N n° modelli Num I
NM Nome modello Alfa I
CC cilindrata Num I
P prezzo Num I
CONT contatore Num L
PM Prezzo massimo Num O
CONTM Contatore massimo Num L
INIZIOLeggi(N) CONT=O CONTM=O RIPETI
Leggi(NM;CC;P)CONT=CONT+1 SE CC>50 allora CONTM=CONTM+1
SE CONTM=1 alloraPM=P
ALTRIMENTISE P>PM allora PM=PFINE SE
FINE SE FINE SE
FINO A CHE CONT=N SCRIVI (PM)FINE
INIZIO
N
CONT=OCONTM=0
CC>50 CONTM=CONTM+1
CONTM=1
P=PM
V
V
VF
F
PM>P
PM=P
NM,CC,P
CONT=CONT+1
PSEUDOCODICE &
DIAGRAMMA A BLOCCHI
CONT=N
PM
FINE
V
FF
ED ORA INIZIEREMO A RIPORTARE TUTTO IN
VISUAL BASIC
(NAME)= txtN
(NAME)=cmdpremiqui
CAPTION= Premi qui
(NAME)= lblnunerodeimodelli
CAPTION= Numero modelli
INZIAMO A SVOLGERE IL NOSTRO PROGRAMMA PARTENDO DALLA CLASSIFICAZIONE DELLE DIMENSIONI DELLE VARIABILI
CMDPREMIQUI e il tasto del commad,questo tasto serve al programma a capire che quando pigiamo li deve partire il programma
Per dichiarare le variabile bisogna mettere su (generale) infatti nella finestrina accanto appare scritto dichiarazioni.
Le dichiarazioni di variabili vanno messe sempre PRIMA del PrivaTe sub ovvere del commad
CREAZIONE DEL CODICE
Private sub CMDPREMIQUI_click
‘Azzeramento delle variabili
In questo caso alla variabile N non dobbiamo aggiungere VAL perché è già di tipo numero, se fosse alfenumerico allora mettiamo VAL
CONT=0 CONTM=0 N= txtN.text‘inizio ciclo
DO
LOOP UNTIL
Inserimento del ciclo
DO sta per la parola RIPETI
LOOP UNTIL sta per FINO A CHE
‘CICLO
Dati input che si trovano all’interno del ciclo e vengono tradotti in InputBox
IF sta per la parola SE
THEN significa ALLORA
ELSE significa ALTRIMENTI
END IF significa FINE SE
SIAMO GIUNTI QUASI ALLA FINE…ORA SCRIVEREMO I DATI
OUTPUT
Quando scriviamo Msgbox intendiamo una variabile id tipo output, infatti questa msgbox sta per la parola scrivi che troviamo sempre prima di chiudere uno pseudocodice. Questa & prende il nome di E commerciale
ECCO IL CODICE COMPLETO DI VISUAL BASIC
METTIAMO A CONFRONTO IL CODICE DI VISUAL BASIC E LO PSEUDOCODICE
INIZIOLeggi(N) CONT=O CONTM=O RIPETI Leggi(NM;CC;P) CONT=CONT+1 SE CC>50 allora CONTM=CONTM+1 SE CONTM=1 allora
PM=P ALTRIMENTI
SE P>PM allora PM=P FINE SE
FINE SE FINE SE FINO A CHE CONT=NSCRIVI (PM)FINE
N = txtN.TextCONT = 0CONTM = 0Do NM = InputBox("dimmi il nome del modello") CC = InputBox("dimmi la cilindrata") P = InputBox("dimmi il prezzo") CONT = CONT + 1 If CC > 50 Then CONTM = CONTM + 1 If CONTM = 1 Then PM = P Else If P < PM Then End If End If End IfLoop Until CONT = NMsgBox "dimmi il prezzo massino" & CStr(PM)
End Sub
PSEUDOCOD I CE & COD I CE
SIAMO GIUNTI DAVVERO ALLA FINE DEL NOSTRO PROGRAMMA.
Ora non ci resta altro che verificare che il programma che abbiamo fatto funzione se funziona in tutti i pasaaggi allora abbiamo fatto un ottimo lavoro sennò dobbiamo ricontrollare tuti i minimi passaggi fino a che non ci torna. Come ho detto all’inizio prima di passare a fare un programma in Visual basic bisogna fare la verifica così quando andiamo a caricarlo in Visual Basic siamo certi che torna…se poi abbiamo sbagliato a copoiare allora l’errore è differente.
FINE