Partial Class GästeDataSet
    Partial Public Class GästeDataTable
        Private Sub GästeDataTable_ColumnChanging(sender As Object, e As DataColumnChangeEventArgs) Handles Me.ColumnChanging
            If (e.Column.ColumnName = Me.IDColumn.ColumnName) Then
                'Benutzercode hier einfügen
            End If

        End Sub

    End Class
End Class