Wie kann ich in VB.NET 2003 in einer TextBox Eingaben wie "+10" beim Drücken von Enter zum aktuellen Zahlenwert addieren und den TextBox-Wert durch die Summe ersetzen?

Antwort vom

Du kannst das im `KeyDown`-Event der TextBox abfangen: Wenn der Text mit `+` (oder `-`) beginnt, wird er als Delta interpretiert und beim Drücken von Enter zum aktuellen Zahlenwert addiert; anschließend ersetzt du den Text durch die Summe. ```vb ' VB.NET 2003 / .NET 1.1 Private Sub TextBox1_KeyDown(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyEventArgs) _ Handles TextBox1.KeyDown If e.KeyCode <> Keys.Enter Then Exit Sub Dim s As String = Trim(TextBox1.Text) If s = "" Then Exit Sub ' Enter nicht "durchreichen" (Beep vermeiden) e.Handled = True e.SuppressKeyPress = True Dim currentValue As Double Dim delta As Double ' Aktuellen Wert aus der TextBox lesen (falls leer/ungültig -> 0) If Not IsNumeric(s) Then ' Falls z.B. "+10" eingegeben wurde, currentValue soll der bisherige Wert sein. ' Hier: currentValue aus Tag holen oder 0 nehmen. currentValue = 0 Else currentValue = CDbl(s) End If ' Wenn Eingabe mit + oder - beginnt: als Delta anwenden If Left(s, 1) = "+" Or Left(s, 1) = "-" Then If IsNumeric(s) Then delta = CDbl(s) TextBox1.Text = CStr(currentValue + delta) End If Else ' Sonst: normaler Zahlenwert bleibt (oder du könntest hier auch nichts tun) TextBox1.Text = CStr(currentValue) End If TextBox1.SelectAll() End Sub ``` Hinweis: Damit `+10` zum *vorherigen* Wert addiert wird, muss dieser vorherige Wert irgendwoher kommen. Am einfachsten speicherst du ihn beim Verlassen der TextBox in `TextBox1.Tag` und liest ihn bei `+10` daraus (statt `currentValue = 0`).

Verwandte Fragen

Wie übergebe ich in VB.NET 2003 einer Form in einem Panel die Key-Steuerung?

In VB.NET 2003 / WinForms bekommt eine Form, die in einem Panel steckt, die Tastaturereignisse normalerweise nicht automatisch sauber. Üblich ist: 1. KeyPreview = True auf der Host-Form setzen...

VB.NET 2003: Wie liest oder schreibt man aus einer in ein Panel geladenen Form auf die Hauptform?

In VB.NET 2003 greifst du von der im Panel geladenen Form auf die Hauptform zu, indem du der eingebetteten Form eine Referenz auf die Hauptform übergibst. Prinzip: Hauptform erstellt Kindform Ha...

Wie bleibt eine in ein Panel geladene Form in VB.NET 2003 immer so groß wie das Parent-Panel?

In VB.NET 2003 gelingt das am einfachsten so: 1. Formular nicht top-level anzeigen 2. ins Panel einfügen 3. Dock = Fill setzen Beispiel: vb Dim f As New Form2 f.TopLevel = False f.FormBorde...

Wie runde ich in VB.NET 2003 das Ergebnis von 22 / 7 auf und rechne dann mit 28 weiter?

In VB.NET 2003 kannst du zum Aufrunden Math.Ceiling verwenden. Beispiel: vb Dim wert As Double Dim ergebnis As Integer wert = 22 / 7 ergebnis = CInt(Math.Ceiling(wert)) ergebnis = ergebnis + 28...

Wie fügt man in VB.NET 2003 einem neuen DataSet aus XML ein gefülltes eindimensionales Array per DataTable.Rows.Add(Object()) hinzu?

In VB.NET 2003 / ADO.NET fügst du ein gefülltes 1-dimensionales Array zu einer DataTable im DataSet so hinzu: vb Dim werte() As Object = New Object() {"Max", 25, "Berlin"...

Wie verschiebe ich in VB.NET 2003 eine übergroße PictureBox in einem Panel per Maus, sodass die Scrollbalken die neue Position automatisch anzeigen?

Ja. In VB.NET 2003 geht das am einfachsten so: PictureBox größer als Panel Panel.AutoScroll = True Beim Ziehen mit der Maus nicht die PictureBox.Location direkt setzen Stattdessen die Scrol...

Wie wird in VB.NET 2003 eine PictureBox in einem kleineren Panel zentriert angezeigt, auch bei AutoScroll?

Ja. In VB.NET 2003 geht das, aber PictureBox zentriert sich in einem Panel mit AutoScroll=True nicht automatisch. Die Position muss nach Größe und Scrollbereich selbst gesetzt werden. Beis...

Können XML-DataTables in VB.NET 2003 ineinander verschachtelt werden?

Ja. In VB.NET 2003 / ADO.NET DataSet können XML-Daten so dargestellt werden, dass DataTables logisch verschachtelt wirken — aber nicht als echte DataTable-in-DataTable-Struktur. Kurz gesa...

Wie erstelle ich mit VB.NET 2003 eine Zeichnung aus einem mehrdimensionalen Array und lege mit "rfg" die Reihenfolge fest?

Ja. Das geht in VB.NET 2003, indem du: 1. die Daten in einem Array hältst, 2. nach rfg sortierst, 3. die Bilder in genau dieser Reihenfolge zeichnest. Ein mehrdimensionales Array ist dafür...