TextBox giriş bitince diğer textbox seçilmesi

[ewreka]

iki tane TextBox var.

TextBox1 in MaxLenght ini 2 olarak ayarladım.
Bu hücreye 2 sayı girince otomatik olarak TextBox2 ye geçisi nasıl sağlayabilirim?

 

[janveljan]

Bu kodları dener misiniz?

Private Sub TextBox1_Change()
If Len(TextBox1.Text) = 2 Then TextBox2.SetFocus
End Sub

 

[hamitcan]

Private Sub TextBox1_Change()
    If Len(TextBox1) = 2 Then TextBox2.SetFocus
End Sub

 

[ewreka]

teşekkür ederim..
istediğim buydu