不明白。为什么不可以调用 在线等

这题为2007年春二级试卷上机题的一道编程题
希望有感兴趣的人帮我回答下
在线等。。

Private Sub change(v() As Integer)
Dim i As Integer, s As Integer, sum As Integer
For i = 1 To k
sum = sum + v(i)
Next i
av = sum / k

For i = 1 To k
s = (v(i) - av) ^ 2
Next i
q = Sqr(s / (k - 1))

For i = 1 To k
v = (v(i) - av) / q
List1.AddItem v(i) & v
Next i
End Sub

Option Base 1
Public v() As Integer, k As Integer, av As Double, q As Double
Private Sub Command1_Click()
Dim i As Integer
k = InputBox("请输入样本数据的个数", , 10)
ReDim v(k)
For i = 1 To k
v(i) = Int(Rnd * 999 + 1)
Text1 = Text1 & Str(v(i))
Next i
End Sub

Private Sub Command2_Click()
Call change(v) ‘此处为什么不可以使用已经生成的数组v()
End Sub
还是不行啊。。
谁能告诉我。还有原因

不明白。为什么不可以调用 在线等 为什么main()不可以调用递归函数？ 这段代码有错吗？为什么不可以调用？ 为什么不可以在线看电视剧呢 为什么我瑞星2006不可以在线升级 好记星为什么不可以格式化????(在线等答案) Repaly为什么不可以播放在线电影rmvb格式 在线求助!紫光拼音为什么安装了不可以使用? 我的电脑为什么不可以在线观看免费电影? 我的电脑为什么不可以看在线电影。