在第三个文本框中显示2个文本框的总和

我试图做一个直接的计算，但它不工作。

这是我目前所拥有的。

Private Sub TextBox270_AfterUpdate() TextBox270.Value = Val(TextBox1.Value) + Val(TextBox150.Value) End Sub 

我正在努力实现

 1 (in TextBox1) + 2 (in TextBox150) = 3 (in TextBox270) 

Answer 1

您需要处理TextBox1和Textbox150的更改事件

这是你正在尝试？ （ 未经testing ）我假设您将在这两个文本框中input有效的数字。

 Private Sub TextBox1_Change() GenerateSum End Sub Private Sub TextBox150_Change() GenerateSum End Sub Sub GenerateSum() If Len(Trim(TextBox1.Text)) <> 0 And _ Len(Trim(TextBox150.Text)) <> 0 Then TextBox270.Text = Val(Trim(TextBox1.Text)) + _ Val(Trim(TextBox150.Text)) End If End Sub