Hinzufügen und Subtrahieren in Visual Basic

Question

Ich bin ein Anfänger in Visual Basic 2010 Express und ich muss ein Basisprogramm machen, wo Sie Zahlen in textbox1 eingeben, und die Zahlen werden hinzugefügt oder subtrahiert von textbox2 mit einer Schaltfläche hinzufügen oder subtrahieren . Mein Problem ist nur eine Zahl wird hinzugefügt oder subtrahiert. zB wenn ich 50 hinzufügen, ist es nur 50 zeigt, kann ich nicht gerade hinzufügen, halten 50 zu bekommen, 100 usw.

Hier ist, was mein Code wie folgt aussieht:

Public Class Form1 
    Private Sub Button2_Click(sender As System.Object, e As System.EventArgs) Handles Subtract.Click 
     Dim number1, number2 As Integer 
     number1 = TextBox4.Text 
     number2 = txtVariables.Text 
     TextBox4.Text = number1 - number2 
    End Sub 

    Private Sub btnTransfer_Click(sender As System.Object, e As System.EventArgs) Handles btnTransfer.Click 
     Dim TextBoxContents As String 
     TextBoxContents = txtVariables.Text 
     TextBox4.Text = TextBoxContents 
     If Val(TextBox4.Text) > 1 Then 
      TextBoxContents = Val(TextBox4.Text) + Val(txtVariables.Text) 
     Else 
      TextBox4.Text = TextBoxContents 
     End If 
    End Sub 
End Class 

Answer 1

verwenden

Public Class Form1 Private Sub Button2_Click(sender As System.Object, e As System.EventArgs) Handles Subtract.Click 
Dim number1, number2 As Integer 
number1 = Convert.toInt32(TextBox4.Text) 
number2 = Convert.toInt32(txtVariables.Text) 
TextBox4.Text = (number1 - number2) 
End Sub