[RESOLVED] Spacebar in the textbox

[matrik02]

I try to avoid user from using space bar when typing the text in the textbox because I don't want to allow empty space being input in the textbox. How to do that?

If InStr(TxtKrigRasterWorkspace.Text, " ") > 0 Then

[_RaJ_]

Private Sub Text1_KeyPress(KeyAscii As Integer)
If KeyAscii = 32 Then KeyAscii = 0
End Sub

try This !!

[Deepak Sakpal]

Private Sub Text1_KeyPress(KeyAscii As Integer)
    If KeyAscii = 32 Then
        KeyAscii = 0
    End If
End Sub

[matrik02]

Thank you Deepak Sakpal and RAJ