Simple stuff (quitting a VB app)

[David Laplante]

On my application's form load, my app will say that it's been in use for, let's say 30 days and will be shut down.

But how can I do it? How do I simply TERMINATE the application? I tried exit sub but of course this won't terminate the application.

Thanks.

[dimava]

to terminate the program all you have to to is write:






Private Sub Command1_Click()
End
End Sub

You mean to exit a program? Use the End command.

Private Sub Form_Load()

   End ' Exit the program

End Sub

[gfk]

Most people tend to think this is the better way of ending a program.

Private Sub CloseAllForms()
    Dim nForm As Form
    For Each nForm In Forms
        Unload nForm
    Next
End Sub

It unloads all forms, thus ending the program.

[timbudtwo]

If you want the exit button to be in an adden button put this in.

Private Sub Command1_Click() 
unload me 'exits the program
End Sub

Or you can just add

unload me

to anything you click on.