closing

[Maarten]

hi all,

Private Sub Form1_Closing(ByVal sender As System.Object, ByVal e As
CancelEventArgs) Handles MyBase.Closing

If MsgBox("Really close?", MsgBoxStyle.YesNo Or MsgBoxStyle.Question) =
MsgBoxResult.No Then

e.Cancel = True

End If

End Sub

Private Sub MenuItem28_Click(ByVal sender As System.Object, ByVal e As
System.EventArgs) Handles MenuItem28.Click

Form1_Closing( ?;? )

End Sub

how can i call the form1_closing sub from sub menuitem28_click

regards Maarten

[Herfried K. Wagner [MVP]]

"Maarten" <gu******@hotmail.com> schrieb:

Private Sub Form1_Closing(ByVal sender As System.Object, ByVal e As
CancelEventArgs) Handles MyBase.Closing
If MsgBox("Really close?", MsgBoxStyle.YesNo Or MsgBoxStyle.Question) =
MsgBoxResult.No Then
e.Cancel = True
End If
End Sub

Private Sub MenuItem28_Click(ByVal sender As System.Object, ByVal e As
System.EventArgs) Handles MenuItem28.Click
Form1_Closing( ?;? )
End Sub

how can i call the form1_closing sub from sub menuitem28_click

'Me.Close()'.

--
M S Herfried K. Wagner
M V P <URL:http://dotnet.mvps.org/>
V B <URL:http://dotnet.mvps.org/dotnet/faqs/>