Creare una semplice calcolatrice con vb8

Iniziamo creando un Windows Form Application (o semplicemente Form)
Ora creiamo una TextBox e 17 bottoni

mettiamoli in ordine come in una calcolatrice vera:


il 17esimo bottone sarà la nostra ultima preoccupazione mettetelo sopra la TextBox.

clicchiamo due volte sul bottone 0 e scriviamo

Codice:

TextBox1.Text = TextBox1.Text & "0"

facciamo così per ogni bottone del numero basta modificare il numero 0 accanto alla &.
ora passiamo alle variabili:
sotto
Public Class Form1
dobbiamo scrivere

Codice:

Dim a, b As Double
Dim op As String

bene ora siamo già a buona passo
ora dobbiamo inserire i codici quindi clicchiamo due volte sul tasto della ADDIZIONE e scriviamo

Codice:

a = CDbl(TextBox1.Text)
op = "+"
Textbox1.Text = ""

facciamo la stessa cosa per ogni bottone per la sottrazione al posto di + metteremo - alla divisione / e alla moltiplicazione *
ora al pulsante dell'uguale
clicchiamo due volte sul pulsante e scriviamo:

Codice:

b = CDbl(Text1.Text)
Select Case op
Case "/"
Text1.Text = a / b
Case "*"
Text1.Text = a * b
Case "+"
Text1.Text = a + b
Case "-"
Text1.Text = a - b
End Select

per quello che cancella ecco cosa dobbiamo scrivere:

Codice:

textbox1.text = ""

fatto!

ora passiamo al 17esimo bottone:
scriviamoci come testo nel bottone "ESCI"
ora clicchiamo due volte sul bottone e scriviamo:

Codice:

End

PS
se volete mettere il punto dovremmo fare così:
textbox1.text = Textbox1.Text & "."

Fonte:
http://informatica4ever.forumcommunity.net/?t=27219652

Lo screen è il risultato del mio piccolo lavoro anche se è solo il primo spero di migliorare.