PROBLEMAS COM O MASK EDIT

ELMO01 15/12/2009 15:19:18
#329765
Boa a tarde, tenho um maskedit para digitação de matrícula com a seguitne formatação: 000000-00A, a máscara ######-##A e tamanho máximo de 10 caracteres contando com - e o A. Bem, quando necessito de digitar algum número teria que apagar o caracter 0 logo após o cursor e aparece o nº digitado, só que não faz isto.

Ex:
000000-00A -> após a digitação da matrícula teria que ficar assim: 001867-00A

Como faço para que isto aconteça.

Obrigado,
MITO 15/12/2009 15:33:38
#329766 Resposta escolhida
Nao use formatação , use apenas a o MAK #######-##A
TECLA 15/12/2009 16:29:55
#329770
Se for isso que precisa...


...segue o código abaixo:
Private Sub MaskEdBox1_LostFocus()
Dim ret As String, texto As String
texto = Replace(Replace(MaskEdBox1, [Ô]_[Ô], [Ô][Ô]), [Ô]-[Ô], [Ô][Ô])
ret = String(9 - Len(texto), [Ô]0[Ô]) & texto
If Right(ret, 1) <> [Ô]A[Ô] Then ret = Right(ret, Len(ret) - 1) & [Ô]A[Ô]
MaskEdBox1.Text = Left(ret, 6) & [Ô]-[Ô] & Right(ret, 3)
End Sub


PS: A máscara usada é [Ô][txt-color=#0000FF]######-##A[/txt-color][Ô].
ELMO01 16/12/2009 06:55:26
#329788
Ferraz e Tecla - Não expliquei como funciona esta matrícula, pois bem, vamos lá. Os 6(seis) promeiros dígitos é da matrícula em si, os 2(dois) dígitos finais me informa o que ele é, ou seja, 00(zero) me diz que é o associado principal e de 01 a 99 são os dependentes, já a letra [Ô]A[Ô],assim economizo na minha estrutura do banco de dados.

Exemplo:

[txt-size=1]000000-00A[/txt-size]

Onde -> 000000 -> matrícula em sí;
00 -> Associado
01 a 99 -> Dependentes
Então a matrícula fica assim:
002088-00A -> Associado ou
002088-01A -> Dependente
002088-02A -> Dependente
002088-03A -> Dependente e assim por diante até no máximo 99

Então no meu Mask teria a máscara 000000-00A e poderia alterar os zeros pelos números real da matrícula do Associado.
ELMO01 17/12/2009 06:50:39
#329883
Ten alguém que possa me ajudar com este mask?
Tópico encerrado , respostas não são mais permitidas
Voltar