pb basic

Question

Bonjours à tous !


voila je vous situe mon problème, j'ai créé 2 tables access relier par l'intermédiaire d'un chamd nomé idSysteme

et donc, à un moment je fais afficher tous les noms de mes systemes
dans une combobox et je voudré pouvoir enregistrer l'id corespondant au
nom du systeme selectionner de ma combobox dans une variable nommé
strSysteme.


Merci de votre compréhension.

cs_FPatrick · Answer

Salut,

Au moment ou tu remplis ta liste, utilise la propriété itemdata

Exemple

Dim Index_I as integer

For Index_I = 0 To 10
   List1.Additem "Exemple " & STr(Index_I)
   List1.Itemdata(List1.newindex) = Index_I
Next Index_I

Et dans l'évènement click de la listbox

Msgbox List1.itemdata(List1.listindex)

Tu verras l'indentifiant Index_I associé au texte.

Pour ton cas, tu mémorise le champ idsystem dans itemdata et tu affiches le libellé avec additem

En espérant avoir été clair dans mes explications,bonne soirée.

cs_kevin16 · Answer

Je te remercie pour ta réponse mais il y a un problème avec ta
solution, en effet ca fonctionneré mais si je supprimme un systeme l'id
associé avc le système sera supprimmer par exemple si l'on supprimme le
3ieme système cela va supprimmer l'id 3 avec tous ce qui suit danc ca
donnera la série suivante : 1,2,4,5,etc... 


merci quand même, je vais éssayer de voir si je pouré adapter ton code a ma situation

cs_FPatrick · Answer

Re-bonjour,

Les 'index' que tu rentreras pour chaque valeur (chaque item) seront conservés même si tu supprimes ou tu réorganises l'ordre de tri.

Bonne journée.

cs_kevin16 · Answer

oui tu as entierement raison je vient a l'instant d'arriver a faire
fonctionner correctement  mon programme. je te remercie  bcp
de ton aide.

Pb basic

4 réponses

Votre réponse

Discussions similaires