انا عامل textbox وعاوزه ما يقبلش غير ارقام
ياريت حد يفيدني بسرعة يا شباب
جزاكم الله خيراااااااااااااااا
كيفية تهيئة Textbox كي لا يقبل غير الأرقام
أرجوكم المسااااااااااااااااااااااااااعده
السلام عليكم...
في الحدث KeyPress للـ TextBox ضع الكود التالي:
- Private Sub Text1_KeyPress(KeyAscii As Integer)
- If KeyAscii > 31 Then
- If (KeyAscii < 48) Or (KeyAscii > 57) Then KeyAscii = 0
- End If
- End Sub
الرقم 48 هو رقم الصفر في جدول آسكي، و الرقم 57 هو رقم 9 في جدول آسكي.
الرموز من 0 إلى 31 في جدول آسكي هي رموز تحكم.
نرجو الاستفادة و السلام.
وَ قُلِ اعْمَلُوا فَسَيَرَى اللهُ عَمَلَكُمْ وَ رَسُولُهُ وَ الْمُؤْمِنُونَ
صدق الله العظيم
جزاك الله كل خير
طيب أنا كنت عامل تيكست ما يقبلش غير حروف
بس مش بيقبل غير انجليزي فقط
يا ريت لو تقولي الحل ايه وده الكود اللي انا عامله
If (KeyAscii < 65 And KeyAscii <> 8 And KeyAscii <> 32) Or (KeyAscii > 90 And KeyAscii < 97) Or (KeyAscii > 122) Then
KeyAscii = 0
End If
أرجو الإفاده
اللينك مش بيفتح معايا
أرجو الإفاده ضروووووووووووووري
يفتح عندي بشكل عادي، ما المشكلة؟
على كل، هذا الرد في موضوعك السابق، اذهب إليه وستجده بإذن الله.
هذه الجملة خاطئة :wacko: