C#で作ったCOMオブジェクトの関数の戻り値にクラスの配列を含めたい

Question

Ｃ＃でＣＯＭオブジェクト(ＤＬＬ)を作ってます。

###発生している問題
関数の戻り値としてクラスを返したいのですが、クラスの配列を含めたクラスを戻り値にすると、受け取り側(ＶＢ６)のアプリがコンパイルできません。

###エラーメッセージ(ＶＢ６)

ｺﾝﾊﾟｲﾙ ｴﾗｰ:

引数の数が一致していません。または不正なﾌﾟﾛﾊﾟﾃｨを指定しています。

###問題のコード

using System.Runtime.InteropServices;

namespace COMTest
{
    [ComVisible(true)]
    [ClassInterface(ClassInterfaceType.AutoDual)]
    public class InnerClass
    {
        public int InnerID;
        public string Name;
    }

    [ComVisible(true)]
    [ClassInterface(ClassInterfaceType.AutoDual)]
    public class ClassA
    {
        public int ID;
        public InnerClass[] AAA;
    }

    [ComVisible(true)]
    [InterfaceType(ComInterfaceType.InterfaceIsDual)]
    public interface ITest
    {
        ClassA VBGetClassA();
    }

    [ClassInterface(ClassInterfaceType.None)]
    public class FromVB6:ITest
    {
        public ClassA VBGetClassA()
        {
            ClassA a = new ClassA();
            a.ID = 1;
            a.AAA = new InnerClass[2];
            a.AAA[0] = new InnerClass();
            a.AAA[0].InnerID = 1;
            a.AAA[0].Name = @"ClassA-InnerClass1";
            a.AAA[1] = new InnerClass();
            a.AAA[1].InnerID = 2;
            a.AAA[1].Name = @"ClassA-InnerClass2";
            return a;
        }
    }
}

VB6
Private Sub Command1_Click()
Dim x As COMTest.FromVB6
Dim a As ClassA

    Set x = New COMTest.FromVB6
    Set a = x.VBGetClassA()
    Debug.Print a.ID
    Debug.Print a.AAA(0).InnerID ' ここでエラーが発生します(AAA(0)が選択される)。
    Debug.Print a.AAA(0).Name
    Debug.Print a.AAA(1).InnerID
    Debug.Print a.AAA(1).Name

###試したこと
AAAを配列にしなければ問題なく動きました。そのときのコードは以下の通りです。

    ～略～
    public class ClassA
    {
        public int ID;
        public InnerClass AAA;
    }
    ～略～
        public ClassA VBGetClassA()
        {
            ClassA a = new ClassA();
            a.ID = 1;
            a.AAA = new InnerClass();
            a.AAA.InnerID = 1;
            a.AAA.Name = @"ClassA-InnerClass1";
            return a;
        }
    ～略～

VB6
Private Sub Command1_Click()
Dim x As COMTest.FromVB6
Dim a As ClassA

    Set x = New COMTest.FromVB6
    Set a = x.VBGetClassA()
    Debug.Print a.ID
    Debug.Print a.AAA.InnerID
    Debug.Print a.AAA.Name

###補足情報
ＶＢ６のウォッチウインドウで戻り値の中を見ると、配列にしたクラスの中身は問題なく格納されていました。

開発環境は、
Windows7 Professional(SP1)
Microsoft Visual Studio Community 2015
.Net Framework 4.6
Visual C# 2015
VB6(SP6)
です。

以上、宜しくお願い致します。

Answer 1

ＶＢ６側でAAAをVariant型の変数に代入することで値を参照することができました。

Private Sub Command1_Click()  
Dim x As COMTest.FromVB6
Dim a As ClassA
Dim c
Dim i As Integer

    Set x = New COMTest.FromVB6
    Set a = x.VBGetClassA()
    Debug.Print a.ID
    c = a.AAA
    For i = 0 To UBound(c)
        Debug.Print c(i).InnerID
        Debug.Print c(i).Name
    Next i
    Set c = Nothing
    Set a = Nothing
    Set x = Nothing
End Sub