منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب
كيف اجعل أدات ال textbox تقبل ارقام فقط أو نصوص - نسخة قابلة للطباعة

+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم لغة الفيجوال بيسك VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=182)
+--- قسم : قسم اسئلة VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=183)
+--- الموضوع : كيف اجعل أدات ال textbox تقبل ارقام فقط أو نصوص (/showthread.php?tid=883)



كيف اجعل أدات ال textbox تقبل ارقام فقط أو نصوص - الملاك الطاهر - 06-11-13

كيف اجعل أدات ال textbox تقبل ارقام فقط أو نصوص بدون ارقام ولكم جزيل الشكر.


RE: كيف اجعل أدات ال textbox تقبل ارقام فقط أو نصوص - Omar Mekkawy - 07-11-13

سلام عليكم أخوي Shy

تم نقل الموضوع لقسم الأسئلة Blush

يعطيك العافية Heart



RE: كيف اجعل أدات ال textbox تقبل ارقام فقط أو نصوص - mohammed moh - 07-11-13

السلام عليكم و رحمة الله
أولا قم بإضافة تكست بوكس و شاك بوكس للفورم و ضع الكود الآتي في حدث keypress للتكست بوكس
PHP كود :
Public Class Form1

    
Private Sub TextBox1_KeyPress(sender As ObjectAs KeyPressEventArgsHandles TextBox1.KeyPress
        
If CheckBox1.Checked True Then
            
If Char.IsLetter(e.KeyCharThen
                e
.Handled True
            
Else
                
e.Handled False
            End 
If
        ElseIf 
CheckBox1.Checked False Then
            
If Char.IsDigit(e.KeyCharThen
                e
.Handled True
            
Else
                
e.Handled False
            End 
If
        
End If
    
End Sub
End 
Class 
يمكنك التغيير من الكتابة بالحروف إلى الأرقام عن طريق تعليم شاك بوكس
بالتوفيق إن شاء الله