<ComClass(NETClass.ClassId, NETClass.InterfaceId, NETClass.EventsId)> _
Public Class NETClass
 
  Public Const ClassId = "B8C89930-1BB8-45a8-8A65-C91E4FCF866A"
  Public Const InterfaceId = "3A0C0E57-AD12-4fd8-9720-2EB3133EC464"
  Public Const EventsId = "1516D3DD-62F8-4039-B400-F17A6CFC2982"
 
  Public Sub Senden()
    '...
    MsgBox("Ok!")
    '...
  End Sub
 
End Class

<Assembly: ComVisible(True)>

Option Explicit
 
Private Sub Command1_Click()
  Dim cDLL As New VBNETDLL.NETClass
 
    'Die Eigenschaft "eine_nicht_vorhandene_Eigenschaft" gibt´s nicht in der 
    ' DLL!
    'Dies wird vom Compiler nicht gemeldet - auch nicht, wenn eine EXE erstellt 
    ' wird...
  cDLL.eine_nicht_vorhandene_Eigenschaft = "Nachrichtentext"
 
  Call cDLL.Senden
 
End Sub