rendered paste body'binder les controles
b1 = TextBox1.DataBindings.Add("text", ds, "films.titre") 'sa propriete text
b2 = TextBox2.DataBindings.Add("text", ds, "films.cout")
dtp.DataBindings.Add("value", ds, "films.datesortie") 'sa propriete value
AddHandler b2.Format, AddressOf formatterMontant 'le signe $$$
cm = BindingContext(ds, "films") 'creer currency manager
Label11.Text = (cm.Position + 1).ToString() + " de " + cm.Count().ToString()
'cm.Position += 1 'pour ajouter le $$$$$$
'cm.Position -= 1 'pour ajouter le $$$$$$
DataGrid2.SetDataBinding(ds, "films")