Da = New SqlDataAdapter(Sql, sCn)
Ta = New DataTable
Da.Fill(Ta)

 Motorladen()
 
        Bs = New BindingSource
        Bs.DataSource = Ta
 
        ' ComboBox binden    
        CbMotor.DisplayMember = "RepNr"
        CbMotor.DataSource = Bs
 
        tbFabrikat.DataBindings.Add("Text", Bs, "Fabrikat")
        tbTyp.DataBindings.Add("Text", Bs, "Typ")
        tbLeistung.DataBindings.Add("Text", Bs, "Leistung")
        tbGN.DataBindings.Add("Text", Bs, "GeraeteNr")
 
 u.s.w....