Nel post delle
uscite di giugno avevo anticipato che avrei pubblicato un
programma,
semplice e fatto con il
visual basic.
Esattamente nel mio caso ho fatto riferimento al
Microsoft Visual Basic 2008 Express Edition, ma ai fini di quello che vogliamo creare, vanno bene anche le altre versioni (cambieranno al limite poche cose), e comunque potete scaricare il programma da internet al seguente indirizzo:
http://www.microsoft.com/visualstudio/ita/downloads
Questo post è una sorta di anticipo a una vera e propria sezione dedicata alla creazione dei programmi con il Visual Basic...che ho intenzione di fare nei prossimi mesi
Non vedete l'ora di iniziare è? bene vediamo come e cosa fare per creare una calcolatrice in visual basic.
Per creare la nostra
calcolatrice (base), e che gli possiamo mettere il nome a nostro piacimento, a patto di non violare marchi già registrati, ci occorrono
10 tasti per i numeri da 0 a 9,
4 tasti per le operazioni elementari (+, -, x, /),
un tasto per le virgole (,),
uno per l'uguale (=) ed infine
un tasto per uscire (esc).
Quindi in totale ci occorrono ben
17 tasti, ed ovviamente
una text-box.
Bene allora inseriti i 17 tasti, e avendo cambiato le
etichette, o il
testo del pulsante, ad
ognuno di essi, non ci resta che
inserire il codice.
Inseriamo il codice
quando viene cliccato un numero vogliamo che venga aggiunto alle altre cifre presenti nella text-box, sempre se erano già presenti altri numeri, allora occorre fare il
doppio click sul pulsante numerico e inserire, sopra end sub:
TextBox1.Text = TextBox1.Text & "0"
se il tasto non è 0 occorre mettere il numero del tasto.
per inserire la virgola occorre invece, facendo doppio clic sul pulsante che rappresenta la virgola, inserire il seguente codice:
TextBox1.Text = TextBox1.Text & ","
- inserimento delle variabili:
occorre, prima di inserire i codici per gli altri pulsanti, inizializzare alcune variabili che ci serviranno per allocare nella memoria i vari valori per effettuare i calcoli, i comandi da aggiungere sotto
Public Class e immediatamente
prima degli altri comandi, sono:
Dim a, b As Double
Dim op As String
- codice per le operazioni:
per quanto riguarda le operazioni, occorre pensare che quando si clicca sul tasto dell'operazione, la calcolatrice allocherà il valore presente nella textbox nella variabile "
a", azzerando il testo della textbox, consentendoci di inserire altri numeri, allora facendo
doppio clic su ogni pulsante delle operazioni occorre scrivere il seguente codice (a seconda dell'operazione modificare "+" con "-", "*", "/"):
a = CDbl(TextBox1.Text)
op = "+"
TextBox1.Text = ""
ovviamente dato il primo valore, il valore dell'operazione, ed inserito il secondo valore numerico, occorre quando si premerà uguale pubblicare un risultato, per farlo dobbiamo scrivere il seguente codice, facendo come al solito
doppio click sul tasto "=", occorre inserire il seguente codice:
b = CDbl(TextBox1.Text)
Select Case op
Case "/"
TextBox1.Text = Str(a / b)
Case "*"
TextBox1.Text = Str(a * b)
Case "+"
TextBox1.Text = Str(a + b)
Case "-"
TextBox1.Text = Str(a - b)
End Select
- codice per il pulsante esci:
occorre aggiungere, facendo
doppio click sul pulsante ESCI, il seguente codice:
End
Bene, ora non resta che
lanciare la nostra applicazione "
Calcolatrice", dopo aver scelto il nome, e altre preferenze, che qui ometto ma vedrò di inserirlo in un altro post dedicato, e a parte.
PS: Ti è piaciuto questo post? allora che aspetti condividilo... Grazie.
Hai trovato qualche errore, o non ti funziona?...commenta... troveremo insieme la soluzione.
__________________________________
Seguimi anche su
Facebook:
Seguimi anche su Twitter:
Ash tag:
#Postatore
Non ti dimenticare di iscriverti via mail... è un modo per incoraggiarmi a pubblicare ma anche per rimanere aggiornato sui post di questo blog ;-)
__________________________________
Altri post correlati precedentemente pubblicati:
-
http://sisti-ilpostatore.blogspot.it/2013/06/uscite-giugno-2013.html
-
http://sisti-ilpostatore.blogspot.it/search/label/Programmi
Titolo: "Tutorial: creazione di una semplice calcolatrice con Visual Basic"
Autore: Sisti
Data pubblicazione: Domenica 23 giugno 2013 ore 19:00
url:
http://sisti-ilpostatore.blogspot.com/2013/06/tutorial-calcolatrice-con-visual-basic.html
__________________________________
mi sono ritrovato a sperimentare se funzionava, ho avuto qualche problema con la seconda operazione . esempio:123/2 =61,5 . Se sommavo ad es.1 (61,5+ 1 ) il risultato non era (62,5).
RispondiEliminaho modificato l'istruzione del button = . invece di
Select Case op
Case "/"
TextBox1.Text = Str(a / b)
ho usato
TextBox1.Text = a / b
così funziona perfettamente
ciao
Salve,
EliminaBenvenuto nel mio Blog.
Grazie per la dritta controllerò l'errore e modificherò il post, se mi dici il tuo nickname o se hai un sito potrei nominarti anche sul post.
Grazie di nuovo e buon fine settimana
Sisti - il Postatore