【VB6】遍历二维数组

For i = LBound(carry, 1) To UBound(carry, 1)

For j = LBound(carry, 2) To UBound(carry, 2)

carry(i,j) = ??

Next j

Next i