• Top Members
    Reps
    Posts
  • 834 Replies
    2585 Replies
  • 716 Replies
    2025 Replies
  • 331 Replies
    1928 Replies

Exit application?

Please LOCK your topics once you have found the solution to your question so we know you no longer require help with your query.
Locked
User avatar
Dummy1912
VIP - Donator
Posts: 1959

Exit application?

Sat Sep 09, 2017 5:09 pm

Hello,

Seems sometimes we can start and exit our app without problems
but then sometimes we get a error and the app just crash without exit it

why???
search on net but not really a solution found :(

anyone?

'used

Code: Select all

    Private Sub FrmLogin_FormClosing(sender As Object, e As FormClosingEventArgs) Handles Me.FormClosing
        e.Cancel = True
        Try
            If MyFunctions.IsExit = True Then
                Util.displayMessage("Do you really want to exit from '" & MyFunctions.ProjectName & "'?", MyFunctions.ProjectName, "YesNo")
                If MessageValue = 3 Then
                    MyFunctions.IsExit = False
                    e.Cancel = True
                ElseIf MessageValue = 2 Then
                    e.Cancel = False
                    Environment.Exit(0)
                End If
            Else
                e.Cancel = False
            End If

        Catch ex As Exception
            e.Cancel = False
           Environment.Exit(0)
        End Try
    End Sub

'tried again

Code: Select all

    Private Sub FrmLogin_FormClosing(sender As Object, e As FormClosingEventArgs) Handles Me.FormClosing
        e.Cancel = True
        Try
            If MyFunctions.IsExit = True Then
                Util.displayMessage("Do you really want to exit from '" & MyFunctions.ProjectName & "'?", MyFunctions.ProjectName, "YesNo")
                If MessageValue = 3 Then
                    MyFunctions.IsExit = False
                    e.Cancel = True
                ElseIf MessageValue = 2 Then
                    e.Cancel = False
                    End 
                End If
            Else
                e.Cancel = False
            End If

        Catch ex As Exception
            e.Cancel = False
            End
        End Try
    End Sub

keeps failing

https://drive.google.com/open?id=0B37cl ... XRSNTlxMzQ

User avatar
CodenStuff
Site Admin
Posts: 4367

Re: Exit application?

Sun Sep 10, 2017 12:53 pm

Could try using Exit Sub instead of End

Also try outputting the whatever the error is in your catch statement to see what is happening.
Welcome to CodenStuff.com Learn Code, Love Code. Thank you for being a member of the community.

User avatar
Dummy1912
VIP - Donator
Posts: 1959

Re: Exit application?

Sun Sep 10, 2017 1:03 pm

Hi,

If we use exit sub , this won't really terminate the application... right ?

User avatar
CodenStuff
Site Admin
Posts: 4367

Re: Exit application?

Sun Sep 10, 2017 2:22 pm

Possibly something else running in the background that isn't being stopped/exited correctly which is why it is a good idea to try catch/output the error to see what is going on :duh;
Welcome to CodenStuff.com Learn Code, Love Code. Thank you for being a member of the community.

User avatar
Dummy1912
VIP - Donator
Posts: 1959

Re: Exit application?

Sun Sep 10, 2017 2:24 pm

Hi,

Okay i will look into it ;)

Thanks

Locked

Return to “Coding Help & Support”