C#实现的COM如下
using System.Runtime.InteropServices;
namespace TestCom
{
    [Guid("1B916CF7-9150-476d-AAC9-DBD365CE58BC")]
    public interface ITestClass
    {
        [DispId(4)]
        string[] GetArray();
    }    public class TestClass: ITestClass
    {
        public string[] GetArray()
        {
            return new string[] { "aa", "bb" };
        }  
    }
}VBS代码,最后一行出错,但在脚本调试器中监视arr变量内容正确。同样是下面的代码在VB6.0中运行正确,显示aa
Dim objCom
Dim arrset objCom = CreateObject("TestCom.TestClass")
arr = objCom.GetArray()
msgbox TypeName(arr)              '显示String()
msgbox Lbound(arr)                '显示0
msgbox Ubound(arr)                '显示1
msgbox arr(0)                     '类型不匹配