add monodiag, add workflow overview

GUIs.Test.TestGUI/Form1.vb

@@ -41,6 +41,7 @@ Public Class Form1
 
     Private Sub Form1_Load(sender As Object, e As EventArgs) Handles Me.Load
         MyLogger = New LogConfig(LogConfig.PathType.CurrentDirectory, Nothing, "MAIN")
+        MyLogger.Debug = True
         Logger = MyLogger.GetLogger()
 
         Dim MySecondLogger = New LogConfig(LogConfig.PathType.CurrentDirectory, Nothing, "MAIN2")
@@ -169,4 +170,12 @@ Public Class Form1
         bw1.RunWorkerAsync()
     End Sub
 
+    Private Sub Button6_Click(sender As Object, e As EventArgs) Handles Button6.Click
+        Logger.Error(New ApplicationException("Some Error occurred!"))
+
+        ListBox1.Items.Clear()
+        For Each oLog In MyLogger.Logs
+            ListBox1.Items.Add(oLog)
+        Next
+    End Sub
 End Class