vba - 如何强制 VBA 进行真正的整数数学运算？

Question

此代码应返回 0，但它返回 1。即使所有数字都是长整数，VBA 似乎也在进行浮点数学运算。

Function demo() As Long
    Dim const1 As Long
    Dim const2 As Long
    Dim result As Long
    const1 = 1796&
    const2 = 1798&
    result = const1 / const2
    demo = result
End Function

Answer 1

改变斜线的方向

Function demo() As Long
    Dim const1 As Long
    Dim const2 As Long
    Dim result As Long
    const1 = 1796&
    const2 = 1798&
    result = const1 \ const2
    demo = result
End Function

\将强制整数除法