Dê dois clique no evento KeyPress do TextBox e insira o código logo abaixo.
If Not Char.IsLetter(e.KeyChar) And Not e.KeyChar = vbBack And Not e.KeyChar = "." And Not e.KeyChar = "," Then
e.Handled = True
End If
Espero ter ajudado e até a próxima.
A mente que se abre a uma nova idéia jamais voltará ao seu tamanho original. Albert Einstein
Bom dia Paulo Eduardo,
ResponderExcluirAgradeço primeiramente ao comentário... E com relação a observação que você fez, você está correto, mas segue abaixo o código conforme observação sua.
If Not Char.IsLetter(e.KeyChar) And Not Asc(e.KeyChar) = Keys.Back And Not Asc(e.KeyChar) = Keys.Space Then
e.Handled = True
End If
Espero ter ajudado, até mais... Abraços!
Atenciosamente,
Carlos Henrique Pereira - Analista de TI
(11) 96834-8466 / (35) 8468-6021