| |
VB.NET - Ein- und Umsteiger+-/* Funktionen in .NET | | | Autor: hmnrusha | Datum: 01.11.06 22:33 |
| Guten Abend,
ich habe eine Form mit Label1, 2. Auf 1 soll die vollständige Rechnung, auf 2 immer das ergebnis stehen. der jeweilige rechenschritt wird in textbox1 eingegeben
If Label2.Text = "Ergebnis: " Then
Label1.Text = (TextBox1.Text)
Label2.Text = (Label2.Text) + (TextBox1.Text)
Else
Label1.Text = (Label1.Text) + ("+") + (TextBox1.Text)
Label2.Text = (Label2.Text) + (TextBox1.Text)
End If
End Sub
Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As _
System.EventArgs) Handles Button2.Click
If Label2.Text = "Ergebnis: " Then
Label1.Text = ("-") + (TextBox1.Text)
Label2.Text = (Label2.Text) - (TextBox1.Text)
Else
Label1.Text = (Label1.Text) + ("-") + (TextBox1.Text)
Label2.Text = (Label2.Text) - (TextBox1.Text)
End If
End Sub
Private Sub Button5_Click(ByVal sender As System.Object, ByVal e As _
System.EventArgs) Handles Button5.Click
If Label2.Text = "Ergebnis: " Then
Label1.Text = "0"
Label2.Text = "0"
Else
Label1.Text = (Label1.Text) + (":") + (TextBox1.Text)
Label2.Text = (Label2.Text) / (TextBox1.Text)
End If
End Sub
Private Sub Button4_Click(ByVal sender As System.Object, ByVal e As _
System.EventArgs) Handles Button4.Click
If Label2.Text = "Ergebnis: " Then
Label1.Text = "0"
Label2.Text = "0"
Else
Label1.Text = (Label1.Text) + ("*") + (TextBox1.Text)
Label2.Text = (Label2.Text) * (TextBox1.Text)
End If
End Sub Warum funktioniert das nicht? | |
Re: +-/* Funktionen in .NET | | | Autor: ralf_oop (Moderator) | Datum: 02.11.06 08:08 |
| Rechnen kannst du nur mit Zahlen ((S)Byte, (U)Short, (U)Integer, (U)Long, Single, Double, Decimal), von daher musst du die Zahlen aus dem Eingabetext extrahieren. Wenn diese extrahiert sind, liegen diese noch als Text vor - mit der Parse-Methode des jeweiligen Datentyps kannst du diesen "Zahlentext" in eine Zahl umwandeln. Mit den Zahlen kannst du rechnen und dann kannst du das Ergebnis ausgeben.
Ich würde eher ein anderes User-Interface verwenden, dann wird das ganze etwas einfacher, denn den Eingabetext auseinander zu drösseln ist mit .NET zwar nicht so schwer, aber es ist mühselig alles auseinander zu dröseln. Von daher mach es so:
Textbox für 1.Zahl, ComboBox, wo man die Rechenart auswählt, Textbox für 2.Zahl und nen Berechnen-Button. Dann kannst du im Berechnen-Button einfach den Text aus den Textboxen gleich parsen, und je nach selektierten Eintrag der Combobox tust du berechnen.
Ralf | |
| Sie sind nicht angemeldet! Um auf diesen Beitrag zu antworten oder neue Beiträge schreiben zu können, müssen Sie sich zunächst anmelden.
Einloggen | Neu registrieren |
|
|
Neu! sevDTA 3.0 Pro
SEPA mit Kontonummernprüfung
Erstellen von SEPA-Dateien mit integriertem BIC-Verzeichnis und Konto- nummern-Prüfverfahren, so dass ungültige Bankdaten bereits im Vorfeld ermittelt werden können. Weitere InfosTipp des Monats Access-Tools Vol.1
Über 400 MByte Inhalt
Mehr als 250 Access-Beispiele, 25 Add-Ins und ActiveX-Komponenten, 16 VB-Projekt inkl. Source, mehr als 320 Tipps & Tricks für Access und VB
Nur 24,95 EURWeitere Infos
|
|
|
Copyright ©2000-2024 vb@rchiv Dieter Otter Alle Rechte vorbehalten.
Microsoft, Windows und Visual Basic sind entweder eingetragene Marken oder Marken der Microsoft Corporation in den USA und/oder anderen Ländern. Weitere auf dieser Homepage aufgeführten Produkt- und Firmennamen können geschützte Marken ihrer jeweiligen Inhaber sein.
Diese Seiten wurden optimiert für eine Bildschirmauflösung von mind. 1280x1024 Pixel
|
|