[Visual Basic] Private Function Get_Vertragspartner_Kontakte() As Object
[Visual Basic] Private Function Get_Vertragspartner_Kontakte()
Try
'If Check_Changes() = False Then Exit Function
Catch ex As Exception
End Try
Me.C1Kontaktpersonen.Enabled = False
Me.Vertragspartner.Get_Kontaktpersonen(Me.C1Kontaktpersonen)
Me.SpaltenTitel.Spaltentitel_aktualisieren(Me.C1Kontaktpersonen, "Person", Me.Vertragspartner.Kontaktpersonen.Tabledata)
Me.C1Kontaktpersonen.Enabled = True
End Function
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