برای اینکه بخواهید وقتی تکست باکس شما بعد از پر شدن از حد مجازی مثلااگه عددباشه تا 4 رقم به تکست بس بعدی که خودتون تعیین میکنید برهاز این کد میتونید استفاده کنید
Private Sub TextBox3_Change()
'whenever there are 6 characters registered in the TextBox
If TextBox3.TextLength = 6 Then
'select (SetFocus) the next TextBox
TextBox2.SetFocusEnd IfEnd Sub

