Neuer Datensatz erstellen
[Visual Basic] Private Sub TSBtnNew_Click( _
ByVal sender As Object, _
ByVal e As EventArgs _
) Handles _
TSBtnNew.Click
[Visual Basic] Private Sub TSBtnNew_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles TSBtnNew.Click
If Me.Check_Changes = False Then Exit Sub
Me.Get_Data(Me.Kontaktperson.Add_New(Me.Vertragselementnr))
Me.Kontaktperson.Neuer_Datensatz = True
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