تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
كود لجعل أداة النص لا تقبل إلا الأرقام
#2
[COLOR="#008000"]تفضل اخي هذا الكود يؤدي نفس المهام ولكنه صغير ومختصر
PHP كود :
Private Sub TextBox1_KeyPress(ByVal sender As ObjectByVal e As System.Windows.Forms.KeyPressEventArgsHandles TextBox1.KeyPress

        On Error Resume Next


        
'كود كتابة الحروف العربية والاجنبية فقط في التكست مع استخدام زر المسح والتراجع والمسافة

        Select Case e.KeyChar
            Case "ء" To "ي", "A" To "z", ControlChars.Back, Chr(Keys.Space)
                e.Handled = False
            Case Else
                e.Handled = True
        End Select

    End Sub 

أسأل الله ام ينفعك وجميع المسلمين ان شاء الله يارب[/COLOR]
الرد }}}
تم الشكر بواسطة:


الردود في هذا الموضوع
كود لجعل أداة النص لا تقبل إلا الأرقام - بواسطة مبرمج بلا حدود - 18-11-12, 05:01 PM


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


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