السلام عليكم اخوي عيد
بالنسبة لفكرتك بصراحه معرف اطبقها على الاكسس والفورم بالاكسس
بس اعرف اسويها بقاعدة بيانات اكسس والفورم فيجوال بيسك والربط بالكود
فيه عندي حل ثاني يسوي نفس الغرض
طبعا انت اللي تبي توصله انك تنتقل لسجل ثاني وتسوي نفس العملية وهكذا لباقي السجلات الين يخلص
فهذا انشالله يفي بالغرض بس حطه بالفورم الخاصه بالجدول اللي فيه هالبيانات اللي تبي تعدلها
مع مراعات بعض الملاحظات المكتوبة وسط الكود:
Dim a1, a2, a3 As Integer
Private Sub h_Click() On errore GoTo hanier
'******اذا كان الحقل من نوع نص اكتب التالي
if <هنا اسم اول حقل بالجدول>.text="" then
'******اذا كان الحقل من نوع رقم اكتب التالي
if <هنا اسم اول حقل بالجدول>=0 then
Exit Sub
End If
a1 = a2 + a3 / 100
DoCmd.GoToRecord , , acNext
h2_Click
Exit Sub
hanier:
End Sub
Private Sub h2_Click()
h_Click
End Sub
ويبقى اخر شي تسويها انك في المكان او الحدث اللي اذا صار او سويته تتم عملية التحديث حط الامر
h2_Click
ومن باب التوضيح مثلن اذا ضغطت على زر وتبيه يسوي التحديث انشيء الزر وحط هالكود بوسطه
وتقبل تحياتي
هذا والله اعلم