Imports System.Runtime.InteropServices
 
 
Public Class Form1
 
    <DllImport("test_dll.dll")> Private Shared Function nachricht()
 
    End Function
 
    Private Sub Form1_Click(sender As Object, e As System.EventArgs) Handles _
      Me.Click
        nachricht()
 
    End Sub
 
End Class