VB腳本 - 動態數組

Question

我想了解動態數組初始化。在下面的代碼中，爲什麼即使在輸入「y」的值之後數組大小仍未設置。即使在給Y賦值爲4,5時，Lbound和Ubound都顯示爲0。

請給我解釋一下。謝謝。

Dim i 

Redim arr(y) 

y = cint(InputBox("Enter value of y")) 

Msgbox Lbound(arr) 

Msgbox Ubound(arr) 

Answer 1

你應該REDIM後要求的值。

Answer 2

你正在reDiming什麼都沒有，因此你什麼也沒有重做，因此它什麼都沒有返回。 ReDim更適合在已經聲明之後增加數組的大小，而不是用於初始聲明。

使用

Dim array(1) as Integer 
y = cint(InputBox("Enter value of x")) 
Redim array(y) 

或者說，不是很高興看到

y = cint(InputBox("Enter value of x")) 
Dim array(y)