dbsql.ExecNonQuery2("UPDATE Plateforme SET AnneeAchat =?,PrixAchat =?, " _
& "Commentaire =? WHERE Modele = ? ", _
Array As Object(EditText1f.Text, EditText2f.Text, EditText3f.Text, Spinner1f.SelectedItem))
Msgbox("modifications enregistrées sur " & Spinner1f.SelectedItem,"")