diff --git a/EnvelopeGenerator.Form/frmSplashScreen.Designer.vb b/EnvelopeGenerator.Form/frmSplashScreen.Designer.vb index 60ae79f0..4341c701 100644 --- a/EnvelopeGenerator.Form/frmSplashScreen.Designer.vb +++ b/EnvelopeGenerator.Form/frmSplashScreen.Designer.vb @@ -28,9 +28,11 @@ Partial Class frmSplashScreen ' Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!) Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font - Me.ClientSize = New System.Drawing.Size(800, 450) + Me.ClientSize = New System.Drawing.Size(365, 204) Me.Name = "frmSplashScreen" Me.Opacity = 0R + Me.ShowIcon = False + Me.ShowInTaskbar = False Me.Text = "frmSplashScreen" Me.ResumeLayout(False) diff --git a/EnvelopeGenerator.Form/frmSplashScreen.vb b/EnvelopeGenerator.Form/frmSplashScreen.vb index 0a394668..744034da 100644 --- a/EnvelopeGenerator.Form/frmSplashScreen.vb +++ b/EnvelopeGenerator.Form/frmSplashScreen.vb @@ -75,7 +75,10 @@ Public Class frmSplashScreen End If Dim oForm As New frmMain(State) - oForm.Show() + oForm.ShowDialog() + + ' Close this form after frmMain is closed + Close() Catch ex As ApplicationException Logger.Error(ex)