e.Cancel

[Carl]

Hi you al
I am new to this stuff and I found this code to close a form in the help files and I do not understand it or where its goe

' Calls this method from the InitializeComponent() method of your form
Private Sub OtherInitialize(
AddHandler Me.Closing, AddressOf Me.Form1_Cance
End Sub 'OtherInitializ

Protected Sub Form1_Cancel(sender As Object, e As CancelEventArgs
If Not myDataIsSaved The
e.Cancel = Tru
MessageBox.Show("You must save first."
Els
e.Cancel = Fals
MessageBox.Show("Goodbye."
End I
End Sub 'Form1_Cance

Forget about the myDataIsSaved stuff. I am trying to know where in the form to put the "Sub OtherInitialize". where ito call it from and to put the "Protected Sub Form1_Cancel
Thank

[Cor Ligthert]

Hi Carl,

I am new to this stuff and I found this code to close a form in the help files and I do not understand it or where its goes

You do not need that, just open in your form code the uper left combobox and
choose form1_events. Than in the right combobox "Closing"

The sub with the handler in it will be completly made. There you can paste
in the syntax you have now in the sub Form_Cancel (Than others will probably
as well understand better your code, en needed by instance when you send a
snippet to this newsgroup).

You can as well delete that first sub and set the addhandler sentence in
the load event from your page, however it is than a little bit not done
code.

I hope this helps?

Cor

' Calls this method from the InitializeComponent() method of your form.
Private Sub OtherInitialize()
AddHandler Me.Closing, AddressOf Me.Form1_Cancel
End Sub 'OtherInitialize

Protected Sub Form1_Cancel(sender As Object, e As CancelEventArgs)
If Not myDataIsSaved Then
e.Cancel = True
MessageBox.Show("You must save first.")
Else
e.Cancel = False
MessageBox.Show("Goodbye.")
End If
End Sub 'Form1_Cancel

Forget about the myDataIsSaved stuff. I am trying to know where in the form to put the "Sub OtherInitialize". where ito call it from and to put the
"Protected Sub Form1_Cancel" Thanks

[Armin Zingler]

"Carl" <an*******@discussions.microsoft.com> schrieb

Hi you all
I am new to this stuff and I found this code to close a form in the
help files and I do not understand it or where its goes

' Calls this method from the InitializeComponent() method of your
form. Private Sub OtherInitialize()
AddHandler Me.Closing, AddressOf Me.Form1_Cancel
End Sub 'OtherInitialize

Protected Sub Form1_Cancel(sender As Object, e As CancelEventArgs)
If Not myDataIsSaved Then
e.Cancel = True
MessageBox.Show("You must save first.")
Else
e.Cancel = False
MessageBox.Show("Goodbye.")
End If
End Sub 'Form1_Cancel

Forget about the myDataIsSaved stuff. I am trying to know where in
the form to put the "Sub OtherInitialize". where ito call it from and
to put the "Protected Sub Form1_Cancel" Thanks

What's your intention? To close a Form, call it's Close method. The closing
event occurs before the Form get's closed. In the event handler you can set
e.cancel = true to stop the Form from being closed. If it is closed, the
Closed event occurs.
--
Armin

How to quote and why:
http://www.plig.net/nnq/nquote.html
http://www.netmeister.org/news/learn2quote.html

[Cor Ligthert]

Hi Armin,

I saw this message at 10:37 (our time) is there something strange or is this
normal?

While I had seen the message from Pieter (DraguVaso) before that in an
earlier refresh.

Cor

[Herfried K. Wagner [MVP]]

* "=?Utf-8?B?Q2FybA==?=" <an*******@discussions.microsoft.com> scripsit:

I am new to this stuff and I found this code to close a form in the help files and I do not understand it or where its goes

' Calls this method from the InitializeComponent() method of your form.
Private Sub OtherInitialize()
AddHandler Me.Closing, AddressOf Me.Form1_Cancel
This adds a handler to the form's 'Closing' event. This event is fired
when the user or the system is trying to close the form.
End Sub 'OtherInitialize

Protected Sub Form1_Cancel(sender As Object, e As CancelEventArgs)
If Not myDataIsSaved Then
'myDataSaved' is a private variable of type 'Boolean' that is set if
data has been saved. If it's not yet saved, a messagebox is shown that
tells the user to save data. In the saving procedure, the Boolean
variable is set.
e.Cancel = True
MessageBox.Show("You must save first.")
Else
Data been saved, so exit-
e.Cancel = False
MessageBox.Show("Goodbye.")
End If
End Sub 'Form1_Cancel

Forget about the myDataIsSaved stuff. I am trying to know where in the form to put the "Sub OtherInitialize". where ito call it from and to put the "Protected Sub Form1_Cancel"
Thanks

You put it after the call to 'InitializeComponent' in your 'Sub New'.

--
Herfried K. Wagner [MVP]
<URL:http://dotnet.mvps.org/>

[Cor Ligthert]

Hi Herfried,

I did advice 3 hours ago not to use this method, can you descibe why it
should be done in this way and not in the way as it is build in by
Microsoft?

Cor

* "=?Utf-8?B?Q2FybA==?=" <an*******@discussions.microsoft.com> scripsit:

I am new to this stuff and I found this code to close a form in the help files and I do not understand it or where its goes
' Calls this method from the InitializeComponent() method of your form.
Private Sub OtherInitialize()
AddHandler Me.Closing, AddressOf Me.Form1_Cancel

This adds a handler to the form's 'Closing' event. This event is fired
when the user or the system is trying to close the form.

End Sub 'OtherInitialize

Protected Sub Form1_Cancel(sender As Object, e As CancelEventArgs)
If Not myDataIsSaved Then

'myDataSaved' is a private variable of type 'Boolean' that is set if
data has been saved. If it's not yet saved, a messagebox is shown that
tells the user to save data. In the saving procedure, the Boolean
variable is set.

e.Cancel = True
MessageBox.Show("You must save first.")
Else

Data been saved, so exit-

e.Cancel = False
MessageBox.Show("Goodbye.")
End If
End Sub 'Form1_Cancel

Forget about the myDataIsSaved stuff. I am trying to know where in the form to put the "Sub OtherInitialize". where ito call it from and to put the
"Protected Sub Form1_Cancel" Thanks

You put it after the call to 'InitializeComponent' in your 'Sub New'.

[Herfried K. Wagner [MVP]]

* "Cor Ligthert" <no**********@planet.nl> scripsit:

I did advice 3 hours ago not to use this method, can you descibe why it
should be done in this way and not in the way as it is build in by
Microsoft?

Using 'Handles' is not much different from using 'AddHandler'. I would
do that the way you described too, but I thought it's still important to
tell the OP what the code is doing.

Just my 2 Euro cents...

--
Herfried K. Wagner [MVP]
<URL:http://dotnet.mvps.org/>