Discussion :

[imoelie]

Bonjour à tous,

S'il vous plait, j'ai une zone de texte là où je doit saisir une combinaison de numéros à chaque fois que je souhaiterai chercher un dossier de ma base.
Le code fonctionne très bien, le problème que je veux une ligne de code qui me permettrai de réinitialiser cette zone de texte après chaque recherche ( c'est à dire je ne serai plus obligé d"effacer cette combinaison de chiffre pour y saisir une autre) qui remet la zone de texte vide aprés chaque fin de recherche.

Voilà le code de ma zone de texte:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
Private Sub txtDRechDossier_Change()
    Me.cmdSearchDerchos.Default = True
End Sub

Et à ce niveau de cette partie de mon code que je voudrai insérer la lingne de commande que souhaite avoir:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
 If txtDRechDossier.Text <> "" Then
        i = i + 1
        ReDim Preserve sCriteria(i)
        If Len(txtDRechDossier.Text) > 8 Then 'douchette
            sCriteria(i) = "Num_Dossier = '" + Right(txtDRechDossier.Text, 8) + "'"
        Else
            sCriteria(i) = "Num_Dossier LIKE '" + txtDRechDossier.Text + "%'"
        End If
    End If

MERCI POUR VOTRE COLLABORATION,

[Delbeke]

Heu, jai peut être pas bien compris, mais un simple

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

txtDRechDossier.Text = ""

devrait suffire non ?

[l_autodidacte]

Oui, largement suffisant s'il le met dans l'évènement qui déclenche la recherche par exemple !