Excel VBA Userform如何添加和减去variables？

我有一个用户窗体，在用户窗体的第1页上，用户在一个名为as_1的文本框中input一些文本，另一个名为annualsaving1的文本框。

在用户表单的第5页上，我想在文本框中添加两个variables，名为“TextBox36”。 这是我一直在使用的代码：

Private Sub Page5a() I = as_1 + annualsaving1 TextBox36.Value = I End Sub 

当我使用这个代码时，只有as_1的值出现。 它不会添加“annualsaving1”。

任何帮助将不胜感激，谢谢:)

Answer 1

as_1和annualsaving1是TextBoxtypes的。 要添加他们的值，你需要访问他们的.Value属性，并将其转换为Integertypes：

 I = CInt(as_1.value) + CInt(annualsaving1.value) 

但要小心：如果用户input的东西不能被parsing为数字，你的程序将崩溃。

Answer 2

在下面尝试

 Private Sub Page5a() TextBox36.Text = Val(as_1.Text) + Val(annualsaving1.Text) End Sub