Question

VB 数组 循环 赋值，赋不进去。

如题：

Dim a()
dim i as Integer

For i=1 to 10
ReDim a(i)
a（i）= 123 '所有要赋的数都相同。
Next

’为什么只有a(10)赋了进去。而a(10)以前的丢失了？有办法搞回来吗？

Answer 1

Dim a()
dim i as Integer

For i=1 to 10
ReDim Preserve a(i)
a（i）= 123 '所有要赋的数都相同。
Next