تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
[vb6.0] كيف يمكن ان اشترط على المستخدم إذخال في Text "ذكر"او "انثى" ؟؟
#1
Question 
الاخوه الكرام
 السلام عليكم
 كيف يمكن ان اشترط على المستخدم إذخال في Text  "ذكر" او "انثى" ؟؟
نامل من الله المساعدة وجزكم الله خيراً
 تحياتي
إذا ضاقت بك الأحوال يوماً     فَثِقْ بالواحِدِ الفَرْدِ العَلِيِّ
الرد
تم الشكر بواسطة:
#2
كود :
Private Sub Text1_LostFocus()
If Text1.Text <> "" Then
If Text1.Text <> "ذكر" And Text1.Text <> "انثى" Then
Text1.Text = ""
MsgBox " من فضلك ادخل النوع ذكر او انثى فقط"
Text1.SetFocus
Exit Sub
End If
End If
End Sub
ارجو ان يفيدك هذا الكود
محاسب / أحمد عبد العليم

الى اللقاء ان شاء الله Heart
الرد
تم الشكر بواسطة: Microformt , Microformt
#3
(21-03-21, 02:00 AM)ahmedabdelaliem كتب :
كود :
Private Sub Text1_LostFocus()
If Text1.Text <> "" Then
If Text1.Text <> "ذكر" And Text1.Text <> "انثى" Then
Text1.Text = ""
MsgBox " من فضلك ادخل النوع ذكر او انثى فقط"
Text1.SetFocus
Exit Sub
End If
End If
End Sub
ارجو ان يفيدك هذا الكود
اخي العغزيز
 السلام عليكم
 الف الف الف شكر لك
 تحياتي
إذا ضاقت بك الأحوال يوماً     فَثِقْ بالواحِدِ الفَرْدِ العَلِيِّ
الرد
تم الشكر بواسطة: ahmedabdelaliem


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
Question [vb6.0] كيف اجعل المستخدم التعديل على الأرقام في text1 فقط ولا يمكن مسحها ؟ Microformt 0 44 08-04-21, 01:55 AM
آخر رد: Microformt
  هل يمكن إظهار أداة DatePicker فارغة مصمم هاوي 4 212 28-03-21, 08:56 PM
آخر رد: مصمم هاوي
Question [vb6.0] هل يمكن ربط قاعدة البيانات اكسس 2007 أو 2016 بتقنية DAO ؟ Microformt 0 137 26-02-21, 06:18 PM
آخر رد: Microformt
  [vb6.0] كيف يمكن إضهار الصوره تحت Text عند النقر على زر الامر ؟؟ Microformt 0 110 12-02-21, 08:37 PM
آخر رد: Microformt
Question [vb6.0] كيف يمكن فتح ملف txt من زر الامر؟؟ Microformt 3 232 28-01-21, 07:31 AM
آخر رد: سعود
  يمكن ترصيد عمودين بعمود ثالث (ترصيد تراكمي)MSHFlexGrid mhqom2020 1 260 09-01-21, 03:47 AM
آخر رد: mhqom2020
  [vb6.0] كيف يمكن التمييز لاصناف بلون مميز حسب شرط معين mshflexgrid mhqom2020 2 245 21-12-20, 11:56 PM
آخر رد: mhqom2020
Question هل يمكن مثال يظهر رقم التدرج الولي لي أي صورة ؟؟ Microformt 0 214 21-11-20, 04:50 PM
آخر رد: Microformt
  [vb6.0] كيف اشترط على المستخدم 14 رقماً في text ؟ Microformt 1 224 23-10-20, 01:18 AM
آخر رد: AL_BRNS
Question [vb6.0] هل يمكن ان اجعل زر الامر شفاف ؟؟ Microformt 0 330 21-08-20, 03:54 PM
آخر رد: Microformt

التنقل السريع :


يقوم بقرائة الموضوع: بالاضافة الى ( 1 ) ضيف كريم