建议用集合
http://www.foxtable.com/webhelp/scr/0217.htm
使用可变数组，参考
Dim a(2) As Integera(1) = 100a(2) = 200redim Preserve a(6) '修改数组长度a(5) = 888
加好友 
发短信
Post By：2018/12/20 17:06:00 [显示全部帖子]
