vb.net - 在计算器的文本框中，如何将上行的值分配给第一个变量，将下行的值分配给第二个变量？

Question

我正在制作一个计算器，并希望我的文本框在上面一行显示值（在运行时分配给第一个变量）以及运算符 [+,-,*,/]。

然后将第二行中输入的值赋给第二个变量。

然后当我按下等于（=）按钮时，应该执行所需的操作，即添加第一个变量和第二个变量。

我做了一点，但它没有提供正确的答案，例如：

• 当我输入 3 并单击 Add(+) 按钮时，光标在下一行下降
• 当我输入 5 并按相等按钮时，文本框在结果中显示 6 而不是 8

等等。

这是代码

Private Sub ButtonAdd_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ButtonAdd.Click
    Operand1 = Val(TextBox1.Text)
    TextBox1.Text = Operand1 & "+" & Environment.NewLine & Operand2
        TextBox1.Focus()
        [Operator] = "+"
End Sub

Private Sub ButtonEqual_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ButtonEqual.Click
    Dim Result As Double

    Operand2 = Val(TextBox1.Text)
    Select Case [Operator]
        Case "+"
            Result = Operand1 + Operand2
            TextBox1.Text = Result

        Case "-"
            Result = Operand1 - Operand2
            TextBox1.Text = Result
        Case "*"
            Result = Operand1 * Operand2
            TextBox1.Text = Result
        Case "/"
            Result = Operand1 / Operand2
            TextBox1.Text = Result
    End Select
    TextBox1.Text = Result
End Sub

Answer 1

我认为您使用了错误的文本框：

Operand2 = Val(TextBox1.Text)

应该

Operand2 = Val(TextBox2.Text)

Answer 2

[code]

Operand2= val(textbox1.text) [/code] 应该是 [code] Operand2= val(textbox1.lines(1)) [/code]