Public Class Form1
    Public Sub New()
        Dim splash As New frmSplash()
        Try
            splash.ShowDialog()
        Catch ex As Exception
            'ClassLogger.Add($"Error in Splash: {ex.Message}")
        End Try
        Try
            ' Dieser Aufruf ist für den Designer erforderlich.
            InitializeComponent()

            ' Fügen Sie Initialisierungen nach dem InitializeComponent()-Aufruf hinzu.
            Me.MenueUser.Ribbon = RibbonControl1
        Catch ex As Exception

        End Try


    End Sub
End Class