473,405 Members | 2,338 Online
Bytes | Software Development & Data Engineering Community
Post Job

Home Posts Topics Members FAQ

Join Bytes to post your question to a community of 473,405 software developers and data experts.

Cancelling the form to unload in vb .net

lotus18
866 512MB
How to cancel the unload event of a form? I have this code in vb 6 and it is working:

Expand|Select|Wrap|Line Numbers
  1. Private Sub Form_QueryUnload(Cancel As Integer, UnloadMode As Integer)
  2.     If MsgBox("Are you sure you want to exit system?", vbYesNo, "Exit System") = vbYes Then
  3.         Unload Me
  4.     Else
  5.         Cancel = 1
  6.     End If
  7. End Sub
  8.  
I converted the codes to vb .net but I failed to make it:

Expand|Select|Wrap|Line Numbers
  1. Private Sub frmMain_FormClosing(ByVal sender As Object, ByVal e As System.Windows.Forms.FormClosingEventArgs) Handles Me.FormClosing
  2.         If MessageBox.Show("Are you sure you want to exit system?", "Exit System", MessageBoxButtons.YesNo, MessageBoxIcon.Question) = Windows.Forms.DialogResult.Yes Then
  3.             Global.System.Windows.Forms.Application.Exit()
  4.         Else
  5. Exit Sub
  6.         End If
  7. End Sub
Rey Sean
May 23 '08 #1
3 2951
Sick0Fant
121 100+
How to cancel the unload event of a form? I have this code in vb 6 and it is working:

Expand|Select|Wrap|Line Numbers
  1. Private Sub Form_QueryUnload(Cancel As Integer, UnloadMode As Integer)
  2.     If MsgBox("Are you sure you want to exit system?", vbYesNo, "Exit System") = vbYes Then
  3.         Unload Me
  4.     Else
  5.         Cancel = 1
  6.     End If
  7. End Sub
  8.  
I converted the codes to vb .net but I failed to make it:

Expand|Select|Wrap|Line Numbers
  1. Private Sub frmMain_FormClosing(ByVal sender As Object, ByVal e As System.Windows.Forms.FormClosingEventArgs) Handles Me.FormClosing
  2.         If MessageBox.Show("Are you sure you want to exit system?", "Exit System", MessageBoxButtons.YesNo, MessageBoxIcon.Question) = Windows.Forms.DialogResult.Yes Then
  3.             Global.System.Windows.Forms.Application.Exit()
  4.         Else
  5. Exit Sub
  6.         End If
  7. End Sub
Rey Sean
Use the FormClosing eventargs

Expand|Select|Wrap|Line Numbers
  1. If MessageBox.Show("Are you sure?", "Close?", MessageBoxButtons.YesNo) = Windows.Forms.DialogResult.No Then
  2.       e.Cancel = True
  3.     Else
  4.       e.Cancel = False
  5.     End If
  6.  
May 23 '08 #2
lotus18
866 512MB
I just added this line.

Expand|Select|Wrap|Line Numbers
  1. e.Cancel = True
But now, the problem is, it showing the message dialog box twice when I clicked the Yes button. What may be the problem? What do you think?

Rey Sean
May 23 '08 #3
Plater
7,872 Expert 4TB
Do you have two event handlers assigned to the event?

It should also be noted that you need to be looking at the e.CloseReason property too make sure it's not CloseReason.WindowsShutDown or CloseReason.TaskManagerClosing. You should not popup your messagebox if it's one those two.
May 23 '08 #4

Sign in to post your reply or Sign up for a free account.

Similar topics

4
by: MS | last post by:
Just a general question here re VBA. Can anyone explain the differences between "!" and "." when refering to a control? eg Me!TxtBox and Me.TxtBox. What is difference between "+" and "&"...
10
by: peter hansen | last post by:
I tried a couple of weeks ago but I'll try again :D I old VB6-days it was possible to unload a form bu using the Unload(Form) command. I have tried the Close-function but it'll unload the entire...
1
devonknows
by: devonknows | last post by:
Ok, i posted about forcing a form to unload, now since ive implemented that, when check1.value = true, when you close the form, it doesnt unload, when check1.value = false, it unloads perfectly and...
6
by: Ronald S. Cook | last post by:
We have a Windows app that has one main form (a shell, sort of). We then load user controls into a panel on the form depending on what the user has selected. Our current code to unload the...
0
by: emmanuelkatto | last post by:
Hi All, I am Emmanuel katto from Uganda. I want to ask what challenges you've faced while migrating a website to cloud. Please let me know. Thanks! Emmanuel
0
BarryA
by: BarryA | last post by:
What are the essential steps and strategies outlined in the Data Structures and Algorithms (DSA) roadmap for aspiring data scientists? How can individuals effectively utilize this roadmap to progress...
0
by: Hystou | last post by:
There are some requirements for setting up RAID: 1. The motherboard and BIOS support RAID configuration. 2. The motherboard has 2 or more available SATA protocol SSD/HDD slots (including MSATA, M.2...
0
marktang
by: marktang | last post by:
ONU (Optical Network Unit) is one of the key components for providing high-speed Internet services. Its primary function is to act as an endpoint device located at the user's premises. However,...
0
by: Hystou | last post by:
Most computers default to English, but sometimes we require a different language, especially when relocating. Forgot to request a specific language before your computer shipped? No problem! You can...
0
Oralloy
by: Oralloy | last post by:
Hello folks, I am unable to find appropriate documentation on the type promotion of bit-fields when using the generalised comparison operator "<=>". The problem is that using the GNU compilers,...
0
by: Hystou | last post by:
Overview: Windows 11 and 10 have less user interface control over operating system update behaviour than previous versions of Windows. In Windows 11 and 10, there is no way to turn off the Windows...
0
tracyyun
by: tracyyun | last post by:
Dear forum friends, With the development of smart home technology, a variety of wireless communication protocols have appeared on the market, such as Zigbee, Z-Wave, Wi-Fi, Bluetooth, etc. Each...
0
agi2029
by: agi2029 | last post by:
Let's talk about the concept of autonomous AI software engineers and no-code agents. These AIs are designed to manage the entire lifecycle of a software development project—planning, coding, testing,...

By using Bytes.com and it's services, you agree to our Privacy Policy and Terms of Use.

To disable or enable advertisements and analytics tracking please visit the manage ads & tracking page.