fix closing
This commit is contained in:
@@ -28,9 +28,11 @@ Partial Class frmSplashScreen
|
|||||||
'
|
'
|
||||||
Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
|
Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
|
||||||
Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
|
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.Name = "frmSplashScreen"
|
||||||
Me.Opacity = 0R
|
Me.Opacity = 0R
|
||||||
|
Me.ShowIcon = False
|
||||||
|
Me.ShowInTaskbar = False
|
||||||
Me.Text = "frmSplashScreen"
|
Me.Text = "frmSplashScreen"
|
||||||
Me.ResumeLayout(False)
|
Me.ResumeLayout(False)
|
||||||
|
|
||||||
|
|||||||
@@ -75,7 +75,10 @@ Public Class frmSplashScreen
|
|||||||
End If
|
End If
|
||||||
|
|
||||||
Dim oForm As New frmMain(State)
|
Dim oForm As New frmMain(State)
|
||||||
oForm.Show()
|
oForm.ShowDialog()
|
||||||
|
|
||||||
|
' Close this form after frmMain is closed
|
||||||
|
Close()
|
||||||
|
|
||||||
Catch ex As ApplicationException
|
Catch ex As ApplicationException
|
||||||
Logger.Error(ex)
|
Logger.Error(ex)
|
||||||
|
|||||||
Reference in New Issue
Block a user