Closing The Program

Closing the program Rate Topic:

#1 centers

New D.I.C Head

Group: New Members
Posts: 2
Joined: 25-September 07

Dream Kudos: 0

Post icon Posted 25 September 2007 - 12:14 PM

Well I started writing code for a control simulator and before I knew it I had 40 Forms and 2 Modules. It runs well when I run it in the IDE but when I made it into an exe it ran ok but when I clicked on the close button (the X in the upper right hand corner) not all of the forms closed.
So what is the best way to Close or Exit a program?

This post has been edited by centers: 25 September 2007 - 01:19 PM

Was This Post Helpful? 0

Register for Free to Make These Ads Go Away!

#2 Martyr2

Programming Theoretician

Group: Mentors
Posts: 7,676
Joined: 18-April 07

Windows Favorite Browser Favorite Processor Favorite Gaming Platform Your Car
Dream Kudos: 0
Expert In: C/C++, Java, VB, VB.NET, C#, PHP, Web Development, HTML & CSS, Javascript

Posted 25 September 2007 - 03:55 PM

What you will want to do is loop through all the forms and unload them. VB will fully close as soon as you close all forms. This is even recommended over the use of End and can be done with a snippet like the following...

Public Sub UnloadAllForms()

	  Dim objForm As Form
		 
	  ' Loop through all the forms and unload each
	  For Each objForm In Forms
			Unload objForm
	  Next

	  Set objForm = Nothing
End Sub

Then all you have to do is call the function to unload all the forms loaded. I hope this is a solution that will work for you. Good luck.

Was This Post Helpful? 0

#3 born2c0de

printf("I'm a %XR",195936478);

Group: Moderators
Posts: 4,566
Joined: 26-November 04

Windows Favorite Browser Favorite Processor Favorite Gaming Platform Your Car
Dream Kudos: 2825
Expert In: J2ME, 80x86 Assembly, C/C++, VB6, VB.NET, C#, J2SE, Win32 API, Reversing

Posted 26 September 2007 - 06:22 AM

Quote

This is even recommended over the use of End

Exactly.

The End statement stops code execution abruptly without invoking the Unload, QueryUnload, or Terminate event, or any other Visual Basic code.

Objects created from class modules are destroyed, files opened using the Open statement are closed, and memory used by your program is freed. Object references held by other programs are invalidated.

The End statement provides a way to force your program to halt. For normal termination of a Visual Basic program, you should unload all forms. Your program closes as soon as there are no other programs holding references to objects created from your public class modules and no code executing.

Source : MSDN

Was This Post Helpful? 0

#4 centers

New D.I.C Head

Group: New Members
Posts: 2
Joined: 25-September 07

Dream Kudos: 0

Posted 26 September 2007 - 06:39 PM

Thanks for the snippet.
How would I trigger this?
I'm thinking maybe put a cmdClose() in one of the modules. Would that be triggered from any of the forms if the Close ( X in the top right had corner of a form) was Clicked?

Martyr2, on 25 Sep, 2007 - 04:55 PM, said:

Public Sub UnloadAllForms()

	  Dim objForm As Form
		 
	  ' Loop through all the forms and unload each
	  For Each objForm In Forms
			Unload objForm
	  Next

	  Set objForm = Nothing
End Sub

Then all you have to do is call the function to unload all the forms loaded. I hope this is a solution that will work for you. Good luck.

Was This Post Helpful? 0