23-10-14, 02:52 AM
23-10-14, 04:02 AM
.....
لقبول الأحرف فقط
.....
لقبول الأحرف فقط
كود :
Private Sub TextBox1_KeyPress(ByVal sender As Object, ByVal e As KeyPressEventArgs) Handles TextBox1.KeyPress
If Not (Char.IsLetter(e.KeyChar) Or Char.IsWhiteSpace(e.KeyChar) Or Char.IsControl(e.KeyChar)) Then e.Handled = True
End Sub
.....