Disable Special Characters

[GavZ]

Hi - Can anyone tell me how to disable Special Characters in a Textbox

Thanks in advance!

 

[Guus2005]

you can capture them in the OnKeyPress event of the text box.

 

[missinglinq]

I've found using OnKeyPress and OnKeyDown becomes problematical when dealing with <Shift> + <Another key> combinations and for something like this I'd use something like

Private Sub ControlName_Change()
  If Right(Me.ControlName.Text, 1) Like "[#,!,@,$,%,&]" Then Me.ControlName.Text = Left(Me.ControlName.Text, Len(Me.ControlName.Text) - 1)
End Sub

where ControlName is replaced with the actual name of your textbox. Simply add any additional characters to block to

[#,!,@,$,%,&]

separating them by a comma.