Rechercher : dans
Par :

[VB]listbox

Dernière réponse le 13 jui 2008 à 16:49:28 redwire, le 6 aoû 2005 à 10:50:33 
 Signaler ce message aux modérateurs

Bonjour,

Je suis en train de faire un formulaire pour ajouter des données dans une table avec VB5
J'ai notamment une listbox où on choisit un élément de la liste.

Quand on teste la page, si l'utilisateur n'a pas cliqué dans la listbox, aucun élément de la liste n'est sélectionné.

Comment faire pour:
que le premier élément de la liste soit sélectionné par défaut
que si l'utilisateur en sélectionne un autre, son choix soit pris en compte..

j'espère que je me suis fais comprendre, pas facile à expliquer tout ça...

merci!

2

Savoye, le 6 aoû 2005 à 12:30:57

Bonjour,

List1.ListIndex = 0 'c'est plus simple
List1.Selected(0) = True

ensuite c'est le Click de l'utilisateur qui sélectionne

Courage

Répondre à Savoye

3

majidane, le 6 aoû 2005 à 14:49:36

Reponse du question:
que le premier élément de la liste soit sélectionné par défaut
***********************code
if listbox1.listcuont <>0 then listbox1.listindex=0

Répondre à majidane

4

redwire, le 6 aoû 2005 à 15:50:03

Merci e votre aide ça marche!!!

En fait dans une autre partie du projet, j'ai une autre listbox et une zone avec des labels, que j'appelle fiche.
Je peux naviguer avec des boutons (précednt suivan etc...)

Quand je clique sur un élément de la listbox, j'arrive à afficher les labels correspondants
En revanche, je n'arrive pas à faire le contraire: quand je clique sur un bouton pour changer d'enregistrements, je voudrais sélectionner l'élément de la listbox qui va bien...

Répondre à redwire

5

Savoye, le 6 aoû 2005 à 16:16:50

Salut,

Pas certaind'avoir tout saisi sur cette question !
Tu veux avoir une ListBox d'un coté, de l'autre un label et que dans ce label s'affiche un élément de ta listbox que tu fais défiler en cliquant sur un bouton précédent ou suivant, est ce bien cela ?

Répondre à Savoye

6

redwire, le 6 aoû 2005 à 19:35:56

C'est ça.

une listbox d'un coté
des labels en dessous que je fais défiler et qui sont des données extraites d'une base de données

je voudrais que le tout soit cohérent:
quand je touche sur un bouton suivant:
les labels avancent
et
dans la list, l'élément correspondant est sélectionné

quand je sélectionne un élément dans la list
les labels avancent (ça, j'arrive!!!)

Répondre à redwire

7

Savoye, le 6 aoû 2005 à 20:50:10

Bonsoir Redwire,

OK j'ai compris, je regarde cela pas de suite car soirée barbecue oblige, mais soit un plus tard dans la soirée ou au pire demain matin.

A plus

Répondre à Savoye

8

Savoye, le 6 aoû 2005 à 22:36:39

Bonsoir,

Voilà je pense que cela devrait faire ton affaire bien sûr en l'adaptant à tes besoins.
Bonne continuation et peut être à plus



Private Sub CmdPrecedent_Click()
Dim i As Integer
i = List1.ListIndex
If i > 0 Then
i = i - 1
List1.ListIndex = i
Label1 = List1.List(i)
End If
End Sub

Private Sub CmdSuivant_Click()
Dim i As Integer
i = List1.ListIndex
If i < List1.ListCount - 1 Then
i = i + 1
List1.ListIndex = i
Label1 = List1.List(i)
End If
End Sub

Répondre à Savoye

9

redwire, le 7 aoû 2005 à 12:00:17
  • +5

Merci!

oh ben dis, tu es un accro de la prog, toi! pour t'y mettre après ta soirée barbecue!!!

je vais essayer d'adapter ça à mon projet, merci encore...

Répondre à redwire

10

Savoye, le 7 aoû 2005 à 16:57:46

Salut Redwire,

Non non je ne suis pas un accro de la prog, et je suis simplement un néophite, je me suis à Vb tout seul avec différent bouquin et didactitiel, mais comme je n'ai vraiment de prog à faire alors je stagne, donc c'est en cherchant des soluces pour aider que je me creuse la tête et que je découvre certaines choses.
Mes connaissances sont limitées et si un jour tu devais me poser une question à laquelle je ne serais pas répondre je le dirais clairement, mieux vaut se taire que de dire des c........
au début que je me suis mis à VB c'est grâce à des forums que j'ai trouvé des réponses, donc grâce aux autres, alors si maintenant je peux un peu aider c'est avec plaisir.
Pas de problème concernant la soirée barbecue, elle s'est terminée à 2 heures, mais disons que j'ai fait une petite pause tant que le cerveau était en mesure de réfléchir, car plus tard...... la fatigue aidant....
Allez peut être à plus

Répondre à Savoye

11

redwire, le 7 aoû 2005 à 17:34:42

Merci, je serai ravi de t'aider si je peux...

Répondre à redwire

redwire, le 8 aoû 2005 à 11:52:36

Bon, ben, j'ai un nouveau problème.....
ce qui est au dessus est résolu.

mais ça concerne encore la listebox....

en plus de mes boutons, suivant/précédent, j'ai mis des boutons ajouter/supprimer/modifier.

J'arrive à ajouter/supprimer/modifier. super!

mais j'aimerai que ça se mette à jour dans la listbox.

quand je clique sur mes boutons ajouter/supprimer/modifier
pour chacun d'entre eux, j'ouvre une nouvelle fenêtre qui se ferme une fois leur mission remplie

le problème est que je ne sais pas comment faire pour dire "quand j'ai ajouter/supprimer/modifier dans une fenêtre, je réinitialise la listbox de l'autre fenêtre..."

voilà! merci...

Répondre à redwire

12

Savoye, le 8 aoû 2005 à 16:32:14

Bonjour,

Essayes la commande

list1.refresh à la fin de tes actions.

A plus

Répondre à Savoye

13

redwire, le 9 aoû 2005 à 11:38:37

Bonjour!

pas de propriété refresh avec une listbox....

Répondre à redwire

14

redwire, le 10 aoû 2005 à 11:29:55

En fait, j'ai réécrit les lignes qui me servait à remplir ma listbox au chargement dans mes autres form ajouter/modif/suppr et utilisant

maform.list1.propriété
etc.. comme ça la listbox est utilisable à partir d'un autre form...

mais je pense qu'il doit y avoir des possibles pour écrire des sub qui fonctionnent dans tout le projet, une public sub ne fonctionne que dans un form, il me semble...

Répondre à redwire

16

Lupin.Arsene, le 10 aoû 2005 à 18:57:21

Salut,

Une routine public est reconnu dans tous le projet !

si tu ne la déclare pas public, tu l'appelle comme la
listbox en la précédent du nom de la forme.

Call MaForme.MaRoutine


Lupin
~L'essentiel est invisible pour les yeux~
~On ne voit bien qu'avec le coeur~

Répondre à Lupin.Arsene

17

redwire, le 11 aoû 2005 à 14:29:20

Oui j'ai utilisé cette manière de faire (c'est ce que je cherchais!!)

