从C＃到VB6传递类对象的数组

嗨在C＃中有一个项目，它返回一个MyClass类型的对象与GetArray（）方法的列表。我用regasm ClassLibrary1.dll/codebase/tlb注册这个dll，然后在VB6的项目中添加ClassLibrary1.tlb引用，如下面的代码。当我运行Microsoft Visual Studio 6.0中它的工作原理，但是当我试图运行VB6的EXE我有一个运行时错误从C＃到VB6传递类对象的数组

using System.Collections.Generic; 

using System.Runtime.InteropServices; 

namespace ClassLibrary1 

{ 

    [ClassInterface(ClassInterfaceType.AutoDual)] 

    [Guid("D878834C-306E-4260-905F-BDEBDF14CBDA")] 

    [ComVisible(true)] 

    public class MyProjectC 

    { 

     public MyClass[] GetArray() 

     { 

      var list = new List<MyClass> 

          { 

           new MyClass {Nome = "A"}, 

           new MyClass {Nome = "AB"}, 

           new MyClass {Nome = "AC2"}, 

           new MyClass {Nome = "D"} 

          }; 

      return list.ToArray(); 
     } 
    } 


    [ClassInterface(ClassInterfaceType.AutoDual)] 

    [Guid("D878834C-306E-4260-905F-BDEBDF14C111")] 

    [ComVisible(true)] 

    public class MyClass 

    { 

     public string Nome; 

    } 

} 


Private Sub Form_Load() 

    On Error GoTo error 

    Dim str As String 

    Dim oBookMark As Variant 
    Dim theProjectC As New ClassLibrary1.MyProjectC 


    For Each oBookMark In theProjectC.GetArray 
     str = oBookMark.Nome 
     MsgBox str 
    Next 

    Exit Sub 

error: 
MsgBox "Errore" & Err.Description 

End Sub

来源

2010-12-19 Massimiliano Saponaro

如果您发布了运行时错误，这将有所帮助。 – 2010-12-19 10:11:27

您也可以在EXE本身而不是IDE中对其进行测试。出于某种原因，我们无法让VB6应用程序在IDE中工作，但EXE正常工作。 – jakdep 2010-12-20 11:08:50

试着改变你的公共领域MyClass.Nome到公共属性内的VB6应用程序：

public string MyNome { get; set; }

来源

2010-12-19 10:22:10 Joe

从C＃到VB6传递类对象的数组

回答

相关问题