主题：如何调用代码生成的数组

请教：在金子塔里，代码生成的数组如何调用？

 

通过代码生成数组，在代码结束前用输出方式验证，数组中数据正确。在另外一个程序中想调用数组中数据，不知该如何处理？

谢谢指导。

 

Sub LX_JC()

'

'

'生成数组arr1

'

'生成数组arr2，然后通过下边的输出进行验证，结果正确。

For x=0 to ubound(arr2)
application.MsgOut arr1(x)
application.MsgOut arr2(x)
next                                 ,这里通过输出，验证arr1和arr2确实有符合要求的数据。
End sub

 

然后，想通过以下方式调用数组：

sub cs()

For x=0 to ubound(arr2)     '这里提示错误“类型不匹配”
application.MsgOut arr2(x)
next                                

End sub

 

感谢老师指点，我再试试吧。