طه محمد حامد

If IsNull(Text2) Then هذا السطر معناه أنه إذا كانت الخانة المسماه (text2) فارغة وهي معني كلمة (isnull)If MsgBox("اتترك هذا الحقل فارغ", vbExclamation + vbMsgBoxRight + vbYesNo, "حقل فارغ") = vbYes Then هذالسطر معناه أنه إذا كانت الرسالة التي سوف تظهر لك بها زر…

السلام عليكم:حيرتنا معاك يا أبو عمرلقد كان طلبك في البداية هو (كيف اجبر المستخدم عدم ترك الحقل text2 فارغ عند الاغلاق وارجاع مؤشر الفاره الى الحقل نفسه )وعلي فكرة:كل ما قام به الزملاء جميل جداً ويصلح في أي برنامج - كل ما عليك هو كيفية تطبيق الكود حسب رغبتك وحس…

تفضل اخي العزيز:لعل هذا هو المطلوب test1.rar

تفضل أخي ابو عمر: المثال علي الخانة الاولي Text0 ، قم بعمل نفس الكود علي الخانة الثانية ملحوظة: أنا أيضا أبو عمر expr_taha.rar

السلام عليكم: أخ خالد عبد الغفار اتفضل ياباشا: - علمتلك الاستعلام عشان عارف انه صعب شويه لكن كان من الممكن توصله لو قمت ببعض التجريب - عموما قارن بينه وبين الاستعلام اللي انت عامله - الاستعلام الجديد اسمه Query1 - وبعد كده: - طبق الاستعلام ده علي التقرير يعني …

السلام عليكم: أولاً: يجب أن يكون أسلوبك في الطلب أفضل حتى ولولم يرد عليك أحد ثانياً: تفضل ولعل هذا هو طلبك. db2_up.rar

اشكرك أخي العزيز ابو رهف: ولكن ما كنت اريد تفسيره هو معني الجملة الاتية: Me.RecordsetCloneفقط

توجد برامج لفك الباسورد في مثل هذا الشكل وهذا برنامج لا اتذكر من أين حملته؟ولكن هذا عهد ان يستخدم لمثل هذه المواقف ولا يستخدم في استخدامات خاطئة. لإحضار كلمة المرور للـ access.rar

ما كنت اود أن احدثه في هذا البرنامج هو أن يأخذ البرنامج مسار كل برنامج تلقائي ويخزنها في البرنامج وذلك عند فتحهاولكن هذا علي قدر علميأرجوا ابداء الرأي في هذا البرنامج الصغيروألا تبخلوا علي به حتى ولو أن هذا البرنامج غير مفيد وغير مهم أو بدائي أقول لكم لن أغضب …

السلام عليكم:مع تحياتي واحترامي للأستاذ/ أبو رهفولكن بعد الرسالة كان يفتح النموذج أيضا وبه الخانات فارغة وبعد إذنك قمت بكتابة السطر التالي حتى لا يفتح النموذج(DoCmd.Close acForm)فاصبح الكود كلتالي:Private Sub Form_Open(Cancel As Integer)On Error Resume NextIf …

لقد قام أحد الزملاء بحل المشكلة الأولي لك وهي عند كتابة رقم معين يكتب نوع العمل استكمال او مشروع هي نفس الفكرة أيضا ولكن ان يعرف البرنامج ان حقل crn ينتهي بصفر أو لا وهي دالة (righ) بعد وضعها في متغير rr = Right(crn, 1)If r = 0 ThenMe.[نص22] = "منزلي"ElseMe.[ن…

هذا جزء من برنامج شئون طلابيوجد نموذج تسجيل الغيابقديكون مفيد لك أيضا parapeters_not work.rar

نموذج رائع وفكرة لذيذة وجهد مشكور عليه

السلام عليكم : مستر عربي عندنا في مصر مثل شعبي يقول (يخلق من الشبة اربعين) ، فقد تجد اربعين شخصا قريبي الشبه ببعضهم أرجوا ان اكسب صداقتك ايضا مثل شبيهي

السلام عليكم : لماذا كل هذا التضخيم في فهم الأمور ، كل ما قصدته هو توضيح الأمر للأخ hamidymom لأنه توصل إلي كتابة نفس الكود الذي كتبته ليس أكثر ولا أقل ، كما أن الأستاذ/ خالد عبد الغفار هو صديق عزيز * وما قصدته بفورمة ادخال الدرجات (انها جزء من برنامج كبير): -…

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

لقد كان طلب الأخ في البداية الفرز بالمنصب وكانت هذه هي المشكلة ان الفرز عنده يكون بالحروف الأبجدية فقمت بالتعديل علي اساس يكون الفرز حسب كود المنصب وترتيبه السؤال هو كيف يمكنني من جعل الاكسس يفرز القائمة على اساس المنصب من اعلى منصب بالادارة الى اصغر منصب وليس…

تفضل أخي العزيز: هل هذا هو المطلوب؟؟؟؟؟؟؟ حساب.rar

مجهود رائع وتصميم مبدع وبرمجة عالية ومنكم نستفيد والسلام عليكم ورحمة الله وبركاته

ونصيحة أخي العزيز: 1- حاول الا تكتب أسماء الحقول بالعربي حيث اضطرني ذلك لكتابتها بين [] ولكن في بعض الحالات فيما بعد سوف تضايقك هذه العملية 2- حاول أن تستخدم نظام الكود في الجداول مثل أن تضع العائلة في كود ويصبح لكل فرد من العائلة نفس الكود مع كود خاص به اليك …