在計算器的文本框中如何將上線中的值賦值給第一個變量，將下線中的值賦值給第二個變量？

我正在製作一個計算器，並希望我的文本框在上面一行顯示運算符[+， - ，*，/]的值（在運行時分配給第一個變量）。在計算器的文本框中如何將上線中的值賦值給第一個變量，將下線中的值賦值給第二個變量？

然後在第二行輸入的值應該被分配給第二個變量。

然後，當我按下相等（=）按鈕時，應執行所需的操作，即添加第一個變量和第二個變量。

我做了一些，但它不提供例如正確的答案：

當我進入3，然後點擊添加按鈕（+）

光標下降的下線
當我輸入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

來源

2012-11-17 UMAR

應該定義操作數1的水平越高。現在，ButtonEqual_Click沒有看到它。 –

我想你使用了錯誤的文本框：

Operand2 = Val(TextBox1.Text)

應該

來源

2012-11-17 17:41:01 U1199880

但我只使用一個文本框，並希望在其中執行此操作... !!! – UMAR

我沒有看到你的變量聲明，但是如果你是在表單級別聲明它們，你的代碼實際上可以工作。 – U1199880

公共類Form1中昏暗的操作數爲雙昏暗Operand2中爲雙昏暗[操作]作爲字符串 – UMAR

[code]

在Operand2 = VAL（TextBox1的。文字） [/ code] 應該是 [代碼] Operand2中= VAL（textbox1.lines（1）） [/代碼]

來源

2012-11-19 19:54:46 UMAR

在計算器的文本框中如何將上線中的值賦值給第一個變量，將下線中的值賦值給第二個變量？

回答

相關問題