无法在VBA中初始化数组的值

Question

我还是VBA新手。这是代码：

Sub Macro1()
Dim NumberSeq() As Integer = {1,2,3,4}
End Sub

这只是数组的初始化，我看到它适用于其他人。但是我总是得到警告窗口：编译错误：预期：在等号“=”上突出显示语句结束

不知道这里发生了什么。请指教，非常感谢!!

Answer 1

Sub macro1()
Dim NumberSeq() As Variant

NumberSeq = Array(1, 2, 3, 4) 'an allocated array with length 1 to 4

'check output through print
For i = LBound(NumberSeq) To UBound(NumberSeq)
    msg = msg & NumberSeq(i) & vbNewLine
Next i
MsgBox (msg)

End Sub

对于隐式大小的二维数组，使用Array（行开始到行结束，从col开始到col结束）。

这是一个很好的resource。