Schliessen des Formulars
[Visual Basic] Private Sub FormularClosing( _
ByVal sender As Object, _
ByVal e As FormClosingEventArgs _
) Handles _
Me.FormClosing
[Visual Basic] Private Sub FormularClosing(ByVal sender As Object, ByVal e As System.Windows.Forms.FormClosingEventArgs) Handles Me.FormClosing
If Me.FormReadonly = True Then Exit Sub
If check_changes() = False Then
e.Cancel = True
Else
If Me.Kuendigungsfrist.Neuer_Datensatz = True Then Me.Kuendigungsfrist.Delete(Me.Kuendigungsfrist.iKuendigungsfristNr.Value)
Globals.MyEventHanlder.Kuendigungsfrist_Closed()
Me.Dispose()
End If
End Sub
Plattformen: Windows 98, Windows 2000 SP4, Windows Millennium Edition, Windows Server 2003, Windows XP Media Center Edition, Windows XP Professional x64 Edition, Windows XP SP2, Windows XP Starter Edition