[0theghost0]

قصدك مثل هذا ؟

كود :

Dim conn As New OleDbConnection("Provider=Microsoft.ACE.OLEDB.12.0;Data Source=|DataDirectory|\Database1.accdb;Persist Security Info=False;")
       Dim sql As String =
           " update [Customer] set " &
           " Cus_Name=@Cus_Name, Cus_Address=@Cus_Address, Cus_Region=@Cus_Region, Cus_Telephone_Number=@Cus_Telephone_Number where Cus_Private_Number=@Cus_Private_Number "

       Dim cmd As New OleDbCommand(sql, conn)
       cmd.Parameters.AddWithValue("@Cus_Name", TextBox1.Text)
       cmd.Parameters.AddWithValue("@Cus_Private_Number", ComboBox1.Text)
       cmd.Parameters.AddWithValue("@Cus_Address", TextBox3.Text)
       cmd.Parameters.AddWithValue("@Cus_Region", TextBox4.Text)
       cmd.Parameters.AddWithValue("@Cus_Telephone_Number", TextBox5.Text)

       conn.Open()
       cmd.ExecuteNonQuery()
       conn.Close()

       MessageBox.Show("We have been successfully Update", "Congratulations", MessageBoxButtons.OK, MessageBoxIcon.Information)
       Form2_Load(e, e)

شوفه يقول تم حفظ التعديل ولكن لم يقم بذالك
وسويته بالترتيب بالظبط داخل الفورمة