Du bist nicht eingeloggt.

Login

Pass

Registrieren

Community
Szene & News
Locations
Impressum

Forum / Bits und Bytes

Quelltext für den Taschenrechner in VB 2008

soldat-92 - 33
Halbprofi (offline)

Dabei seit 09.2008
293 Beiträge
Geschrieben am: 18.11.2008 um 21:42 Uhr

Hallo,

bin grad am lernen von Visual Basic 2008.

Hab jetz eie Woche nichts mehr gemacht und übe grad wieder.
Ich mach grad nen Taschenrechner mit den Tasten 0,1,2,3,4,5,6,7,8,9,/,*,-,+ und ,
sowie einen "clear" button und 2 Mal ne textbox. Eine für das was du berechnest und eine für dein Ergebnis in der du aber nichts schreiben kannst.


Mein Quelltext sieht jetz so aus:

Public Class Form1
Private Sub btn_0_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btn_0.Click
TextBox1.Text = TextBox1.Text + "0"
End Sub

Private Sub btn_komma_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btn_komma.Click
TextBox1.Text = TextBox1.Text + ","
End Sub

Private Sub btn_1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btn_1.Click
TextBox1.Text = TextBox1.Text + "1"
End Sub

Private Sub btn_2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btn_2.Click
TextBox1.Text = TextBox1.Text + "2"
End Sub

Private Sub btn_3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btn_3.Click
TextBox1.Text = TextBox1.Text + "3"
End Sub

Private Sub btn_4_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btn_4.Click
TextBox1.Text = TextBox1.Text + "4"
End Sub

Private Sub btn_5_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btn_5.Click
TextBox1.Text = TextBox1.Text + "5"
End Sub

Private Sub btn_6_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btn_6.Click
TextBox1.Text = TextBox1.Text + "6"
End Sub

Private Sub btn_7_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btn_7.Click
TextBox1.Text = TextBox1.Text + "7"
End Sub

Private Sub btn_8_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btn_8.Click
TextBox1.Text = TextBox1.Text + "8"
End Sub

Private Sub btn_9_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btn_9.Click
TextBox1.Text = TextBox1.Text + "9"
End Sub

Private Sub btn_devide_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btn_devide.Click
TextBox1.Text = TextBox1.Text + "/"
End Sub

Private Sub btn_multiply_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btn_multiply.Click
TextBox1.Text = TextBox1.Text + "*"
End Sub

Private Sub btn_minus_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btn_minus.Click
TextBox1.Text = TextBox1.Text + "-"
End Sub

Private Sub btn_plus_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btn_plus.Click
TextBox1.Text = TextBox1.Text + "+"
End Sub

Private Sub btn_enter_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btn_enter.Click



End Sub

Private Sub btn_clear_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btn_clear.Click
TextBox1.Text = ""
TextBox2.Text = ""
End Sub
End Class


Ziemlich weit unten seht ihr den "Enter" Button. Da ist aber nichts ausgefüllt.
Wie ist der Quelltext für den Enter Button? Ich will ja das, was in textbox1 steht (alos textbox1.text) in der 2ten textbox (textbox2.text) stehen haben und es soll so berechnet werdne wie es in der 1sten steht.

ich hab in youtube mal geschaut, aber ich finde das video nicht mehr wo das erklärt wird.


Und bitte kommt mir jetz nicht mit den tutorials aus youtube, die hab ich grad alle durchsucht^^


Danke für eure Hilfe =)

Hanelmotoren - Motoren der Zukunft.

bredator - 41
Champion (offline)

Dabei seit 03.2008
5319 Beiträge

Geschrieben am: 19.11.2008 um 10:06 Uhr

Meiner Meinung nach fehlt es dir einfach an grundlegenden Kenntnissen der Programmierung. Hier im Speziellen von OOP. Ich würde dir empfehlen, dich zuerst einmal mit entsprechender Literatur vertraut zu machen, anstatt in so einer IDE schnell ein paar Buttons zusammenzuklicken und dann bei so einfachen Dingen gleich Fragen zu stellen.

Lache nicht über jemanden, der einen Schritt zurück macht. Er könnte Anlauf nehmen.

soldat-92 - 33
Halbprofi (offline)

Dabei seit 09.2008
293 Beiträge
Geschrieben am: 19.11.2008 um 13:59 Uhr

Zitat von bredator:

Meiner Meinung nach fehlt es dir einfach an grundlegenden Kenntnissen der Programmierung. Hier im Speziellen von OOP. Ich würde dir empfehlen, dich zuerst einmal mit entsprechender Literatur vertraut zu machen, anstatt in so einer IDE schnell ein paar Buttons zusammenzuklicken und dann bei so einfachen Dingen gleich Fragen zu stellen.



hey was soll das xDD


ich hab doch geschrieben das ich gerade mit VB anfang^^

ich weiß nicht ob du auch programmierst aber wenn, dann hattest du am anfang bestimmt auch schwierigkeiten =)

