Question : VBA - Pause après SetFocus

J'ai l'erreur secondaire suivante PROC_ERR
du
On du code

Private ExitCheck () si Me.txt box1.Value = « écrivent ici » l'extrémité If

de Then
Me.txt box1.SetFocus
si Me.txt box2.Value = « écrivent ici » le résumé PROC_EXIT

End Sub

When Me.txt box1.SetFocus de Sub

PROC_ERR
MsgBox Err.Description
de sortie d'If

PROC_EXIT
de fin de Then
Me.txt box2.SetFocus
s'appelle, là n'est aucune pause pour que l'utilisateur entre le nouveau texte dans la boîte à textes. La seule manière que je peux faire qui doit pour appeler PROC_EXIT GoTo. Dans un événement de clic de bouton de commande programmé pour fermer une forme.  cela fonctionne très bien avec le PROC_EXIT GoTo après le SetFocus. J'essaye d'assortir le même code à l'événement de Form_Close et cela ne fonctionnera pas dans cet événement quand le sous-marin ci-dessus est appelé. Il fermera la forme sans laisser le nouveau texte entré par utilisateur dans le texte boxes.
class= de

Réponse : VBA - Pause après SetFocus

Employer l'événement de Form_Unload à la place. Alors vous pouvez décommander le déchargement.

Lee

1 :
2 :
3 :
4 :
5 :
6 :
7 :
8 :
9 :
10 :
11 :
12 :
13 :
Form_Unload secondaire privé (annulation comme nombre entier)

    Si txtbox1 = « entrent ici » alors
       MsgBox « saisissent svp des données dans la première boîte à textes »
       txtbox1.SetFocus
       L'annulation = rectifient
    ElseIf txtbox2 = « entrent ici » alors
       MsgBox « saisissent svp des données dans la deuxième boîte à textes »
       txtbox2.SetFocus
       L'annulation = rectifient
    Finir si

Finir le sous-marin
Autres solutions  
  •  MS Excel 2007 et pdf - l'exportation vers le pdf prend de longues heures !
  •  Dans le Perl, comment j'ajoute une valeur à la liste, puis le contrôle pour voir si la valeur existent avant d'ajouter une nouvelle valeur
  •  Comment fais j'initialiser de la HP BL460c G6 de san et de la HP XP 240000
  •  Comment fais j'employer une clef de permis de volume sur un ordinateur de HP avec du CD de restauration
  •  Emplacement primaire de deux SCCM dans l'annuaire actif
  •  L'initiateur et la HP D2D de l'iSCSI R2 du serveur 2008 de Windows GERCENT l'issue
  •  Stocker le dossier dans le mysql using connector.net et le champ de goutte
  •  Carte vidéo d'USB - bit 32 sur le matériel travaillant au niveau du bit 64 ?
  •  asp.net que j'essaye de convertir une forme de HTML en forme d'aspx ou ? ce qui jamais. Aide du besoin sur la façon dont à à elle.
  •  Winzip 12 issues de secours du travail ?
  •  
    programming4us programming4us