Textbox

[Guest Guest]

Boom , pelo visto vejo q esse forum e bem movimentado e com respostas rapidas (o q e dificil de c achar) então vamus para A DUVIDA

pessoal , queria saber como fazer isso

If Len(Text1.Text) = Text1.MaxLength And Len(Text1.Text) = Text1.SelStart Then SendKeys "{TAB}"

esse comando faz com q eu passe de campo automaticamente sem precionar TAB

ok ,

tentei trabalhar nele porque achei q havia uma semelhanca entra passar de campo automaticamente E adicionar uma LETRA automaticamente, q seria a "/"

tenho um textbox , ou seja , quero fazer com q quando o cara digite 2 numeros a "/" apareca automaticamente e logo em seguida a pessoa possa digitar o ano.

ou seja

ex.

01/2006

sei q tem o datebox , mais gostaria de fazer isso em um textbox

Att

[Graymalkin]

Aqui tem um exemplo que fiz para o caso de entrada de CEPs (se chama cep.zip): http://br.groups.yahoo.com/group/vbj/files/

Se bem que os controles do pacote Input32X são muuuuuiiiiitttttoooo mais práticos: http://www.eoliv.com/

Abraços,

Graymalkin

[Guest Guest]

Ok Graymalkin

Logo vo dar uma olhada nos links

enquanto isso , so para mostrar , fiz este comando seguindo o de trocar de campo automaticamente

If Len(cpo_dp(0).Text) = "2" Then SendKeys "{/}"

ate funcionou , mais o problema é:

quando eu tento apagar o q eu fiz , apaga apenas as 2 linhas depois da "/"

e quando dou DELETE sem nada no campo , ele coloca "///" 3 barras

[Guest Guest]

Corrigindo

If Len(Text1(0).Text) = "2" Then SendKeys "{/}"

[PedroBarreto]

Pelo que eu intendi, você pode usa uma mask