[VB.Net] Der kleine Taschenrechner

Jay Niize · 05/30/2010, 08:40

Hallo Elitepvpers!
Heute zeige ich euch wie ihr mit der Programmiersprache Visual Basic 2008 einen kleinen Taschrechner programmieren könnt! So lasst uns anfangen!

Zuerst sollte man ein neues Projekt erstellen, mit dem Namen Grundrechenarten. SO wenn ihr nun die Form vor euch habt, macht folgendes :

Eine GroupBox in die Form ziehen
In diese GroupBox zieht ihr 4 RadioButtons
Diese Benennt ihr wie folgt :
Addition(+)
Subtraktion(-)
Multiplikation(*)
Division(/)
Jetzt Ziehe 2 Textboxen und 2 Label in die Form
Die eine Textbox stellst du oben links auf, die andere unten Links
Über die erste Textbox ziehst du ein Label, das du "Variable 1" nennst
Über die zweite Textbox ziehst du das andere Label, das du "Variable 2" nennst
Nun schiebst du die GroupBox in die Mitte, und ziehst nochmal 1 Label und eine textbox hinein
Die textbox soll oben rechts sein, darüber das Label mit der Aufschrift : Ergebnis
Jetzt noch 2 Buttons, Berechnen und Beenden

So sollte das jetzt aussehn :

So nun kommen wir zum Code
Wir gehen in den Code-Editor per Doppelklick auf Form1
Unter Public Class Form1 schreiben wir

Code:

    Dim FirstNum, SecondNum As Double

Das deklanniert die Variablen FirstNum und SecondNum!

Nun gehen wir zurück zum Designer und klicken doppelt auf den Button 'Berechnen', und kommen auch in den Code Editor. Darein Schreiben wir als erstes folgendes

Code:

        FirstNum = TextBox1.Text
        SecondNum = TextBox2.Text

Damit weisen wir die Werte aus den textBoxen den Variablen zu!

Dann kommen wir noch weiter mit dem Code, um die eigentlich Funktion einzufügen! Das Folgende ermittelt, welche Option Festgelegt wurde(Addition, Subtraktion...) und berechnet dies dann!

Code:

        If RadioButton1.Checked = True Then
            TextBox3.Text = FirstNum + SecondNum
        End If
        If RadioButton2.Checked = True Then
            TextBox3.Text = FirstNum - SecondNum
        End If
        If RadioButton3.Checked = True Then
            TextBox3.Text = FirstNum * SecondNum
        End If
        If RadioButton4.Checked = True Then
            TextBox3.Text = FirstNum / SecondNum
        End If

Jetzt ist nur noch der Beenden Button übrig, den Wir auch nicht ganz ohne Code lassen wollen! Also gehen wir auf den Designer, und klicken Doppelt auf den Beenden Button, und tragen folgenden Code ein, um das Programm zu beenden :

Code:

End

So um es mal zu testen starten wir das Programm Programm, und tippen bei der Variable(1) 5 ein, und bei der Variable(2) auch 5. Wir markieren den Radiotbutton1 also Addition, und klicken Berechnen. Und siehe da! Es hat geklappt

Das war mein Tutorial für den kleinen taschenrechner! Natürlich könnt ihr auch noch Wurzel berechnen lassen, aber so ist es witziger

das mit der Wurzel werd ich vll. auch mal Updaten, wenn mir der code wieder einfällt

MFG Jusikid

~~killeeer111~~ · 05/30/2010, 09:12

Geht auch so:

Code:

If RadioButton1.Checked = true then
textbox3.text = Val(TextBox1.Text) + Val(TextBox2.Text)
ElseIf RadioButton2.Checked = true then
textbox3.text = Val(Textbox1.text) - Val(Textbox2.text)
elseif RadioButton3.Checked = true then
textbox3.text = Val(Textbox1.text) * Val(Textbox2.text)
elseif RadioButton4.Checked = true then
Textbox3.text = Val(Textbox1.text) / Val(Textbox2.text)
EndIf

mfg

Jay Niize · 05/30/2010, 09:26

ja, aber das ist besser verständlicher für newbies weil die nichts mit Val lernen

~~killeeer111~~ · 05/30/2010, 09:29

jo stimmt eig, aber ich kanns so auch^^