在其弹出的窗口中输入Private Sub TextBox1_Change()TextBox3.Text = Val(TextBox1.Text) + Val(TextBox2.Text)+Val(TextBox3.Text)End Sub