如何让Activex控件访问到主程序中的对象数组？

Question

在主程序中有一系列对象数组，我想在activex控件中实现对这些对象数组中数据的保存，怎么样才能让Activex控件访问到主程序中的这些对象数组呢（对象数组为VB下自定义的Class 对象）

Answer 1

Dim 源(1) As Object
    Dim 目标() As Object    Dim a As New StdFont
    Dim b As New StdFont
    
    a.Size = 14
    b.Size = 16
    
    Set 源(0) = a
    Set 源(1) = b    Debug.Print o(0).Size
    Debug.Print o(1).Size    目标 = 源    Debug.Print 目标(0).Size
    Debug.Print 目标(1).Size

Answer 2

上面：    Debug.Print o(0).Size
    Debug.Print o(1).Size应为：    Debug.Print 源(0).Size
    Debug.Print 源(1).Size不好意思，笔误。

Answer 3

嗯，你的方案不错，但是
在ActiveX控件中如何定义对象数组呢？