在VB中，可以使用ReDim語句來定義和賦值動態數組。下面是定義和賦值動態數組的示例代碼：
Dim myArray() As Integer
' 定義數組并指定大小
ReDim myArray(4)
' 給數組元素賦值
myArray(0) = 1
myArray(1) = 2
myArray(2) = 3
myArray(3) = 4
myArray(4) = 5
在上面的示例中，我們首先使用Dim語句聲明了一個動態數組myArray。然后，使用ReDim語句指定了數組的大小為5，即有5個元素。接下來，在每個元素的索引位置上賦值。在VB中，默認數組索引從0開始，因此元素的索引范圍是0到4。
