Public Class Form1
 
    Private Sub Form1_Load(sender As System.Object, e As System.EventArgs) _
      Handles MyBase.Load
        'TODO: Diese Codezeile lädt Daten in die Tabelle 
        ' "PlanningGuideDataSet.ZIJO". Sie können sie bei Bedarf verschieben 
        ' oder entfernen.
        Me.ZIJOTableAdapter.Fill(Me.PlanningGuideDataSet.ZIJO)
        'TODO: Diese Codezeile lädt Daten in die Tabelle 
        ' "PlanningGuideDataSet.BLAS". Sie können sie bei Bedarf verschieben 
        ' oder entfernen.
        Me.BLASTableAdapter.Fill(Me.PlanningGuideDataSet.BLAS)
 
    End Sub
 
    Private Sub Button1_Click(sender As System.Object, e As System.EventArgs) _
      Handles Button1.Click
        Me.Validate()
        Me.BLASBindingSource.EndEdit()
        Me.ZIJOBindingSource.EndEdit()
        Me.TableAdapterManager.UpdateAll(Me.PlanningGuideDataSet)
    End Sub
End Class