CheatingBastards | Hack e Cheats - Streaming
Ciao Ospite, se leggi questo messaggio significa che non sei registrato. Clicca qui per effettuare la registrazione in pochi semplici passaggi e potrai usufruire di tutte le funzioni del nostro Forum . Ti ricordiamo di passare in Area Benvenuti per presentarti al Forum

Calcolatrice tradizionale..

Vedere l'argomento precedente Vedere l'argomento seguente Andare in basso

Calcolatrice tradizionale..

Messaggio Da SicK il Lun Mar 28, 2011 2:31 pm

questa guida vi insegnerà a fare un calcolatrice con visula basic

andate su file-> nuovo progetto-> applicazione windows form e chiamatela come volete

prepariamo la schermata della calcolatrice mettendoci: 17 botton e una text box
Ala fine deve risualtare più o meno cos?:



bene ora inseriamo i codici:
All'inizio della pagina dei codici (subito dopo "PublicClass Form1") inserite questo codice:



Codice:

   Dim a, b As Double
Dim op As String




Così vi creerà delle variabili per memorizzare i numeri con qui fare le operazioni.
Per il primo bottone con il numero "1" si scrivera così:




Codice:
textbox1.text=textbox1.text+ "1"





In questo modo scriver? il numero "1" nella text box quando pigeremo quel bottone.
Poi fate cos? anche per gli altri bottoni numerici(naturalmente cambiando i numero tra le virgolette).
Ora inseriamo il codice per il bottone "+":



Codice:

Codice:
a = CDbl(TextBox1.Text)
op = "+"
TextBox1.Text = ""




Per il bottone "-":



Codice:

Codice:
a = CDbl(TextBox1.Text)
op = "-"
TextBox1.Text = ""




Per il bottone "x":



Codice:

Codice:
a = CDbl(TextBox1.Text)
op = "*"
TextBox1.Text = ""




Per il bottone "/":



Codice:

Codice:
a = CDbl(TextBox1.Text)
op = "/"
TextBox1.Text = ""



Ora per i bottone "=":



Codice:

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




Per il bottone"c":



Codice:

Codice:
textbox1.text=""





E in fine per il bottone "Exit":



Codice:

Codice:

   [color=red]Close[/color]




Abbiamo finito.
Spero che vi sia stata utile e che io sia stato chiaro.
FONTE:WEB

______________________
afro  Welcome To CheatingBastards!  afro

SicK
Admin
Admin

Messaggi : 317
Data d'iscrizione : 05.11.10
Età : 21

Vedere il profilo dell'utente http://cheatingbastards.forumattivo.it

Tornare in alto Andare in basso

Vedere l'argomento precedente Vedere l'argomento seguente Tornare in alto

- Argomenti simili

 
Permesso di questo forum:
Non puoi rispondere agli argomenti in questo forum