' .NET Code
Public Class Class1
  Public Sub Test()
    MsgBox("Testaufruf")
  End Sub
End Class

Dim oClass As Object
 
' DLL laden und Klasse "Class1" instanzieren
Set oClass = CreateObject("ClassLibrary1.Class1")
 
' DLL-Funktionen aufrufen
oClass.Test

_________________________
Professionelle Entwicklerkomponenten
www.tools4vb.de