vb不能给数组赋值如何解决

在VB中，给数组赋值有多种方式。以下是一些常见的方法：

1. 使用For循环逐个赋值数组元素：

Dim arr(5) As Integer
For i As Integer = 0 To arr.Length - 1
arr(i) = i + 1
Next i

2. 使用Array类的Initialize方法初始化数组：

Dim arr() As Integer = New Integer() {1, 2, 3, 4, 5}

3. 使用集合类（如List或ArrayList）来动态添加元素，并将其转换为数组：

Dim list As New List(Of Integer)()
list.Add(1)
list.Add(2)
list.Add(3)
Dim arr() As Integer = list.ToArray()

4. 使用Array类的Resize方法调整数组大小，并逐个赋值数组元素：

Dim oldArr() As Integer = {1, 2, 3}
ReDim arr(oldArr.Length) ' 调整数组大小
For i As Integer = 0 To oldArr.Length - 1
arr(i) = oldArr(i)
Next i

请根据您的具体需求选择适合的方法。