Illegal Operation

[gazza]

I am using VB6 with a form that has Border style 2 (sizeable). When using the application if I use the close button (X) in top right corner I get a message Vb 6 has performed an illegal operation and will shut down. I also have an exit button - if I use that all is OK.
Anyone have any ideas?
I have also tried compiling the app but similar thing happens.

[MrPolite]

You have to change your windows
I dont think there's anything wrong with your app, windows just sucks too much. Thank microsoft

[BuggyProgrammer]

you probably have End in your unload or something. post what code you have in unload, and what code you have in your exit button

[gazza]

many thanks for taking the time. Have included the CloseAny Files routine as well because this is also called.

Private Sub Form_Unload(Cancel As Integer)
'If Comms port is open - close it
If MSComm1.PortOpen Then
MSComm1.PortOpen = False
End If
SaveSetting App.Title, "Files", "LogFile", TempName

Reset
CloseAnyFiles
End

End Sub


Private Sub mnuExit_Click()
Form_Unload Ret
End Sub


Sub CloseAnyFiles()
On Error Resume Next
XLApp.DisplayAlerts = False
XLBook.Close

'XLApp.Workbooks.Close 'SaveChanges:=False
XLApp.Quit
Set XLApp = Nothing
Set XLBook = Nothing
Set XLSheet = Nothing
End Sub

[gazza]

Well it is definitely the END statement in the Unload routine - but it was working before. How do you end otherwise??
About the only thing I have changed it the way I retrieve data from COM1 port.

[rjlohan]

You should never really use the End statement. When all forms in an app are unloaded, the app will close. Use this code in the Unload event of your main form:

Dim frm As Form
For Each frm In Forms
   Unload frm
Next

Now all forms will unload, and your app will close.

[gazza]

Worked perfectly - many thanks.
Just goes to show you should not believe what you read in books. Who would of thought END could cause so much grief.

[MrPolite]

yes it's true that END is such an evil thing to use, but it shouldnt cause problemmos. Dont you think it's your Windows that doesnt like the END command?
It shouldnt cause your program to crash, right?

[cafeenman]

I use what RJ posted and then put an End statement right after it just to make sure. I don't get the illegal operation error though.

[mendhak]

Originally posted by cafeenman
I use what RJ posted and then put an End statement right after it just to make sure. I don't get the illegal operation error though.

That's because the program ended already.

END is truly evil.... It's been said a million times already.

[cafeenman]

Originally posted by mendhak


That's because the program ended already.

END is truly evil.... It's been said a million times already.

OK, then I can use end without creating an illegal operation.