在一行上获取类型不匹配，但几乎相同的行求值正确

Question

我只在"Pc“行上得到了一个类型不匹配。Zc和Tc的评价正确。所有值都来自用户表单。值都是带有2-4个小数的浮点数。我已经尝试了Dim Pc作为双倍，并得到了相同的结果。你知道为什么会发生这种情况吗？

不完整的代码部分：

Private Sub VelocityCalc()


Zc = Zf.Value / Zb.Value
Pc = Pb.Value / (Pf.Value + Patm.Value)
Tc = (Tf.Value + 459.67) / 519.67

Answer 1

如果您的值是字符串，例如，Pc = Pb.Value / (Pf.Value + Patm.Value)可以是Pc = "123.4567" / ("4563.342" + "231.123")。

这将计算为Pc = "123.4567" / ("4563.342231.123") (因为+操作符可以充当字符串的连接操作符)。

因为"4563.342231.123"不能转换为数字值，所以当尝试除法时，它将崩溃。

在将字符串用作数字之前，请始终将其转换为数字类型：

Zc = CDbl(Zf.Value) / CDbl(Zb.Value)
Pc = CDbl(Pb.Value) / (CDbl(Pf.Value) + CDbl(Patm.Value))
Tc = (CDbl(Tf.Value) + 459.67) / 519.67