【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