18-11-12, 05:01 PM
[COLOR="#008000"]تفضل اخي هذا الكود يؤدي نفس المهام ولكنه صغير ومختصر
أسأل الله ام ينفعك وجميع المسلمين ان شاء الله يارب[/COLOR]
PHP كود :
Private Sub TextBox1_KeyPress(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyPressEventArgs) Handles 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]

