vb中陣列的宣告？

Question

vb中陣列的宣告，陣列大小在執行中才能決定，不知如何解決。
例如：
dim x() as string
while
x(i)=y
end while
回圈結束後，陣列大小才會決定

Answer 1

可用ReDim在程序層次中用來重新配置動態陣列變數的儲存空間,如:
While y < 10
y = y + 1
Wend
ReDim x(y) As String
MsgBox UBound(x)
或者加上Preserve關鍵字:當改變原有陣列最後一維的大小時，仍然保有原來的資料, 如:
Dim x() As String
y = 0
While y < 10
ReDim Preserve x(y)
x(y) = y: y = y + 1
Wend
For i = 0 To UBound(x)
Print x(i)
Next