تحديد قيمة حقل بناءً على حقل آخر

[اسير الغربة]

السلام عليكم ورحمة الله وبركاته

جزاكم الله خير اريد المساعده

عندي حقلين الاول باسم t والثاني باسم h اريد كود اذا كان مكتوب في الحقل t رقم 1

مثلاً تكون قيمة الحقل h صفر 0 واذا كان في الحقلh رقم 1 يكون في الحقلt صفر

يعني العكس

ويكون الكود على زر الحفظ وليس في احد الحقول يعني عند حفظ البيانات مايكون الحقلين نفس القيمة

ولكم جزيل الشكر

[أبو هادي]

السلام عليكم

في حدث بعد التحديث لكل من h و t ضع هذين الحدثين :

Private Sub h_AfterUpdate()
  Me.t = Abs(1 - Me.h)
End Sub

Private Sub t_AfterUpdate()
  Me.h = Abs(1 - Me.t)
End Sub

تحياتي .

[أبو هادي]

السلام عليكم

يمكن الإستغناء عن دالة Abs إلا إذا كتبت كالتالي فإنها مطلوبة :

Private Sub h_AfterUpdate()
 Me.t = Abs(Me.h - 1)
End Sub

مع ملاحظة يجب تأمين القيمة للـ h والـ t أن لا يقبلا غير الصفر أوالواحد .

تحياتي .

[اسير الغربة]

جزاك الله خير اخوي ابو هادي

اخوي هل يمكن وضع الكود على زر الحفظ بدل مااضعة في حدث الحقل بعد التحديث لان قيمة الحقلين يتم ادخالها

تلقائي وليس يدوي وهنا المشكله الكود مايعمل في حدث بعد التحديث الا اذا تم ادخال البيانات يدوي

جربت الكود ونجح في حال الادخال يدوي ولكن اذا كان الادخال تلقائي لايعمل ماهو الحل

شرح بسيط توجد عندي قائمة مستدله باسم الجنس ويختار المستخدم منها ياذكر ياانثى

اذا اختار انثى يكتب تلقائي في حقل t رقم واحد وكذلك اذا اختار ذكر ينكتب في حقل h

رقم واحد تلقائي المشكله اذا كان المستخدم اختار في البداية انثى مثلاً ثم اكتشف انه غلطان ورجع وختار ذكر حيكون في الحقل t رقم واحد وفي الحقل h رقم واحد ايضاًمع ان المدخل بياناته شخص واحد يا انثى ياذكر مع العلم ان الحقلين tوh غير مرئيين للمستخدم

كان ودي ارفق مثال بس لااستطيع

جزاك الله خير

والف شكر لك اخي الله يسعدك ويرحم والديك

تم تعديل يناير 3, 2005 بواسطه اسير الغربة

[egyman]

السلام عليكم و رحمة الله و بركاته

أخي أسير الغربة

أود أولاً أن أنصحك بأن تسمي أدواتك بحروف أو أسماء إنجليزية حتى لا تقع فى مشكلة أثناء كتابة الكود

و سأفترض معك أن أداة القائمة المنسدلة تسمي Gender --> الجنس

قم بإضافة الكود التالي على زر الحفظ

If me.gender = "ذكر" then

me.t = 1

me.h = 0

else

me.t = 0

me.h = 1

endif

أرجوا أن يكون ذلك ما تريد

[أبو هادي]

السلام عليكم

لا يمكن أن تجمع بين الطلبين .

إذا أردت أن تعمل switching تبادل/تحويل بين h و t فلا بد من هذه الطريقة .

أما إذا أردت أحدهما رئيس والآخر تابع فيمكن عمل كود في زر الحفظ .

تحياتي .

[اسير الغربة]

الكود الذي وضع اخي egyman هو الكود المطلوب

الف شكر اخواني أبو هادي و egyman على المساعده

الله يوفقكم ويسعدكم ولايحرمنا منكم