Something's very wrong with my program

I need help desperately!

My program, cant unload properly now.

When running under VB, after clicking exit (Unload Me) or the big X, the form is gone, but the VB still in 'run' mode.

In order for my main Form to terminate properly, I gotta click on my About button(frmAbout.show vbModal,Me) [which doesnt run any specific things in the Form_Load(frmAbout) section.] then close the about and then can exit the main form properly.

Anyone ever experience this?? What's is wrong?

It was OK earlier, and I cant trace back the problem now :(

Harddisk

Check if a form calls frmAbout.Show vbModal at any other time in the program. I had a similar problem once. You can find it around here somewhere.

do you load any forms somewhere? Like, do you Load frmAbout at some point, and then when you click on the about button, all it has to do is show?

try this in the Form_UnLoad event :

Code:

---

For Each Form In Forms
  Set Form = Nothing
Next

---

see if that helps...

there is just a little code to add :

Code:

---

Private Sub Form_UnLoad()
END
end sub

---

and this will terminate the program whatever is happening

Quote:

---

Originally posted by markman
Check if a form calls frmAbout.Show vbModal at any other time in the program. I had a similar problem once. You can find it around here somewhere.

---

Nope. The only time frmAbout.Show vbModal, Me is executed, it's on the cmdAbout_Click event. Dont have any other opened forms as well.

There are a total of 3 forms

Code:

---

frmMain -- frmFile (consists of Drive, Dir, File dialogs)
    \
  frmAbout (frmMain is able to terminate after clicking/opening this)

---

The frmMain form can be terminated properly only if I ever click on the About button to call out frmAbout. As for frmFile, it does nothing, the frmMain still stuck there.

Thanks

Harddisk

PS: I did a search on .show on my project folder, it only occurs on the frmMain form file. When I do another search in the file(frmMain) content, there are 2 occurances, which is frmAbout.Show, and frmFile.Show.

Quote:

---

Originally posted by devmax
there is just a little code to add :

Code:

---

Private Sub Form_UnLoad()
END
end sub

---

and this will terminate the program whatever is happening

---

Thanks, this one works like charm, but I still wondering why doesnt the Unload Me/frmMain works, like it used to earlier.

<sigh>

Harddisk

I'm sorry to disagree with devmax, but you should never used End if you want to exit a program gracefully. While end will cause the program to terminate, it often does not give VB enough time do it's housekeeping and what this means is that you may wind up with memory leaks. Rather than using End, just make sure that all forms are unloaded when you want to end. This can be easily accomplished with the following code

Code:

---

'***************************************************************************
'Purpose: Unload all forms when the user is ending execution via the
'        FormControlMenu.
'Outputs: None
'***************************************************************************

    Dim nNdx As Integer
   
    'When done forward, this sometimes gives subscript out of range errors
    For nNdx = Forms.Count - 1 To 0 Step -1
        Unload Forms(nNdx)
    Next
   
End Sub

---

I've read in many articles that using "End", after all other forms have been released from memory, by setting each form to nothing, only benefits in the so called "House Keeping" at the end of a prog. Just my .02 cents...

Quote:

---

Originally posted by Lethal
I've read in many articles that using "End", after all other forms have been released from memory, by setting each form to nothing, only benefits in the so called "House Keeping" at the end of a prog. Just my .02 cents...

---

correct Lethal, but using End by itself is not a very good idea...

Totally agree, just want to though in my thoughts, to use it AFTER all memory is released...Glad somebody agrees...:D