COMBOBOX CHARGER DEPUIS BDD VERS TEXTBOX
cs_NISANDSYSTEMS
Messages postés
178
Date d'inscription
vendredi 1 novembre 2002
Statut
Membre
Dernière intervention
9 janvier 2010
-
17 févr. 2007 à 11:58
benahmedsoufiane Messages postés 30 Date d'inscription dimanche 22 janvier 2006 Statut Membre Dernière intervention 1 avril 2010 - 21 févr. 2007 à 20:02
benahmedsoufiane Messages postés 30 Date d'inscription dimanche 22 janvier 2006 Statut Membre Dernière intervention 1 avril 2010 - 21 févr. 2007 à 20:02
Cette discussion concerne un article du site. Pour la consulter dans son contexte d'origine, cliquez sur le lien ci-dessous.
https://codes-sources.commentcamarche.net/source/41499-combobox-charger-depuis-bdd-vers-textbox
https://codes-sources.commentcamarche.net/source/41499-combobox-charger-depuis-bdd-vers-textbox
21 févr. 2007 à 20:02
19 févr. 2007 à 12:14
Mes explications n'ont pas ete définies correctement.
Milles excuses.
Trim enleve tous les espaces de gauche à droite mais pas entre les mots ou caracteres.
18 févr. 2007 à 13:58
LTrim pour enlever a gauche
RTrim pour enlever a droite
Trim pour enlever a gauche et a droite
En aucun cas les espaces entre deux mots ne seront enlevés!
++
17 févr. 2007 à 13:47
sa me donne :le chat
Il enlève devant et derrière la chaine de mots mais pas entre les mots.
Bref merci pour la remarque ;-)
17 févr. 2007 à 12:03
17 févr. 2007 à 11:58
En option explicit tu declares :Dim RsCombo As Recordset ' a mettre tout en haut de la page de code
Mais dans ta procedure tu la redeclares. Non
Soit tu declares dans la procedure en creant un nouvel object comme tu l'as fait mais sans creer de double en option explicit
ou soit tu créé une variable global dans la feuille ou module et là tu suis la procedure ci-dessous.
Private Sub MonCombo_Click()
'---------- critere de recherche
Dim I_numObj As Integer
Dim RsCombo As New Recordset 'pas bon
plutot ceci => Set RsCombo As New Recordset
A la fin de ta procedure tu detruis l'object:
Set RsCombo =Nothing
end sub