تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
مفاجاة المبتدئين كود منع ادخال قيمة حرفية في التكست بوكس
#1
كاتب الموضوع : المبرمج الطموح vb6

السلام عليكم لن اطول عليكم بالحديث هذا هو الكود
كود :
[color=#000000][COLOR=#0000bb][/color][color=#007700]private [/color][color=#0000bb]sub text1_keypress [/color][color=#007700]([/color][color=#0000bb]keyascii [/color][color=#007700]as [/color][color=#0000bb]integer[/color][COLOR=#007700])
if ( [/COLOR][color=#0000bb]keyascii [/color][color=#007700]< [/color][color=#0000bb]48 [/color][color=#007700]or [/color][color=#0000bb]keyascii [/color][color=#007700]> [/color][color=#0000bb]57 [/color][color=#007700]) [/color][color=#0000bb]then keyascii [/color][color=#007700]= [/color][COLOR=#0000bb]0
end sub  
[/COLOR][/COLOR]

حيث اننا نحتاج فقط الى تكست بوكس واحد اتمنى ان يستفيد الجميع
لا تنسوننا من الردود و انا جاهز لاي سؤال تطرحونه ...................................
}}}
تم الشكر بواسطة:
#2

و هذا هو المثال .................................................. ...........


الملفات المرفقة
.rar   ex.rar (الحجم : 2.7 ك ب / التحميلات : 118)
}}}
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  كيفية عمل مسج بوكس تظهر لمدة ثم تختفي RaggiTech 0 2,579 17-10-12, 12:53 AM
آخر رد: RaggiTech

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


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