ابغى اعرف كود زر حفظ

السلام عليكم

عندي ربط قاعدة بيانات في الفجوال ويحتوي الفورم المربوط بالقاعدة على جميع الحقول الموجوده في الجدول

ويحتوي على ازرار التالي والسابق والاول والاخير وحفظ وبحث واضافة

لكن للاسف كود البرمجة الموجود لدي لم يضبط

واريد كود غيره ان كان لديكم

مع الشكل الجزيل

وهذا هو الكود الموجود لدي

'حفظ

Try
            Dim cup As OleDbCommandBuilder
            Me.BindingContext(DataSet11, "اسم الجدول المربوط").EndCurrentEdit()
            OleDbDataAdapter1.Update(DataSet11, "اسم الجدول المربوط")
        Catch ex As Exception
            MsgBox(ex.ToString)
        End Try