Text Box Com Dois Digitos

[Ganhei]

Oi Pessoal,

Tenho uma textbox e gostaria que so fossem digitados apenas dois numero(já inserio o codigo de só numeros) e depois q foram digitados dois numeros ele fosse direto pro botao(usei o comando SetFocus) e se o numero for maior que 22 exibir uma MSGBOX com erro.(Usei o MSGBOX mas ele aparece duas vezes o erro).

Obrigado

[Vader]

Ae fera, alguém pode até saber alguma função especifica. Mas eu criei uma rotininha que move-se ao digitar o segundo digito...

Option Explicit
    Dim n As Integer

Private Sub Text1_KeyPress(KeyAscii As Integer)
    n = n + 1
    If n = 2 Then
        Text2.SetFocus
    End If
    
End Sub

para que só números sejam digitados, use a tabela ASC II; se o que for digitado for letra valor nulo, caso contario imprime....

qualquer coisa avisa....

[Graymalkin]

Você pode utilizar o evento Change e checar quando o texto inserido tiver tamanho (Len()) igual a 2, não?

Abraços,

Graymalkin