VBA中的[a ..]功能有什么用？

Question

我想在visual basic中询问“[a ..]”的功能。我写这样的代码。

ListBox1.ColumnWidths = "50;60;0;0;0;0;0;0;0;0;0;0;0;0;0;0;70;0;0;70;0;0;90;0;0;70;0;0;60;0;0;60"            'ukuran kolom
ListBox1.columnCount = 32
ListBox1.List = ws.Range("a4:af" & [a30].End(3).Row).Value

但编译错误。框出现“可以找到项目或库”。有人可以帮帮我吗？

更新完整：

Dim ws As Worksheet
Dim nom As Integer
Dim say As Long, a As Byte

Private Sub userform_initialize()
Sheets("VIP").Select
Set ws = Sheets("VIP")
ListBox1.ColumnWidths = "50;60;0;0;0;0;0;0;0;0;0;0;0;0;0;0;70;0;0;70;0;0;90;0;0;70;0;0;60;0;0;60"            'ukuran kolom
ListBox1.columnCount = 32
ListBox1.List = ws.Range("a4:af" & [a30].End(3).Row).Value

Private Sub ListBox1_Click()
Set ws = Sheets("VIP")
Label8 = ListBox1.ListIndex + 1
yay = Label8.Caption
End Sub

Answer 1

这是Range对象，与Evaluate相同：

Sub FF()
    MsgBox TypeName([A1])           'Shows "Range"
    MsgBox TypeName(Evaluate("A1")) 'Shows "Range"
End Sub

UPDATE

可以创建数组的方式相同：

Dim x
For Each x in [{1, 2, 3}]
   MsgBox x
Next