- vb语言两个不同的数组相加，每个数组的下标不同，有重叠，能重新整理下标么？
-
vb语言两个不同的数组相加，每个数组的下标不同，有重叠，能重新整理下标么？怎么在vb6.0中重新整理不同数组的下标？
不需要整理，用下界的差值来修正下标
Dim a() As Long
Dim b() As Long
Dim i As Long
Dim iX As Long
ReDim a(1 To 3)
ReDim b(0 To 2)
iX = LBound(b) - LBound(a)
For i = 1 To 3
a(i) = a(i) + b(i + iX)
Next
