VBA,内联数组

Question

希望在Visual Basic for Applications中创建内联数组

像这样的东西会很酷:

Dim a() as Integer
set a = {1,2,3} 

在Java中,这将是等效的功能:

int a[] = {1,2,3};

此外,如果你可以告诉我如何找到它的长度(不需要硬编码,因为我的谷歌搜索发现的所有例子),奖励积分

(请不要告诉我Google.我通常不使用vb​​,而且我发现Google上的某个vb问题的结果都得到了极大的回答.例如,硬编码值)

Answer 1

Dim a() As Variant
Dim Length As Integer

a = Array(1,2,3)

Length = UBound(a,1) - LBound(a,1) + 1