J'ai beaucoup réfléchi, mais je suis bloqué VB6 "RECHERCHER"

[Résolu]
Signaler
Messages postés
197
Date d'inscription
mardi 15 mai 2007
Statut
Membre
Dernière intervention
25 janvier 2014
-
Messages postés
197
Date d'inscription
mardi 15 mai 2007
Statut
Membre
Dernière intervention
25 janvier 2014
-
Bonjour,

je te souhaite bonne vie est bonne santé, car moi j'ai très besoin à cette solution, je n'arrive pas à réalise ce code, j'ai beaucoup réfléchi, mais je suis bloqué. J'ai espère de mon envoie le solution. Ami en plus merci pour tous.
*******************************************************************

ami voir le simple application pour mon aide à fini mon projet en plus merci pour tous.


http://cjoint.com/?BBvtrXK4NVa

5 réponses

Messages postés
17288
Date d'inscription
mercredi 2 janvier 2002
Statut
Modérateur
Dernière intervention
27 septembre 2021
70
La formulation du probleme est franchement limite...


Option Explicit

Private Base As Database

Private Sub Form_Load()
    Set Base = OpenDatabase("article.mdb")
    RemplirListArticles
End Sub

Private Sub Form_QueryUnload(Cancel As Integer, UnloadMode As Integer)
    Base.Close
End Sub

Private Sub Text2_Change()
    RemplirListArticles Text2.Text
End Sub

Private Sub RemplirListArticles(Optional ByRef vsLibelle As String)
    g.Rows = 1
    With Base.OpenRecordset("SELECT `code_art`, `libelle` FROM `ARTICLE` WHERE `libelle` LIKE """ & vsLibelle & "*""")
        Do Until .EOF
            g.AddItem .Fields("code_art") & vbTab & .Fields("libelle")
            .MoveNext
        Loop
        .Close
    End With
End Sub


Renfield - Admin CodeS-SourceS - MVP Visual Basic & Spécialiste des RegExp
Messages postés
14823
Date d'inscription
vendredi 14 mars 2003
Statut
Modérateur
Dernière intervention
9 octobre 2021
156
Bonjour,

Ton intro ne sert pas à grand chose.

As-tu une question précise ?
car sans cela, je doute que tu ais une réponse.

Lis le point 1 de ma signature.

---------------------------------------------------------------------
[list=ordered][*]Pour poser correctement une question et optimiser vos chances d'obtenir des réponses, pensez à lire le règlement CS, ce lien ou encore celui-ci[*]Quand vous postez un code, merci d'utiliser la coloration syntaxique (3ième icône en partant de la droite : )
[*]Si votre problème est résolu (et uniquement si c'est le cas), pensez à mettre "Réponse acceptée" sur le ou les messages qui vous ont aidés./list
---
Mon site

Bonjour,
Le titre également, "j'ai beaucoup réfléchi"
A quoi exactement? a travailler sur VB6? a abandonner la programmation?


Cordialement


CF2i - Guadeloupe
Ingénierie Informatique
Messages postés
18038
Date d'inscription
lundi 7 décembre 2009
Statut
Modérateur
Dernière intervention
11 avril 2018
239
Bonjour,

As-tu au moins conscience de ce que tu as mis dans le lien que tu nous as proposé d'ouvrir ?
Je ne le crois pas.


____________________
Réponse exacte ? => "REPONSE ACCEPTEE" pour faciliter les recherches d'autres forumeurs.
Pas d'aide en ligne installée ? ==> ne comptez pas sur moi pour simplement vous dire ce qu'elle contient
Messages postés
197
Date d'inscription
mardi 15 mai 2007
Statut
Membre
Dernière intervention
25 janvier 2014
2
Merci ami, je te souhaite bonne vie est bonne santé.
---Renfield