USERFORM 函数错误

Question

我一直在尝试创建一个简单的 USERFORM 函数。我的要求是基本上计算加、乘、除和减数学函数。但是我遇到了困难，当我运行 ADD 函数时，说我加 5 加 5 然后结果是 55 而不是 10。

例子如下

A Value = 5
B Value = 5
Result  = 55

不应该是 55。

Answer 1

要添加存储为字符串的值，您应该使用像 CDbl 这样的转换函数，您的代码将是：

Private Sub add_btn_Click() 
    Jawapan = CDbl(Ainput) + CDbl(Binput) 
End Sub

要连接 VBA 中的文本，您应该使用 & 而不是 +

所以你的代码应该是：

Private Sub add_btn_Click() 
    Jawapan = Ainput & Binput 
End Sub

USERFORM Function Error