Public Class Data_01
 
    Private Sub ProviderBindingNavigatorSaveItem_Click(ByVal sender As _
      System.Object, _
    ByVal e As System.EventArgs) Handles ProviderBindingNavigatorSaveItem.Click
        Me.Validate()
        Me.ProviderBindingSource.EndEdit()
        Me.ProviderTableAdapter.Update(Me.Db1DataSet.[u]Provider)
 
    End Sub
 
    Private Sub Data_01_Load(ByVal sender As System.Object, ByVal e As _
      System.EventArgs) Handles MyBase.Load
 
        Me.ProviderTableAdapter.Fill(Me.Db1DataSet.[u]Provider)
 
    End Sub
End Class

der Hund ist Dir im Sturme treu - der Mensch nicht mal im Winde
\"Kampfhunde\" Liebhaber