Hanelmotoren - Motoren der Zukunft.

bredator - 41
Champion (offline)

Dabei seit 03.2008
5319 Beiträge

Geschrieben am: 21.11.2008 um 09:50 Uhr

Zitat von soldat-92:

Zitat von bredator:

Meiner Meinung nach fehlt es dir einfach an grundlegenden Kenntnissen der Programmierung. Hier im Speziellen von OOP. Ich würde dir empfehlen, dich zuerst einmal mit entsprechender Literatur vertraut zu machen, anstatt in so einer IDE schnell ein paar Buttons zusammenzuklicken und dann bei so einfachen Dingen gleich Fragen zu stellen.



hey was soll das xDD


ich hab doch geschrieben das ich gerade mit VB anfang^^

ich weiß nicht ob du auch programmierst aber wenn, dann hattest du am anfang bestimmt auch schwierigkeiten =)


Ja, aber ich habe mir Bücher besorgt, diese durchgearbeitet, Kurse belegt usw. Bloßes Zusammenklicken mit ohne Verständnis für den Hintergrund ist Obermist.

Lache nicht über jemanden, der einen Schritt zurück macht. Er könnte Anlauf nehmen.

soldat-92 - 33
Halbprofi (offline)

Dabei seit 09.2008
293 Beiträge
Geschrieben am: 21.11.2008 um 13:22 Uhr

Zitat von bredator:

Zitat von soldat-92:

Zitat von bredator:

Meiner Meinung nach fehlt es dir einfach an grundlegenden Kenntnissen der Programmierung. Hier im Speziellen von OOP. Ich würde dir empfehlen, dich zuerst einmal mit entsprechender Literatur vertraut zu machen, anstatt in so einer IDE schnell ein paar Buttons zusammenzuklicken und dann bei so einfachen Dingen gleich Fragen zu stellen.



hey was soll das xDD


ich hab doch geschrieben das ich gerade mit VB anfang^^

ich weiß nicht ob du auch programmierst aber wenn, dann hattest du am anfang bestimmt auch schwierigkeiten =)


Ja, aber ich habe mir Bücher besorgt, diese durchgearbeitet, Kurse belegt usw. Bloßes Zusammenklicken mit ohne Verständnis für den Hintergrund ist Obermist.



ich hab mir gestern auch ein buch angeschafft :koenig:

und ich hab nicht [ irgendwas ] zusammengeklickt -.-

Hanelmotoren - Motoren der Zukunft.

Gudchen - 43
Halbprofi (offline)

Dabei seit 08.2008
349 Beiträge

Geschrieben am: 21.11.2008 um 15:37 Uhr

du hast dir eine einfachere lösung schon verbaut, dadurch dass du den zu berechnenden term als string in ne textbox packst.

wie willst du deinem programm nun klarmachen was davon eine zahl ist, und was operation? (ok das ist noch relativ einfach)

soll der rechner punkt vor strich können? (das wird hart)

mit datentypen bist du vertraut?
falls nicht solltest du die grundlagen wiederholen.
es ist schon richtig, ne tolle IDE und buttons auf fenster plazieren reichen bei weitem nicht um zu programmieren.

zum thema:
falls du dir punkt vor strich sparen willst (ergo... dein rechner nicht richtig rechnet, aber naja) dann kannst du den string einfach stück für stück durchgehen, wenn du ne ziffer hast, in ne int variable schreiben, und bei weiteren ziffern jeweils die variable * 10 (nach links schieben) + die ziffer, und wenn du ne operation hast, merken und die nächste zahl auslesen, wenn die nächste operation kommt zahl1 und zahl 2 zusammenrechnen, ergebnis in zahl1 und dann weiter den string durchgehen, bis du am ende bist.

du mußt allerdings damit rechnen, das:
a: der user mehrere operationen nacheinander eingeben könnte
b: falls das 'eingabe-textfeld' beschreibbar ist, der user dort mist reinschreibt
c: eine division durch 0 stattfindet

Hanelmotoren
Fortgeschrittener (offline)

Dabei seit 09.2008
41 Beiträge
Geschrieben am: 21.11.2008 um 15:42 Uhr

Endlich mal eine gescheite Antwort!


ich bin halt neuling auf dem gebiet ich hatte auch scho nen taschenrechner ohne buchg oder sonstwas programmiert dann kommt meine kleine sis und macht den pc aus und alles war weg... jedefalls funzte der TR^^

ich hab mir jetzt das buch geholt VB für einsteiger und dann guck ich mal da nach^^


btw: die textbox is beschreibbar aber die 2te also wo das ergebnsi steht nicht^^
und beim dividieren durch null macht der das schon von selsbt keine ahnugn warum^^

  [Antwort schreiben]

Forum / Bits und Bytes

(c) 1999 - 2026 team-ulm.de - all rights reserved - hosted by ibTEC Team-Ulm

- Presse - Blog - Historie - Partner - Nutzungsbedingungen - Datenschutzerklärung - Jugendschutz -