[Resolvidos]Uso de máscaras de entrada em caixa de texto combinando numeros, letras e hifen

Olá,

Tenho de entrar códigos diversos que utilizam numeros, letras e eventualmente hífen ("-"). Não existe um padrão, ou seja, o hifen pode estar em qualquer posição do codigo, bem como as letras e os números.

Gostaria de fazer uma máscara para evitar a entrada de outros caracteres diferentes destes mencionados, porém não sei se existe como fazer uma máscara que permita tal ação.

Coloquei a mascara "aaaaaaaaaa" mas ela não permite a entrada de "-".

OBS: de preferência sem permitir a entrada de espaços.

É isso,

Obrigado desde já pela ajuda.

Abraços,

Amigão boa tarde !

Veja se o atende, eu costumo usar assim;

Private Sub Form_Current()
Me.SuaCaixaTexto.InputMask = "&&&&&&&&&&;0;_"
'para obrigar a preencher 10 carateres
End Sub


Private Sub SuaCaixaTexto_KeyPress(KeyAscii As Integer)
If (KeyAscii >= vbKey0 And KeyAscii <= vbKey9) Or KeyAscii = vbKeyBack _
Or (KeyAscii >= 97 And KeyAscii <= 122) _
'97 ao 122 corresponde às letras minusculas de a...z
Or (KeyAscii >= vbKeyA And KeyAscii <= vbKeyZ) Or KeyAscii = 45 Then
'45 corresponde ao hífen ("-")
Exit Sub
Else
KeyAscii = 0
End If
End Sub

Show de bola JPaulo, funcionou perfeitamente quando os dados são entrados diretamente do teclado.

Mas aí surgiu um outro problema:

- Quando o usuário copia um texto (do MS-WORD por exemplo) que usa marcadores ou numeração, e cola na caixa de texto, o BD permite a entrada de caracteres especiais, mesmo com a mascara, ficando mais ou menos assim:

555-555-55 (código original)
1. 555-555 (código com numerador colado no bd.)
• 555-555- (código com marcador colado no bd)

PS: esse espaço entre o marcador e o codigo aparece como um "quadrado" no access.....

obrigado,

abraços,

Bom dia Jefferson;

É o que eu detesto nas filtragens de caracteres, é que existe sempre algo
para nos atormentar como por exemplo o copy/paste.

Veja se assim resolve o seu problema:
https://www.dropbox.com/s/0ugmnpjeemm328k/teste_mascara.rar?dl=0

JPaulo,

Apareceu um erro na compilação:

Por acaso é a ausencia da biblioteca outlook 12?

abraços,

Não tem qualquer influência, eu tenho essa referencia por defeito no meu Access 2003 e 2007.

Veja se na versão 2000 funfa ae.
https://www.dropbox.com/s/d3c9gka8fmtdo7s/teste.rar?dl=0

E ae funcionou ?

Pode copiar e colar tudo o que quiser na caixa de texto, depois de bater o "Enter" ficará apenas Letras, Numeros e o carater "-", conforme pediu.

Funciona.

Muito obrigado novamente,

Abraços,

Valew pelo retorno.

Boa tarde pessoas.
Tenho um problema similar e o arquivo não está mais disponível.
Se possível, atualizar o link.
Obrigado.

Tudo ON, amigão.