2012-01-13 49 views
7

Ok vì vậy tôi có một assembly, được viết bằng C#, sử dụng Visual Studio 2010.Sử dụng .Net DLL trong Microsoft Access VBA

Hội đồng này chứa một lớp, chứa một phương thức trả về từ kết quả, mã là dưới đây:

using System.Runtime.InteropServices; 

namespace TestDLL 
{ 
    public class Class1 
    { 
     [ComVisible(true)] 
     public string TestMethod() 
     { 
      return "Result"; 
     } 
    } 
} 

phần đầu ra trong tab Build trên cửa sổ thuộc tính trông giống như vậy:

Visual Studio Output Window

Khi tôi clic k trên Xây dựng, tôi nhận được một tập tin DLL và một tập tin TLB. Tôi có thể thêm tập tin này TLB để Microsoft Access chỉ đơn giản bằng cách duyệt đến nó.

VBA Reference Window

Hiện tại, tôi có nút và nhãn. Tôi muốn biến thuộc tính Caption của nhãn của tôi bằng kết quả của testMethod. Tôi nghĩ tôi cần phải làm điều gì đó tương tự như dưới đây nhưng tôi không chắc chắn, bất kỳ trợ giúp sẽ được nhiều đánh giá cao:

Private Sub btnMain_Click() 

    Dim tm As TestDLL 
    Dim foo As String 

    foo = tm.testMethod 

    lblBarr.Caption = foo 

End Sub 

Thankyou

Trả lời

8

lẽ tiếp theo sẽ làm việc:

Private Sub btnMain_Click() 

    Dim tm As TestDLL.Class1 
    Dim foo As String 

    Set tm = New TestDLL.Class1 
    foo = tm.testMethod 

    lblBarr.Caption = foo 

End Sub 
+0

Làm việc Hoàn hảo! – JMK

Các vấn đề liên quan