Pergunta : primar o textbox do userform senão pode setfocus

formulário simples com os somente dois textboxes.  Textbox1 aceita dados, processos ele e tenta-os então ao setfocus a se assim que pode aceitar mais dados.  Textbox2 tem o outro código de seguimento não relacionado de uses.


The não trabalhou.  Depois que os dados foram incorporados, textbox2 começ sempre o foco. () o programa de processamento real de debug.print/>
Private/>
TextBox1.text = código de seguimento do
textbox1.setfocus
End Sub

The do "" trabalhou razoavelmente bem.  Uma vez que o usuário começa incorporar dados, não podem retirar o textbox até que os dados estejam problema do processed

The somente forem ele comlicated um pouco. Se alguém tem uma solução melhor, afixar por favor e você começ o points.

Otherwise, mim PAQ este tomorrow

da pergunta------- minha melhor solução até agora -------------------o

Dim CPUMadeChange como o stopExit de Boolean
Dim como o
Private Textbox1_AfterUpdate ()/>CPUMadeChange = True
TextBox1.text = ""” isto ateia fogo ao evento do _change. Eu uso CPUMadeChange para mantê-lo from
CPUMadeChange = de
If CPUMadeChange de False
End Sub
Private stopExit secundário do cancelamento = do True
de Then
do stopExit Textbox1_Change () stopExit então = do
If de True
End Sub

Private Textbox1_Exit (cancelamento de ByVal como MSForms.ReturnBoolean) = o
Stop
End Sub
de False
End If
End Sub

Private TextBox3_Enter () class= do

Resposta : primar o textbox do userform senão pode setfocus

Não pode você apenas usar o evento da saída e saltar o AfterUpdate (que é OMI razoavelmente injustificado em userforms de VBA)?