بســم الله الـرحمــن الرحيــم
السلام عليكــم ورحمـة الله وبركاتــه
اريد تصميم استعلام يومي وشهري وسنوي للطلبات بواسطة تاريخ الطلب
تصميم اصتعلام يومي وسنوي وشهري
اخي الكريم
بالنسبة للمطلوب الاول بخصوص تغيير قيمة المبلغ فقد تم التعديل
اما بالنسبة لعمل استعلام فيفضل ان تدخل بياناتك ومن ثم يمكن عمل نموذج وبإمكانك البحث منه او عمل التقارير منه بالتواريخ التي تريدها وليس فقط يومي او شهري او سنوي
معذرة اخي حبر القلم : انتبهت لردك اثناء تحرير المشاركة وبعد التعديل على المرفق .. بارك الله فيك وجعلك سباق الى الخير دائماً
تم تعديل هذه المشاركة بواسطة يوسف احمد في 29 نوفمبر 2008 في 21:32
الاخ الكريم يوسف احمد
اصبحت متابعا جيد لمشاركاتك الفعالة
و لكن معذرة فى تعليق صغير جدا بخصوص مشاركتك على TM TM , حبر القلم
عند الاختيار من الكمبو بوكس " أجل " يظهر النتيجة مبلغ يحملة العلامة الحسابية سالب (-2000)
و عند تكرار النقر على الاختيار " أجل " من الكمبو بوكس و لو بطريقة الخطأ من المستخدم تختفى علامة السالب ليبصح مبلغ الاجل ( 2000)
برجاء الافادة و لك كل التقدير و الشكر
امين يوسف
اذا لم تخطط للنجاح , فقد خططت للفشل
وعليكــم السـلام ورحمة الله وبركاتـه..
الكريم يوسف احمد
ياخى جميع القائمين على الفريق العربى لهم طريقة مميزة
شديدة التواضع ، لصيقة المتابعة ، كثيرة الحضورة
باسم الله، ماشاء الله ،الله يزدكم من فضله و علمة
رجاء 00000
1_شرحك المميزة لكود كود
2_ما الفرق بين معالجتك و معالجة( حبر القلم )باتباع IIF
و هل هناك طريقة تعالج تغير الاشارة عند النقر مرتين على الاختيار من الكمبو بوكس
دمت بوّد و بكل صدق
امين يوسف
اذا لم تخطط للنجاح , فقد خططت للفشل
السلام عليكــم ورحمـة الله وبركاتــه
بارك الله فيك اخي امين
الكود
If Me.PaymentStatus = "نقدا" Then If Left(Me.Amount, 1) = "-" Then Me.Amount = Me.Amount * -1 End If End If If Me.PaymentStatus = "آجل" Then If Left(Me.Amount, 1) <> "-" Then Me.Amount = Me.Amount * -1 End If End If
شرح الكود
اولاً الكود يعتبر روتين خاص او اجراء خاص على مستوى النموذج واسمه ChangeAmountUponStatus ويتم استدعاؤه بحدث في الحالي للنموج وحدث بعد التحديث لمربع التحرير والسرد
السطر الاول : يتم التأكد من قيمة مربع التحرير والسرد المسمى PaymetStatus باستخدام الجملة الشرطية If
فاذا كانت تساوي ( نقدا )
السطر الثاني : ايضاً يتم استخدام جملة شرطية اخرى if للتحقق فيما اذا كانت قيمة الحرف او الرقم ( الاول من اليسار) للحقل Payment تساوي علامة السالب ( - ) ... وهنا تستخدم الدالة Left ليتم تطبيق الجملة الشرطية على ناتجها.
السطر الثالث : اذا اجتمعت المعايير اعلاه بمعنى اذا كانت قيمة مربع التحرير والسرد تساوي (نقدا) وكان يحمل علامة السالب اذا سنقوم بتغيير هذه القيمة بضرب قيمة الحقل في القيمة -1 وبذلك سنحصل على قيمة موجبة ...
السطر الرابع : انهاء جمل if الشرطية.
السطر من 1 الى 4 خاص بمعالجة القيمة واجبارها ان تأخذ القيمة الموجبة في حالة كانت قيمة الحقل Payment تساوي ( نقدا )
السطر الخامس : يتم التأكد من قيمة مربع التحرير والسرد المسمى PaymetStatus باستخدام الجملة الشرطية If
فاذا كانت تساوي ( آجل )
السطر السادس: ايضاً يتم استخدام جملة شرطية اخرى if للتحقق فيما اذا كانت قيمة الحرف او الرقم ( الاول من اليسار ) للحقل Payment لا تساوي علامة السالب ( - ) .. وهنا تستخدم الدالة Left ليتم تطبيق الجملة الشرطية على ناتجها.
السطر السابع: اذا اجتمعت المعايير اعلاه بمعنى اذا كانت قيمة مربع التحرير والسرد تساوي (آجل) وكان لا يحمل علامة السالب اذا سنقوم بتغيير هذه القيمة بضرب قيمة الحقل في القيمة -1 وبذلك سنحصل على قيمة سالبة...
السطر الثامن : انهاء جمل if الشرطية.
السطر من 5 الى 8 خاص بمعالجة القيمة واجبارها ان تأخذ القيمة السالبة في حالة كانت قيمة الحقل Payment تساوي ( آجل)
اقتباسو هل هناك طريقة تعالج تغير الاشارة عند النقر مرتين على الاختيار من الكمبو بوكس
بالنسبة لسؤالك فهل تريد ان يتم التغيير بواسطة النقر المزدوج على الكمبو بكس ام انك تقصد الاختيار المزدوج وليس النقر
اذا كنت تقصد الاختيار المزدوج بمعنى انك تختار نقدا ثم عود وتختار مرة اخرى آجل فالحل السابق هو المطلوب اما اذا كنت تقصد النقر المزدوج فإن المطلوب كان تغيير قيمة حقل المبلغ بناءً على قيمة مربع التحرير والسرد ... فالرجاء التوضيح اكثر فيما يخص هذه النقطة
ارجو ان يكون الشرح واضحاً
تم تعديل هذه المشاركة بواسطة يوسف احمد في 6 ديسمبر 2008 في 11:50
السلام عليكــم ورحمـة الله وبركاتــه
اخى العزيز يوسف
اشكرك و ليس الشكر الاخير
بخصوص استفسارى عن
(و هل هناك طريقة تعالج تغير الاشارة عند النقر مرتين على الاختيار من الكمبو بوكس)
فالمقصود يتعلق بمشاركة حبر القلم بتطبيق IIF
عند الاختيار من الكمبو بوكس " أجل " يظهر النتيجة مبلغ يحملة العلامة الحسابية سالب (-2000)
و عند تكرار النقر على الاختيار " أجل " من الكمبو بوكس و لو بطريقة الخطأ من المستخدم تختفى علامة السالب ليبصح مبلغ الاجل ( 2000)
تحياتى ،،،،،
اذا لم تخطط للنجاح , فقد خططت للفشل
السلام عليكــم ورحمـة الله وبركاتــه
الاخ العزيز يوسف
كل عام و المسلمين و الفريق العربى بخير
و الله جامد اوى
شكرا
اذا لم تخطط للنجاح , فقد خططت للفشل
aminyousif كتب:السلام عليكــم ورحمـة الله وبركاتــه
الاخ العزيز يوسف
كل عام و المسلمين و الفريق العربى بخير
و الله جامد اوى
شكرا
اذا لم تخطط للنجاح , فقد خططت للفشل
الاخ الكريم يوسف احمد
السلام عليكم
اشكرك للمرة الثانية
عندما تطلب الامر منى التطبيق
كنت مرجعا و بشرحك تمكنت من الاضافة و التعديل لما يناسبنى
و وجد انك تستحق الشكر
شكرا
اذا لم تخطط للنجاح , فقد خططت للفشل