Вопрос : первенствуйте textbox userform не смогите setfocus к себе

просто форма с только 2 textboxes.  Textbox1 признавает данные, процессы оно и после этого пытается к setfocus к себе поэтому оно может признавать больше данных.  Textbox2 имеет другое самостоятельное Кодего uses.


The следуя за не работало.  После того как данные были вписаны, textbox2 всегда получало бы фокус. Sub () программа debug.print/>
Private/>
TextBox1.text = Кодий
textbox1.setfocus
End Sub

The "" следуя за работала справедливо наилучшим образом.  Как только потребитель начинает войти в данные, они не могут выйти textbox до тех пор пока данными не быть проблема processed

The только будут оно немного comlicated. Если кто-нибудь имеет более лучшее разрешение, то пожалуйста вывесьте и вы получите points.

Otherwise, я будете PAQ это tomorrow

вопроса------- мое самое лучшее разрешение до тех пор -------------------

Dim CPUMadeChange как stopExit Boolean
Dim как
Private Sub Textbox1_AfterUpdate ()/>CPUMadeChange = True
TextBox1.text = ""» это горит случай _change. Я использую CPUMadeChange для того чтобы держать его from
CPUMadeChange =
If CPUMadeChange False
End Sub
Private stopExit Cancel = True
Then
stopExit Sub Textbox1_Change () stopExit после этого =
If True
End Sub

Private Sub Textbox1_Exit (Cancel ByVal как MSForms.ReturnBoolean) =
Stop
End Sub
False
End If
End Sub

Private Sub TextBox3_Enter () class=

Ответ : первенствуйте textbox userform не смогите setfocus к себе

Не можете вы как раз использовать случай выхода и прыгать AfterUpdate (будет IMO справедливо беспредметным в userforms VBA)?