الفريق العربي للبرمجةأرشيف المنتديات · 2000 – 2023
نسخة أرشيفية للقراءة فقط — التسجيل والمشاركة مغلقان، والمحتوى محفوظ كما كان.

رسالة عند غلق النموذج

بدأه tatatab في 7 أبريل 2008 · 1 رد · 420 مشاهدة · في قواعد بيانات Microsoft Access
مشاركة: واتساب X فيسبوك تيليجرام
#1 صاحب الموضوع

اخوانى اريد مسج تظهر لى عندما اقوم باغلاق نموذج معين تظهر لى مسج تقول بانك لا يمكنك غلق النموذج الا عند ادخالك الكود الخاص بالالة فمثلا عندى نموذج اقوم بادخال كود الالة واسم الالة فى هذا النموذج اريده اذا قمت بادخال الاسم فقط ولم ادخل الكود ان يظهر لى مسج عند لاغلاق تقول لى هذه الرسالة لا يمكنك غلق البرنامج الا عند ادخال الكود

فكيف لى اخوانى ان اصنع هذا الكود او الامر ولكم جزيل الشكر

#2 
Private Sub Form_Unload(Cancel As Integer)
If IsNull(Me.MachienName) Or IsNull(Me.MachienCode) Then
MsgBox "عذرا أخي الكريم .... لا يمكن ترك احد الحقول فارغة"
Cancel = True
SendKeys "esc", True
End If
End Sub

قم بتغيير اسماء الحقول كما هو موجود لديك

MachienName حقل اسم الآله

MachienCode حقل كود الآله

post-15367-087183200%201340344597.gif

بعض من المواضيــع الممـيزه

post-15367-027053900%201340345097.gif

مواضيع مشابهة