VB高手进....急啊....

private sub CurrentSub()
dim a(10) as string
'.........
nextSub(a)
end sub

private sub nextSub(byval b() as string)
'你想按地址传递的话用byref
'处理数组b
end sub

这样设计有利于模块的独立性。

定义一个全局变量，将数组的值赋给它，就可以传递下去了

须定义一全局变量`再通过赋值`就要以传递数组的值了``

直接把该数组在通用里定义就可以了，这个窗体内的所有过程都可以直接使用。

申明全局变量（就是在非Sub内申明），申明数组可以直接用
Dim a() as double——注意：这里的的数组如果您的数据量有变动请不要申明，而是申明一个记录数组数的变量Num。每次数组加一，Num=Num+1。然后通过Redim a(Num)改变数组量。

又：本人喜欢用LIST控件，因为它不用考虑数组数据量的变化，并且方便增加、删除，比较直观，如果需要，也可以将其属性设置层不可见。十分方便，不过这里只是个建议。