MS

2022-05-31 17:14:15 +02:00
parent 8b3c425d6b
commit 9d98bf6fd5
17 changed files with 152 additions and 102 deletions
--- a/GUIs.ZooFlow/ClassInit.vb
+++ b/GUIs.ZooFlow/ClassInit.vb
@@ -65,8 +65,7 @@ Public Class ClassInit

            Dim oMessage = $"{oMessageStart}{oMessage1}{oMessage2}{oMessageEnd}"

-            Dim oMsgBox As New frmDialog(oMessage, _MainForm.Text, frmDialog.DialogType.Error)
-            oMsgBox.ShowDialog()
+            MsgBox(oMessage, MsgBoxStyle.Critical, _MainForm.Text)
            Application.ExitThread()
        Else
            ' Copy back state from MyApplication Helper to My.Application