一维数组赋值给二维数组 返回一个二维数组函数

vba数组一维数组怎么赋值给二维数组？一个维度分配给两个维度。参考示例如下：对于（I=0 I< 10 I）{for（J=0 J< Max J）{scanf（\%...