merci de votre aide!!

Répondre à redwire

15

Christrdc, le 10 aoû 2005 à 14:21:11

Je voudrai prendre contact avec un accros de la programmation pour plusieurs detail sur forum.
Je suis en afrique précisement en République DémocrartiQUE DU cONGO EX zaire

Répondre à Christrdc

18

simon, le 11 sep 2007 à 21:40:00

Bonjour je travaille sur VB6. je veux utiliser une listbox pour afficher les enregistrements d'une table.
1er pb. comment aligner les champs en colones dans la listbox ?
2er pb. quel code permet la selection d'une ligne de la liste?
3er pb. je veux utiliser une 2 eme listbox pour afficher la requete dont la condition where se fait par selection d'une ligne de la premiere liste?
svp aidez moi les gars.

Répondre à simon

19

Moremk, le 31 jan 2008 à 11:47:01

Bonjour je travaille sur vb6, je veux utiliser une listbox pour afficher les taux de chaque objet selectionné sur la liste, regarder ma demarche:

dim nom as string
dim taux as ingle

nom=list1.list(list1.Index)
label1.caption=nom

select case nom
case "Informatique"
taux=12.5
case "vente"
taux=8
case "micro"
taux=5.5
case else
taux=6
end select
label2.caption=taux

svp aidez moi

Répondre à Moremk

20

ahnach, le 16 fév 2008 à 23:56:05

Essai la DBLIST
elle est facille a manipuler avec les calcul des donnees

Répondre à ahnach

21

Simssima, le 21 mar 2008 à 15:26:17

J'ai une liste avec des nom de personnes. Si par exemple je choisi Antoine une autre feuille s'ouvre ("feuil1") comme faire avec VBA?

Répondre à Simssima

22

hajoura, le 30 mai 2008 à 15:58:03

bonjour , je veux ecrire un code qui me permet d'afficher dans une listbox

Répondre à hajoura

23

Fifou, le 26 jun 2008 à 14:01:15

Salut à tous,

je débute sur vb et j'ai un pb qui vous semblera basique :

j'aimerais intégrer une combobox ou une listbox pour faire l'action suivante :

lorsque je clique sur un des 3 items proposés, ce dernier s'affiche dans un label.
comment faire???? (ajout des items, procédures etc.)

Merci pr votre aide

Répondre à Fifou

24

 reda, le 13 jui 2008 à 16:49:28

- me.label.text=me.combobox.selectedvalue

Voila !
j'ai un pti probléme aussi dans l'utilisation de la listbox.
Je travaille avec visual studio et une base de données Access.
mon probléme : Le bouton " ajouter" doit me permettre d'ajouter une nouvelle ligne dans la table "nom_employé" (par exemple) et y afficher les noms des employés sélectionnés dans la listbox.
Pour ajouter un seul employé choisi, j'utilise la requete suivante : "insert into employé values me.listbox.selectedvalue"
Mais je voudrai savoir quel requéte utiliser pour inserer plusieurs éléments choisis dans la listbox.
j'éspére que l'explication de mon probléme a été clair.
Aidez moi S'il vous plait. ^-^

Répondre à reda
Collection CommentÇaMarche.net