الفريق العربي للبرمجةأرشيف المنتديات · 2000 – 2023
نسخة أرشيفية للقراءة فقط — التسجيل والمشاركة مغلقان، والمحتوى محفوظ كما كان.

كيف احل هذه المشكله في عملية الجمع

بدأه mhb300 في 6 يونيو 2008 · 7 رد · 2,144 مشاهدة · في قسم ارشيف دوال الأكسيس
مشاركة: واتساب X فيسبوك تيليجرام
#1 صاحب الموضوع

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

ارحب بكم اساتذتي واشكر لكم تعاونكم......

مشكلتي هي:

اريد الارقام تنجمع مباشره عند التغيير لكي لا يتلاعب الموظف مثلا في تسجيل الفاتورة

انا عملت في المرفقات نموذج يوضح طريقه التلاعب التي يمكن ان تحصل في اي نموذج يعمله اي شخص ولم يتفادى هذه الطريقه

المثال الموجود هو:

a + b = c

t + g = r

والارقام الموجودة هي

500+500 = 1000

400 + 600= 1000

و من ثم المجموع النهائي لهما هو

z = 200

لماذا؟؟؟؟؟؟

لاني تنقلت بالفاره ولم امر على خانه النواتج................ لذلك اريد من اساتذتي الافاضل ايجاد حل لهذه المشكله...

مع العلم انا وضعت كود الجمع في حدث بعد التحديث ولم يتغير شيئ ......وانا اريد من اول تغير لحقل r او c يتغير مباشره من دون ان امر على هذه النواتج..............؟؟؟؟

وهذه المرفقات توضح ذلك.........

وتحية لكم من اعماق قلبي.....

____________.rar

تم تعديل هذه المشاركة بواسطة mhb300 في 6 يونيو 2008 في 14:43

أرجوا المعذرة لعدم تمكني من المشاركة بشكل مستمر لانشغالي..........

.

#2

انا في انتظاركم....................................................................ارجو

ا التعديل

أرجوا المعذرة لعدم تمكني من المشاركة بشكل مستمر لانشغالي..........

.

#3

يا اساتذتي انا انتظركم بفارغ الصبر..............................................

:rolleyes: .............. -_-

............

:resentful:

تم تعديل هذه المشاركة بواسطة mhb300 في 6 يونيو 2008 في 17:59

أرجوا المعذرة لعدم تمكني من المشاركة بشكل مستمر لانشغالي..........

.

#4
mhb300 كتب:
انا في انتظاركم....................................................................ارجو

ا التعديل

أخي الكريم تحية طيبة

تم انشاء نموذج جديد وعمل اللازم

بالتوفيق

_____________2008_06_06.rar

[يمين]

إذا كـان تـرك الـدين يعــنــي تقــدمــاً

فـيا نفــس مـوتــي قبــل أن تتقـدمــي

[/يمين]

#5

استاذي الفاضل كمال الاجابه جميله جدا ولكن نقصها شيئ وهو:

ان نتيجه z لم تخرج في الجدول........................................ما ذا اعمل استاذي؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟

أرجوا المعذرة لعدم تمكني من المشاركة بشكل مستمر لانشغالي..........

.

#6

الملف بعد التعديل

fadi.rar

اقتباس
[وسط]اللهم ارحمنا إذا اشتدت السكرات، وفاضت العبرات، وتعطلت القوى و القدرات.

اللهم ارحمنا إذا يئس منا الطبيب ،وبكى علينا الحبيب ، واشتد البكاء و النحيب.

اللهم ارحمنا إذا حملنا على الأعناق ، و التفت الساق بالساق، إلى ربك يومئذ المساق.

اللهم ارحمنا إذا وارينا التراب، وغلقت الأبواب، وانفض الأهل و الأحباب

[/وسط]

545050692.gif

#7

نعم الان الاجابه نموذجيه اشكركم جميعا على مساعدتي................

عندي استفسار ان امكن

هل zz و aa

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

Private Sub a_AfterUpdate()

c = Nz(a) + Nz(B)

zz.SetFocus

Me!aa = zz.Value

b.SetFocus

End Sub

أرجوا المعذرة لعدم تمكني من المشاركة بشكل مستمر لانشغالي..........

.

#8
اقتباس
عندي استفسار ان امكن

هل zz و aa

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

Private Sub a_AfterUpdate()

c = Nz(a) + Nz(

zz.SetFocus

Me!aa = zz.Value

b.SetFocus

End Sub

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

اقتباس
[وسط]اللهم ارحمنا إذا اشتدت السكرات، وفاضت العبرات، وتعطلت القوى و القدرات.

اللهم ارحمنا إذا يئس منا الطبيب ،وبكى علينا الحبيب ، واشتد البكاء و النحيب.

اللهم ارحمنا إذا حملنا على الأعناق ، و التفت الساق بالساق، إلى ربك يومئذ المساق.

اللهم ارحمنا إذا وارينا التراب، وغلقت الأبواب، وانفض الأهل و الأحباب

[/وسط]

545050692.gif

مواضيع مشابهة