تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
[vb6.0] كيف اشترط على المستخدم إدخال نص في مكان اسم المواظف وفي رقم المواظف إدخال رقم ؟؟
#1
Question 
بسم الله الرحمن الرحيم
 الاخوه الكرام
السلام عليكم ورحمة وبركاته

كيف اشترط على المستخدم  إدخال نص في مكان اسم المواظف  وفي رقم المواظف إدخال رقم ؟؟
نامل من الله المساعدة والله يحفظكم ويرعاكم في برنامجي المرفق
 تحياتي


الملفات المرفقة
.rar   nops.rar (الحجم : 1.44 ك ب / التحميلات : 36)
إذا ضاقت بك الأحوال يوماً     فَثِقْ بالواحِدِ الفَرْدِ العَلِيِّ
الرد }}}
تم الشكر بواسطة:
#2
وعليك السلام ورحمة الله وبركاته

أهلا بك أخي سالم , ضع هذا الكود في داخل كود المثال الذي أرفقته :

PHP كود :
Private Sub Text1_KeyPress(KeyAscii As Integer)

If 
KeyAscii 8 Then Exit Sub

Dim zNumbers 
As String

zNumbers 
"0123456789"

If InStr(1zNumbersChr$(KeyAscii)) > 0 Then KeyAscii 0: Exit Sub

End Sub

Private Sub Text2_KeyPress(KeyAscii As Integer)

If 
KeyAscii 8 Then Exit Sub

Dim zNumbers 
As String

zNumbers 
"0123456789"

If InStr(1zNumbersChr$(KeyAscii)) <= 0 Then KeyAscii 0: Exit Sub

End Sub 
الرد }}}
#3
(23-10-16, 01:39 AM)Ahmed_Mansoor كتب : وعليك السلام ورحمة الله وبركاته

أهلا بك أخي سالم , ضع هذا الكود في داخل كود المثال الذي أرفقته :

PHP كود :
Private Sub Text1_KeyPress(KeyAscii As Integer)

If 
KeyAscii 8 Then Exit Sub

Dim zNumbers 
As String

zNumbers 
"0123456789"

If InStr(1zNumbersChr$(KeyAscii)) > 0 Then KeyAscii 0: Exit Sub

End Sub

Private Sub Text2_KeyPress(KeyAscii As Integer)

If 
KeyAscii 8 Then Exit Sub

Dim zNumbers 
As String

zNumbers 
"0123456789"

If InStr(1zNumbersChr$(KeyAscii)) <= 0 Then KeyAscii 0: Exit Sub

End Sub 

اخي العزيز : احمد
 جزك الله با الجنه انت ومن تحب
 تحياتي
إذا ضاقت بك الأحوال يوماً     فَثِقْ بالواحِدِ الفَرْدِ العَلِيِّ
الرد }}}
تم الشكر بواسطة: Ahmed_Mansoor


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
Question [vb6.0] كيف اشترط على المستخدم ان تتكون كلمة السر من احرف كبيره وارقام ورموز ؟ Microformt 1 312 07-07-23, 08:26 AM
آخر رد: Taha Okla
Question [vb6.0] كيف امنع المستخدم إدخال في Text نص عربي اريد إدخال انجليزي فقط ؟ Microformt 5 914 26-11-22, 01:25 PM
آخر رد: عبدالمؤمن
Question [vb6.0] كيف اجعل textيقبل فقط إدخال نسبة موأيه بتنسيق التالي ؟؟ Microformt 4 655 28-09-22, 04:54 PM
آخر رد: Microformt
Question [vb6.0] كيف اشترط على المستخدم إدخال تاريخ اكبر من السنه الحالية ؟؟ Microformt 2 721 04-08-22, 10:21 PM
آخر رد: Microformt
Question [vb6.0] كيف اجعل المستخدم التعديل على الأرقام في text1 فقط ولا يمكن مسحها ؟ Microformt 5 1,795 30-08-21, 11:54 PM
آخر رد: اسلام الكبابى
Question [vb6.0] كيف يمكن ان اشترط على المستخدم إذخال في Text "ذكر"او "انثى" ؟؟ Microformt 2 1,206 21-03-21, 10:39 PM
آخر رد: Microformt
  [vb6.0] كيف اشترط على المستخدم 14 رقماً في text ؟ Microformt 1 992 23-10-20, 01:18 AM
آخر رد: AL_BRNS
  [سؤال] إدخال الوقت و التاريخ Abdellah 3 1,514 03-06-20, 04:17 AM
آخر رد: Ahmed_Mansoor
Question [vb6.0] كيف يمكن اجبار المستخدم ادخال صيغة الوقت في تكست بوكس بهذة الصيغة مثلا 08:06 ص؟ Microformt 2 1,441 04-05-20, 11:27 PM
آخر رد: Microformt
Question [vb6.0] كيف اشترط على المستخدم إدخال في التكست إدخال قيمة تحتوي على علامة مئوية.؟؟ Microformt 5 1,943 12-04-20, 12:53 AM
آخر رد: AL_BRNS

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


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