Question

如果有人可以使用VBA进行简单计算，我将不胜感激。我现在的情况是我想做一个简单的计算如下

area = inner_dia * height

当我输入inner_dia，50和height，50时，正确的答案应该是2,500;不过我的回答是15,300。请在我出错的地方帮助我，在哪里可以了解更多使用VBA进行复杂的计算（例如使用自然日志，pi等）

提前谢谢

Answer 1

在即时窗口中写下：

inner_dia = 50
height = 50
area = inner_dia * height
?area

编辑： CommandButton1是命令按钮的名称 tb_height和tb_inner_dia是文本框。

Option Explicit

Private Sub CommandButton1_Click()
    MsgBox tb_height.Value * tb_inner_dia.Value
End Sub

Answer 2

您的文本框返回字符串值。您需要将字符串转换为浮点数，进行计算，然后格式化答案。

见下面的例子：

Dim inner_dia as Double, height as Double
inner_dia = Val(TextBox1.Text)
height = Val(TextBox2.Text)

Dim result as Double
result = inner_dia * height

TextBox3.Text = Format(result, "0.000")

VBA计算 - 简单计算

2 个答案: