vb6中如何调用已赋值变量?

来源:百度知道 编辑:UC知道 时间:2024/05/07 04:01:03
如何在其他控件中调用form-load中已经赋值(固定)的变量?
我的代码是这样的,但不知道为什么不能在通用那里用...
Dim a(6) As Integer, i As Integer
Dim b(1) As Integer, j As Integer
Randomize
For i = 0 To 5
a(i) = Int((99 - 1 + 1) * Rnd) + 1
Next i
For j = 0 To 1
b(j) = Int((9 - 1 + 1) * Rnd) + 1
Next j

Dim a(6) As Integer, i As Integer
Dim b(1) As Integer, j As Integer '在通用这里定义

Private Sub Form_Load()
Randomize
For i = 0 To 6
a(i) = Int((99 - 1 + 1) * Rnd) + 1
Next i
For j = 0 To 1
b(j) = Int((9 - 1 + 1) * Rnd) + 1
Next j
End Sub

这样就可以了

通用定义了先