Question

VB中redim到底怎么用！我的这个vb那里错了？

Private Sub Command1_Click()
Dim a$(2)
a(1) = "vb 欢迎你！"
ReDim a$(10)
a(10) = "vb 讨厌你"
Print a(10)
End Sub

这样一运行就提示编译错误 数据维数已定义
在网上看vb教程说Redim是从新定义数据（且不保存原有数据）想验证一下开始试a(1)但也是提示这个！ 怎么解决！

Answer 1

你好，ReDim只可以重新定义动态数组，所谓动态数组就是在第一次dim时没有指定大小的，如Dim a$()。

你讲代码改一下：
Private Sub Command1_Click()
Dim a$()
ReDim a(2)
a(1) = "vb 欢迎你！"
ReDim a(10)
a(10) = "vb 讨厌你"
Print a(10)
End Sub

这样应该就不会出问题了，结果是输出"vb 讨厌你"。

希望能对你有帮助！

Answer 2

redim 是定义动态数组的，你的a$(2)是静态的
你这样试一试
Private Sub Command1_Click()
Dim a$()
ReDim a(1)
a(1) = "vb 欢迎你！"
Print a(1)
ReDim a(10)
a(1) = "vb 讨厌你"
Print a(1)
End Sub