تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
[سؤال] أختصار هذا الكود
#3
بعد إذن اخي ناجي
تفضل هده الـ Function ضعها في Module

PHP كود :
Public Function gWriteOnleNumber(IntKeyAscii As Integer)
If (
IntKeyAscii 48 Or IntKeyAscii 57Then
    gWriteOnleNumber 
0
Else
    
gWriteOnleNumber IntKeyAscii
End 
If
If 
IntKeyAscii 8 Then gWriteOnleNumber IntKeyAscii
If IntKeyAscii 13 Then gWriteOnleNumber IntKeyAscii
If IntKeyAscii 46 Then gWriteOnleNumber IntKeyAscii

End 
Function 
وضع هذا في حدث الـ KeyPress في كل تكست

PHP كود :
KeyAscii gWriteOnleNumber(KeyAscii
[صورة مرفقة: images?q=tbn:ANd9GcT72OLJW7D1E5QW-HUeWeJ...TGoNeg2jnQ]
الرد }}}
تم الشكر بواسطة: ناجي إبراهيم , @@أبورائد@@ , baderb14


الردود في هذا الموضوع
أختصار هذا الكود - بواسطة baderb14 - 25-10-13, 08:16 PM
RE: أختصار هذا الكود - بواسطة baderb14 - 26-10-13, 07:14 AM
RE: أختصار هذا الكود - بواسطة تركي الحلواني - 25-10-13, 11:10 PM
RE: أختصار هذا الكود - بواسطة mamas1 - 26-10-13, 02:11 AM
RE: أختصار هذا الكود - بواسطة mamas1 - 26-10-13, 04:06 PM
RE: أختصار هذا الكود - بواسطة baderb14 - 26-10-13, 05:13 PM

المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  اختصار الكود حسب المثال المرفق abde6726 2 529 29-10-23, 11:00 AM
آخر رد: abde6726
  اختصار الكود حسب المثال المرفق abde6726 0 420 28-10-23, 05:01 PM
آخر رد: abde6726
Question [vb6.0] عندي مشكلة في هذا الكود حيث انه لا يقبل الا رقم فقط اريد ان يقبل الارقام والاحرف ؟ Microformt 0 513 23-10-23, 08:06 PM
آخر رد: Microformt
Question كيف يمكن تطوير هذا الكود نامل المساعدة ؟؟ Microformt 1 1,145 22-11-21, 07:51 PM
آخر رد: اسلام الكبابى
Question [vb6.0] هل يمكن تغير نوع خط Label من خلال الكود وكيف ذلك ؟؟ Microformt 1 1,336 10-10-21, 08:58 AM
آخر رد: Microformt
  [سؤال] مساعدة في عمل هذا الكود العبادي 2 11 3,532 09-09-21, 01:29 AM
آخر رد: اسلام الكبابى
Question [vb6.0] نامل المساعدة في هذا الكود المرفق إن امكن ذلك ؟؟ Microformt 3 1,541 23-05-21, 08:50 AM
آخر رد: Ahmed_Mansoor
  [سؤال] كيفيه البحث باستخدام الكود aboezzat84 1 1,465 28-12-20, 05:59 PM
آخر رد: sendbad100
  سوال اخوانى الاحباب ارجو المساعدة فى هذا الكود كي بورد ارقام mhareek 0 1,239 22-09-20, 09:04 PM
آخر رد: mhareek
Lightbulb [كود] كود لتأجيل تنفيذ الكود بدون Timer! Omar 6.0 1 2,319 19-08-20, 09:39 PM
آخر رد: Gfftfdeuoig c

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


يقوم بقرائة الموضوع: