Question

VB.NET ReDim重定义动态数组

这是一段我写的VB.NET（VB2010）源码，这个过程主要用作重置动态数组下标，但是因为不确定数组的类型，所以就写了“byval arr as array”但是在语句“ReDim Preserve arr(UBound(arr) - 1)”会出现错误，原因是redim函数需要数组。可是arr已经作为参数定义成Array了，不知如何修这个错误。
Private Function refdynarr(ByVal arr As Array) As Array
Dim i, j As Integer
For i = 0 To UBound(arr)
If arr(i) = 0 Or arr(i) = "" Or arr(i) = Nothing Then
For j = i To UBound(arr) - 1
arr(j) = arr(j + 1)
Next
ReDim Preserve arr(UBound(arr) - 1)
End If
Next
Return arr
End Function

Answer 1

Array是一个类型,并非一个数组! 如果你想要传递数组,byval A() as string

追问

如果不知道数组的类型呢？就是说无论是string（），还是integer（）还是其他什么的都可以放怎么写？

追答

你的意思是。 不管什么数组传递进来。都将被重置数组下限？