怎样在vb中定义一个函数 或过程,在这个函数或过程中给几个动态数组赋值,然后在其他窗体调用这些数组?

2025-01-07 19:16:15
推荐回答(1个)
回答1:

Dim a(), b() '把数组定义到这里,也就是所有函数事件的上方位置
Private Sub Form_Load() '窗体load事件(加载时)我我就在这里赋值了
'赋值
ReDim a(3)
ReDim b(2)
a(1) = 1
a(2) = 2
a(3) = 3
b(1) = 10
b(2) = 11
End Sub
Private Sub Command1_Click() '一个按钮的事件
'演示一下这里可以调用
Print a(2)
Print b(2)
End Sub