السلام عليكم ورحمة الله وبركاته
سبق ان حفظت هذا الكود في جهازي عن طريق هذا المنتدى المبارك
ولكن بعد اصابة جهازي بعطب فقدت كل المعلومات المحفوظة به
ولقد بحثت عن طريق محرك البحث الخاص في المنتدى بكل الطرق ولم اجده بالرغم من تاكدي من وجوده في المنتدى
امل ممن لديه معرفة بهذا الكود ان يزودني به لحاجتي الضرورية له
وللتذكير الكود هو خاص بمنع اتخاذ اي اجراء في النموذج اذا كان احد الحقول فارغاً
شكرا لكم يا اخوان والسلام عليكم
:)
الووووووووووووووووو
هل من مجيب
قال أبن القيم : أكثروا من الخير فينتشر .. و أقلوا من الشر فيندثر ..
شكرا لك اخي الكريم ولكن ليس هذا ما ارغبه حيث ان هذا يتطلب وضع كود لكل حقل على حده
المطلوب هو كود للنموذج ككل ولا يلزم وضع كود لكل حقل بمعنى الاختصار في برمجة النموذج
شكرا لك مرة اخرى
في داخل الsub الخاص باتخاذ اجراء ما...
شيك على المربع المطلوب...كالتالي:
If TxtBox.Text="" MsgBox "Cannot Be Empty" Exit Sub End If
الأخ علي
السلام عليكم
أرفق المثال وسوف أعدل عليه بإذن الله
تحياتي
الأخ الكريم علي
السلام عليكم وبعد
هذا مثال كتبته على عجل آمل أن يكون هو ما تريد
أخوك / أبو هاجر
بالضبط هو ما اريد يابو هاجر
الله يحفظ لك عيالك
الاخ BAZRAMIT
شكرا على تجاوبك وساقوم بتجربة هذا الكود لانه مبدئياً يبدو اسهل
تحياتي
هذا الموضوع مغلق.
المتواجدون خلال آخر دقيقتين · يتحدّث كل ٣٠ ثانية
جارٍ التحقق من المتواجدين…