Eng.Qassim

طبع يمكنك ذلك .. بأن تضع شرطا قبل انتهاء الصلاحية ب 30 يوما مثلا .. بان يتحول لون النص الى احمر او يعطيك رسالة تنبية بأن المنتج ستنهتي صلاحيته بعد 30 يوما

انظر للتعديل الان TestLOck.rar

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

كل عام وانت بالف خير استاذ ابو الحسن عملت في البداية استعلام توحيد بين الصرف والتحصيل لكل مصادر التمويل ثم عملت استعلام يجمع بين الصرف والتحصيل qrySum الذي يعتبر مصدر السجلات للنموذج الان عملت لك لكل مصدر تمويل ..يعني عندما تختار عميل جديد1 سيظهر لك في النموذج مجموع الصرف والتحصيل واسف على التاخير لاني نسيت واشتغلت على الملف المضغوط وضاع شغلي😢 جرب الان ووافني بالنتيجة TestLOck.rar

وعليكم السلام اخي ابو الحسن جمعت لك الحسابين ليظهر في النموذج مجموع واحد ..اما اذا اردت ان تظهر الحسابين معا فأجعل مصدر السجلات للنموذج من استعلام التوحيد qrySum2Balance TestLOck.rar

لحد الان ..لم نصل الى نتيجة موفقة تحياتي للاخوة @ابو البشر @Amr Ashraf

وعليكم السلام حاول تغيير اعدادات اللغة والمنطقة

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

انا متفاجئ...طب العمل دة حصل ازاي ... انت بمجرد تكتب As بتطلعلك الخيارات ومستحيل تتكتب مزدوجة الا في حالة واحدة ...انه محمد عصام دايب لششتوا في الحب 🤣

اخي العزيز @حامل المسك كود الالحاق شغال في حالة no1 لايوجد في date2 لكن مالذي تريده من الاكواد التي تلي كود استعلام الالحاق ؟

شيء عجيب دكتور ..ليه اتكررت عندك Long المفروض هي واحدة

وعليكم السلام اجعل timer interval=1000 وفي حدث on timer للنموذج ضع الكود التالي Private Sub Form_Timer() If Me.txtQuantity < 5 Then If Me.txtQuantity.BackColor = vbWhite Then Me.txtQuantity.BackColor = vbRed Me.txtQuantity.ForeColor = vbWhite End If Else Me.txtQuantity.BackColor = vbWhite Me.txtQuantity.ForeColor = vbBlack End If End Sub txtQuantity مربع نص داخل النموذج يمثل الكمية مثلا

انا فاهم عليك ابنتي العزيزة ست @سجى الكعبي انا افكر وسأجرب لاحقا ان وسعني الوقت اعملي جدول للموظفين ...وجدول اخر بالخدمة ..ويكون نموذج فرعي مستمر نربطه مع النموذج الرئيس بأسم الموظف في النموذج الفرعي يوجد حقل الخدمة من...وحقل الخدمة الى ...وحقل اخر نستخرج منه مدة الخدمة بالايام Datediff("d";"date1";"date2") ثم نجمع تلك الايام لكي يتم تحويلها الى سنين واشهر وايام

هي افكار للمناقشة ... ممكن عمل جدولين ...وفي النموذج نعمل CHK.. في الحالة الطبيعية يكون مصدر البيانات الجدول الاول ..وفي الحالة الثانية وحين التعليم على CHKيكون مصدر السجلات الجدول الثاني مجرد اقتراح ..فانا لم اجرب هذا العمل ربما اخي @أبو عبدالله الحلوانى يدرس الفكرة

وعليكم السلام .. طيب منين ستم تحديد العمر ؟هل من مربع تحرير وسرد في النموذج؟ مجرد فكرة ..ان نعمل حقل check box في جدول التحاليل ونعلم على التحاليل التي تعتبر عمر 10 سنوات هو طفل وحين اختيار هذا التحليل المعلم عليه صح ويقارن بين النص الذي نكتب فيه العمر سيختار طفل اما التحاليل الغير معلم عليها ستختاره بالغ لو ترفق نموذج لعملك حتى تتم التجربة عليه

وعليكم السلام ضع مسافة ثم underscore Dim a As Integer a = 500 _ + 80 _

مبدع دائما استاذ @Moosak

وعليكم السلام كل موظف لديه سجل بالاعمال التي يقوم بها ...فحينما نختار اسم موظف تظهر لنا سجلاته في نموذج فرعي بانه عمل في الموقع س 4 ساعات والموقع ص 2 ساعة وبعدين ...ماذا نريد ؟

اذن انت من جيل (عيرتني بالشيب وهو وقار ) ... ولست من جيل .. (اشهد الا امرأة اتقنت اللعبة الا انت ) اعتزازي واحترامي للست لمياء

هاي ما فهمتها ؟ بالطبع يجب ان تختار اسم الموظف حتى تظيف ليه الرصيد بالطبع .. بس انا اريد ان تشرح لنا ماتريد بالضبط ؟ في بعض البلدان ...الموظف لديه رصيد اجازات سنوي = 36 يوم ...وهذا الرصيد يحسب من تاريخ تعيين الموظف لهذا التاريخ .. اي يتم حساب مجموعه وحينما يأخذ الموظف اجازة ... يتم استقطاع ايام الاجازة من الرصيد المتراكم لديه ليكون الناتج هو المتبقي من رصيد اجازاته

انا عارف انك بتمزح ... بس انا من زمان افكر بهذا الموضوع ...رغم ان بعض الاساتذة المسؤولين عن الموقع يرفضون الفكرة وانا اتساءل ... لماذا لايكون هناك صندوق في الموقع للمتبرعين ...اقلها من اجل تطوير الموقع

الحمد لله انك استفدت من المثال تحياتي لاخوتي اهل غزة

🤣🤣🤣

بصراحة استاذ خالد ..الاخوة المصريين يشهد لهم بالبنان في ذلك وانا بصراحة تعلمت منهم الكثير ...سواء في اختصاصي الهندس (المدني ) او في البرمجة ..اصحاب علم وخلق وجدية في ايصال المعلومة لن انسى فضل الاخوة السعوديين ...اصحاب كرم منقطع النظير ام الاخوة العمانيين ام السوريين ..ام ام ربي يحفظ امتنا الاسلامية والعربية