Pytanie : VBA - Fermata po SetFocus

I mieć the następujący code

Private Okręt podwodny ExitCheck ()
On Błąd Rozpoczynający PROC_ERR
Jeżeli Me.txt box1.Value = "Wchodzić Do tutaj" Then
Me.txt box1.SetFocus
Końcówka If

Jeżeli Me.txt box2.Value = "Wchodzić Do tutaj" Then
Me.txt box2.SetFocus
Końcówka If

PROC_EXIT
Wyjście Sub

PROC_ERR
MsgBox Err.Description
Życiorys PROC_EXIT

End Sub

When Me.txt box1.SetFocus dzwonić, tam  być żadny fermata dla the użytkownik input nowy tekst w the textbox. The jedyny sposób I móc który być Rozpoczynający PROC_EXIT. W nakazowy guzik stuknięcie wydarzenie programować forma.  ono pracować świetnie z the Rozpoczynający PROC_EXIT po the SetFocus. I próbować the ten sam kod the Form_Close wydarzenie i ono pracować w ten wydarzenie gdy the ten okręt podwodny dzwonić. Ono zamykać the forma bez the użytkownik wkład nowy tekst w the tekst boxes.

Odpowiedź : VBA - Fermata po SetFocus

Używać the Form_Unload wydarzenie zamiast. Wtedy ty móc the rozładowywać.

Lee

(1):
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
Intymny Okręt podwodny Form_Unload (Odwoływać Jako Integer)

    Jeżeli txtbox1 = "Wchodzić Do tutaj" Wtedy
       MsgBox "Zadawalać wchodzić do dane w pierwszy textbox"
       txtbox1.SetFocus
       Odwoływać = Prawdziwy
    ElseIf txtbox2 = "Wchodzić Do tutaj" Wtedy
       MsgBox "Zadawalać wchodzić do dane w drugi textbox"
       txtbox2.SetFocus
       Odwoływać = Prawdziwy
    Kończyć Jeżeli

Kończyć Okręt podwodny
Inne rozwiązania  
 
programming4us programming4us