اذهب الي المحتوي
أوفيسنا
بحث مخصص من جوجل فى أوفيسنا
Custom Search

الردود الموصى بها

قام بنشر

السلام عليكم Private Function officena() Dim ctl As Control For Each ctl In Me.Controls If TypeName(ctl) = "TextBox" Then If IsNull(ctl) Or ctl = "" Then Beep MsgBox " اخي الكريم ... لقد تركت الحقل ..." & "(" & ctl.Name & ")" & "... فارغاً ", vbOKOnly, "اوفيسنا" DoCmd.CancelEvent ctl.SetFocus Exit For End If End If Next ctl End Function

تم من خلال الضغط على اي زر  استدعي الكود الاول 

' انقل هذا الامر الى  زر 
Call officena

لدي كود اريد وضعه في زر تحديث بخصوص الحقل فارغ في البرنامج الذي اريد فيه وضع الكود  1191.222.rar171.78 kB · 0 تنزيلات  

قام بنشر (معدل)

السلام عليكم

اخي بلال اليامين

الحمد لله انك فتحت موضوع جديد☺️

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

طلبك هو (لدي كود اريد وضعه في زر تحديث بخصوص الحقل الفارغ في البرنامج الذي اريد فيه وضع الكود )

تفضل  ملفك بعد التعديل

اتمنى ان يكون هو المطلوب

تحياتي

 

LIKE.gif

 

1191.5555.rar

تم تعديل بواسطه خالد سيسكو
قام بنشر

اخي خالد اريد في زر تاكيد الحجز بارك الله فيك

ان زر تاكيد الحجز هو الذي اعمل به ولقد قمت باضافة الحقول التي احتاج اليها

اخي خالد عند الظغط على الزر ت ((تاكيد الحجز)) تظهر رسالة تنبيه تم اضافة موظف جديد

وفي نفس الزر عندما تكون الحقول فارغ تظهر رسالة تنبيه الرجاء ملء جميع  الحقول

اليك البرنامج الذي قمت بالتعديل عليه في الحقول

البرنامج1.5555.rar

قام بنشر

اخي خالد اريد في زر تاكيد الحجز بارك الله فيك

ان زر تاكيد الحجز هو الذي اعمل به ولقد قمت باضافة الحقول التي احتاج اليها

اخي خالد عند الظغط على الزر ت ((تاكيد الحجز)) تظهر رسالة تنبيه تم اضافة موظف جديد

وفي نفس الزر عندما تكون الحقول فارغ تظهر رسالة تنبيه الرجاء ملء جميع  الحقول

اليك البرنامج الذي قمت بالتعديل عليه في الحقول

البرنامج1.5555.rar

انشئ حساب جديد او قم بتسجيل دخولك لتتمكن من اضافه تعليق جديد

يجب ان تكون عضوا لدينا لتتمكن من التعليق

انشئ حساب جديد

سجل حسابك الجديد لدينا في الموقع بمنتهي السهوله .

سجل حساب جديد

تسجيل دخول

هل تمتلك حساب بالفعل ؟ سجل دخولك من هنا.

سجل دخولك الان
  • تصفح هذا الموضوع مؤخراً   0 اعضاء متواجدين الان

    • لايوجد اعضاء مسجلون يتصفحون هذه الصفحه
×
×
  • اضف...

Important Information