Initial commit

EDOKA_Toolset - Kopie/EDOKA_Toolset/clsHost.vb

@@ -0,0 +1,7 @@
+Friend Class clsHost
+    Implements EDOKA_PluginLib.IHost
+
+    Public Sub ShowFeedback(ByVal strFeedback As String) Implements EDOKA_PluginLib.IHost.ShowFeedback
+        MessageBox.Show(strFeedback, Application.ProductName)
+    End Sub
+End Class