ابوخليل

السلام عليكم استخدم الامر التالي لأي حقل تريد منع تحديد الكل Private Sub text1_Enter() With Me.text1 .SelStart = 0 .SelLength = 0 End With End Sub على اعتبار text1 هو الحقل المراد تطبيق الامر عليه

عملك صحيح فقط في خطأ في كتابة اسم الحقل (عدد الحصص) انت كتبته (أعدد الحصص) بزيادة الف

طلبك مقتضب وغير واضح تفضل تم التعديل على مثالك الصور تتغير كل 5 ثواني اذا هذا هو المطلوب يمكنك زيادة الوقت prog.rar

الحمد لله شكرا للجميع

السلام عليكم وتفضلوا ايضا If MsgBox("هل ترغب في حذف السجل", vbInformation + vbYesNo) = vbYes Then str_Title = "حذف سجل" str_Prompt = "ادخل كلمة المرور" paswrd = InputBox(str_Prompt, str_Title) If paswrd = "123" Then DoCmd.DoMenuItem acFormBar, acEditMenu, 8, , acMenuVer70 DoCmd.DoMenuItem acFormBar, acEditMenu, 6, , acMenuVer70 Else Exit Sub End If End If يبدوا اننا كنا نعمل في وقت واحد

الله المستعان

نعم هي قاعدة بيانات جداول فقط مهمة جدا تستنير بها لوجود البيانات مكتملة ... لاحظ الجدول المسمى SDBMNTBC

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

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

وعليكم السلام فهم السؤال هو نصف الاجابة .. ولم استوعب المطلوب بالتمام ولكن وحسب ما فهمت قمت بالتعديل على المثال اتمنى ان اكون قريبا من طلبك db1.mdb

السلام عليكم ورحمة الله وبركاته احبتي هدية صغيرة وهي طريقة التبديل لاختيار العمود الذي يتم عرضه في مربع التحرير وفي المثال غنية عن المقال dbArEn.mdb

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

تفضل عملت لك مثل ما قلت dbx3.mdb

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

وعليكم السلام Dim i As Boolean i = Forms!FORMS_101!FARY_ADD!CK_1 If i = True Then DoCmd.OpenReport "REBORT_101", acViewPreview Else DoCmd.OpenReport "REBORT_102", acViewPreview End If 334.mdb

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

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

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

السلام عليكم جربت اكثر من برنامج اصلاح وكانت النتيجة جدول واحد سليم وخالي من البيانات تفضلوا برنامج الاصلاح accessfix.rar

الحمدلله ان وجدت مطلوبك

تفضل dbx 2.mdb

كل عام وانتم بخير

السبب ان بعض الحقول خالية في الجدول والحل انك تسمح بعرض الحقول الخالية بحيث يصبح المعيار Like "*" & [forms]![frist]![Combo14] Or Is Null وفقك الله dbx (1).mdb

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

في المثال السابق في الخيار الاول يظهر جميع القيم فعلا وفي الخيار الثاني يخفي الاصفار