| 发表于:2007-09-08 17:30:173楼 得分:5 |
function test()as string() dim str(3) as string …… test=str end function 这样写,但在调用该test()的函数里调用test(0)值执行时报错。 ------------------------------------ dim arr() as string dim i as integer arr=test() for i=0 to ubound(arr) debug.pring arr(i) next | | |
|