[2008] How do i limit my textbox to accept only perticular characters.

[SwapsRulez]

[2008] How do i limit my textbox to accept only perticular characters.
means suppose i want the email textbox, then i'll accept only keys having
a-z,A-Z,_,0-9 only.
for phone number, i'll accept 0-9,- only.

Thanks in advance..

[.paul.]

heres how to write custom textboxes

[SwapsRulez]

They are the controls. i want it done through the codes. like in VB6. thanks sooo much.... waiting for your answer.

[ComITSolutions]

Write Proper handling code in KeyPress Event of the Textbox. Where
Parameter "e" contains the details of the key pressed. When an unwanted key is pressed add aline e.handled=True.

[SwapsRulez]

Please can u explain in more detail with coding. i'm new here. dont anything about that. please help me...

[ComITSolutions]

Private Sub TextBox1_KeyPress(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyPressEventArgs) Handles TextBox1.KeyPress

    Select Case e.KeyChar
             Case "1","2","3","4","5","6","7","8","9","0"
             Case Chr(keys.Back) '<----- to allow BackSpace
             Case Else
                     e.Handled=True
    End Select
End Sub

[SwapsRulez]

Thanks so much working.... but i have one problem also...

i have a Masked textbox in the project. when i click on that masked textbox. the cursor location goes to only the position. but i want it to be at the starting position just like the normal textbox.

please help me. i want to complete the project in 15 minutes itself.
i've to go to college at sharp 11 AM in india. :P
thanks in advance. waiting for your reply.

[ComITSolutions]

If I have understood ur question. the following code is sufficient

    Private Sub MaskedTextBox1_MouseClick(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles MaskedTextBox1.MouseClick
        MaskedTextBox1.SelectionStart = 1
    End Sub

[danasegarane]

Have a try this one

Private Sub MaskedTextBox1_Enter(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MaskedTextBox1.Enter
        MaskedTextBox1.SelectionStart = 0
    End Sub

[SwapsRulez]

None are working
also you are doing right. also the your answers were right.
but still its sticking with the same position. donno why ?

[danasegarane]

This worked for me

 Private Sub MaskedTextBox1_MouseClick(ByVal sender As System.Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles MaskedTextBox1.MouseClick
        MaskedTextBox1.SelectionStart = 0
    End Sub

[ComITSolutions]

What is Not Working! Post the Code so that we can have a look and suggest u.

[SwapsRulez]

Private Sub Phone_Text_MouseClick(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles Phone_Text.MouseClick
        Phone_Text.SelectionStart = 1
    End Sub

[danasegarane]

That should be 0 instead of 1

Phone_Text.SelectionStart = 0

[SwapsRulez]

Also not working for 0. i've tried enter event also.
please help me.

[danasegarane]

Its working well for me