Question

vb中如何用地址引用数组

现在有3个数组，Output()，A()，B()
在显示时使用Output()，而Output()的内容由另一个变量选择A()或B()
假设此时Output()与A()对应
同时要求一切对Output()的修改都能反映到A()，对A()的修改也能反映到Output()
如何实现

Answer 1

Private Sub Form_Load()
Dim a(1)
a(0) = 1
a(1) = 2
test a
MsgBox a(0) & "," & a(1)
End Sub

Sub test(ByRef test())
test(0) = 2
test(1) = 1
End Sub

追问

这样的话 test() 只是当前过程有效，无法全局有效，我的Output()有很多过程都要操作。

追答

public sub test(byref test()) 放到模块里 不就全局了

追问

public sub test(byref test()) 只是过程全局了，但是 test()数组还是过程中有效。另外我的Output()还有可能与B()对应，同时由于Output()使用次数太多，所以我不想每次都进行到底对应的是A()还是B()的判断，希望一开始就修改地址指针。用调用过程的方法无法避免每次都要进行到底对应的是A()还是B()的判断。