使用数学负负负

Question

这给了我0而不是-10。我该如何解决？

Dim aa As String = "-5"
Dim bb As String = "-5"
Debug.Print(Val(aa) - Val(bb))

Answer 1

其实是正确的

Dim aa As String = "-5"
Dim bb As String = "-5"
Debug.Print(Val(aa) - Val(bb))

如果你想要-10那么你需要添加

Dim aa As String = "-5"
Dim bb As String = "-5"
Debug.Print(Val(aa) + Val(bb))

因为（-5） - （-5）变为-5 + 5所以其 0

Answer 2

这是正确的答案。 -5 - -5 = 0 如果你想得到-10只是做

Dim aa = -5
Dim bb = -5
Debug.Print(aa + bb)