Могу ли я затемнить несколько объектов как Integer / Variant / и т.д. в одной строке?

Question

В VBA я могу Dim несколько объектов в виде целых чисел в одной сжатой форме, или это объявляет только d быть целым числом?

Dim a, b, c, d As Integer

Answer 1

Вы можете проверить:

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

Вывод в ближайшее окно:

Empty
Empty
Empty
Integer

Пустое может быть немного запутанным, но ясно, что только последний является целым числом. Использование F8 для перехода по коду при просмотре результатов в окне Locals является еще более информативным, поскольку типы a,b,c явно задаются как Variant/Empty.