将数组定义为全局数组:dim c(10) \\'定义了全局数组cprivate sub b() \\'自定义了一个函数b\\'对数组c赋值end subprivate sub c() \\'自定义函数ccall b \\'调用函数bmsgbox c(5) \\'直接调用数组的值end sub