If me.cForm = "B" ' Called from Form 1 Me.PrimaryBusinessObject = BestBo1 Me.txtKollege.Businessobject = BestBo1 Me.txtkollege.BindingField ) BestBo1.Kollege ....' some more controlsElse Me.PrimaryBusinessObject = KarteiBo1 Me.txtKollege.Businessobject = KarteiBo1 Me.txtkollege.BindingField ) KarteiBo1.Kollege ....' some more controlsEndif