1. la source record de votre forme ont des critères de
LÀ OÙ (((Twins_Detail.SO_ACT_LOCNOTE) = [formes] ! [SN_Lookup] ! [Text0]))
2. La boîte à textes Text0 emploie l'événement de keydown
Sous-marin privé Text0_KeyDown (KeyCode comme nombre entier, décalage comme nombre entier)
Si KeyCode = 13 alors « <>Me.Requery » font un requery
Appel GetCounts
Finir si
3. Le bouton de recherche font juste un requery de la forme, fondamentalement la même fonction quand vous appuyez sur la touche de pénétrer dans en tant qu'en nombre 2 ci-dessus
Sous-marin privé Command2_Click ()
Sur l'erreur Err_Command2_Click GoTo
Me.Requery
Appel GetCounts
Exit_Command2_Click :
Sortir le sous-marin
Err_Command2_Click :
MsgBox Err.Description
Résumé Exit_Command2_Click
Sous-marin d'extrémité