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

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

بدأه mohamed elsnan في 14 نوفمبر 2012 · 1 رد · 380 مشاهدة · في قواعد بيانات Microsoft Access
مشاركة: واتساب X فيسبوك تيليجرام
#1 صاحب الموضوع

انا دلوقتى عملت حقل محسوب فى نموزج وقت العمل الاضافى

وعملت حقل محسوب فى نموزج المرتبات

وعملت حقل محسوب فى نموزج أخر

انا عاوز اجمعهم كلهم ويبقى النهائى الاجمالى بعد التصفيات

ملحوظه انا عامل اجمالى نهائى فى وقت العمل الاضافى جهاز وايضاً فى نموزج المرتبات

اما فى نموزج الغياب والحضور عملت حقل محسوب واريد ان اجعله فى نموزج المرتبات لكى يضرب عدد الايام فى اليوميه ويعطينى النهائى

ارجو المساعده

أخوكم محمد من مصر

#2
mohamed elsnan كتب:

انا دلوقتى عملت حقل محسوب فى نموزج وقت العمل الاضافى

وعملت حقل محسوب فى نموزج المرتبات

وعملت حقل محسوب فى نموزج أخر

انا عاوز اجمعهم كلهم ويبقى النهائى الاجمالى بعد التصفيات

ملحوظه انا عامل اجمالى نهائى فى وقت العمل الاضافى جهاز وايضاً فى نموزج المرتبات

اما فى نموزج الغياب والحضور عملت حقل محسوب واريد ان اجعله فى نموزج المرتبات لكى يضرب عدد الايام فى اليوميه ويعطينى النهائى

ارجو المساعده

أخوكم محمد من مصر

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

يا أخ محمد مينفعش الكلام في الهوا كده بدون مرفق للتعديل عليه

ولكن علشان إسمك محمد ومن مصر كمان ححاول أرد عليك

لعمل أي تجميع أو تعامل على تكست بوكس أو أي كنترول بصفة عامة موجود في نموذج غير النموذج الذي به النتيجة يجب إتباع الآتي

1- أن تكون النماوذج التي بها المعطيات أي الأرقام المطلوب جمعها مثلا مفتوحة ولا يهم كونها مرئية أم مخفية ولكن يجب أن تكون مفتوحة

2- داخل النموذج المطلوب به النتيجة يتم التعبير عن التكست بوكسز الموجودة بنماذج المعطيات بالتعبير التالي:- إسم التكست بوكس!إسم النموذج!Forms

مثال :-

نفترض أننا لدينا عدد 2 نموذج الأول إسمه fr1 وبه تكست بوكس إسمه Tx1 ونموذج أخر إسمه fr2 وبه تكست بوكس إسمه Tx2 والمطلوب أن يكون ناتج جمعهما في Tx3 في نموذج ثالث إسمه fr3

لتنفيذ تلك العملية نقوم بعمل مفتاح مثلا في fr3 ونضع به الكود التالي:-

Private Sub أمر2_Click()
DoCmd.OpenForm "fr1"
Forms!fr1.Visible = False
DoCmd.OpenForm "fr2"
Forms!fr2.Visible = False
Me.Tx3 = Forms!fr1!Tx1 + Forms!fr2!Tx2
DoCmd.Close acForm, "fr1"
DoCmd.Close acForm, "fr2"

End Sub

ومرفق لك هذا المثال

db1.rar

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

عدد الزوار حالياً

المتواجدون خلال آخر دقيقتين · يتحدّث كل ٣٠ ثانية

—الإجمالي—أعضاء مسجّلون—زوار بدون تسجيل

جارٍ التحقق من المتواجدين…