我可以在一行中将多个对象调暗为 Integer / Variant 等吗?

Can I dim multiple objects as Integer / Variant / etc. in one line?

在 VBA 中,我可以 Dim 以这种简洁的方式在一行中将多个对象作为整数,还是只声明 d 是一个整数?

Dim a, b, c, d As Integer

您可以测试:

Sub test()
    Dim a, b, c, d As Integer
    Debug.Print TypeName(a)
    Debug.Print TypeName(b)
    Debug.Print TypeName(c)
    Debug.Print TypeName(d)
End Sub

立即输出window:

Empty
Empty
Empty
Integer

empty 可能有点令人困惑,但它清楚地表明只有最后一个是整数。使用 F8 单步执行代码,同时在 Locals Window 中查看结果会提供更多信息,因为 a、b、c 的类型明确指定为 Variant/Empty.