vb爱好者进来看一下吧!

来源:百度知道 编辑:UC知道 时间:2024/05/26 16:39:15
Option Base 1
Private Sub Form_Load()
Dim a
a = Array(4, 1, 2, 5, 8)
For i = 1 To 5
Print a(i);
Next i
End Sub
上边的句子写在窗体加载事件中,运行时不报错也不显示数据,只有空白窗体,而同样的内容,把它粘在窗体单击事件中,就可以,为什么?

因为form的autoredraw属性默认是false,只要改成true就可以了。
Option Base 1
Private Sub Form_Load()
Form1.AutoRedraw = True
Dim a
a = Array(4, 1, 2, 5, 8)
For i = 1 To 5
Print a(i);
Next i
End Sub

数组的问题,下标越界

因为print不能用加载事件来运行.是正常现象