为什么出错啊

Question

代码如下Private Sub Form_Load()
Dim a(20, 10) As Double
 a(10, 5) = 66666
 a(10, 6) = 8888
 Text1.Text = a(10, 5)
 Text2.Text = a(10, 6)
End SubPrivate Sub Command1_Click()
Text1.Text = a(10, 6)
End Sub
为什么一点击Command1 就提示 子过程或函数为定义    求求大家帮忙

Answer 1

把数组a定义为模快级变量:
Dim a(20, 10) As Double
Private Sub Form_Load()
a(10, 5) = 66666
a(10, 6) = 8888
Text1.Text = a(10, 5)
Text2.Text = a(10, 6)
End SubPrivate Sub Command1_Click()
Text1.Text = a(10, 6)
End Sub

Answer 2

我倒
给分吧Dim a(20, 10) As Double改在通用的声明里就可以了你这个是私有form_load有这个数组 Command1_Click没有 当然出错了