Discussion :

[snaxisnake]

Bonjour,
Je dois être étourdie ... J'ai une reqête sql,et je n'arrive plus à faire prendre à une zone de liste le résultat de cette requête...

Code :

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

1
2
3
4
 
 
SQL = "select * from Louer where NumSem= " & DBCombo1.BoundText & ";"
ListCli.AddItem SQL

Seulement voilà, la liste prends comme résultat la requête elle même... J'ai du zapper quelques chose.

Merci

[jmfmarques]

une "zone de liste", hein ?
oui... tu es étourdie... et tu es ici sur VB6... pas sur VBA !
Et, en plus, tu as participé à :
http://www.developpez.net/forums/sho...d.php?t=149198
Explique-nous celà ...

[snaxisnake]

c'est pas le même, la c'est VB6 dont je parle. et oui zone de liste, cela existe en VB, enfin, listbox pour les anglais ...

[ThierryAIM]

Bonjour,
Je dois être étourdie ...

Oh que oui !!

http://www.developpez.net/forums/sho...d.php?t=167389

[snaxisnake]

Ici, c'est bien Visual Basic 6.0 ?

[ThierryAIM]

oui, mais c'est moi qui ai déplacé ton sujet ici

les sujets spécifiques à une technologie ne doivent plus etre posté dans http://www.developpez.net/forums/forumdisplay.php?f=28 mais directement dans le sous-forum correspondant

c'est juste une habitude à prendre

[snaxisnake]

ok.mais du coup, il y a un poste qui n'est pas de moi, où tout est mélanger avec une autre personne... lol faudrait effacer dans l'autre.

http://www.developpez.net/forums/sho...26#post1073626

[snaxisnake]

juste une derniere question,

Code :

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

1
2
3
4
 
 
 
ListCli.AddItem (rst("NumEmp", "NumSem", "NumCli"))

rst est un recordset, mais comme j'ai fait là, il y a erreur, car ce ne doit pa etre la bonne méthode pour avoir plusieurs colonnes...

[snaxisnake]

en voilà +

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
 
 
ListCli.Clear
SQL = "select * from Louer where NumEmp= " & DBCombo1.BoundText & ";"
Set rst = db.OpenRecordset(SQL)
 
rst.MoveFirst
 
Do While Not rst.EOF
 
      ListCli.AddItem (rst("NumEmp""NumSem""NumCli"))
 
      rst.MoveNext
 
Loop
 
rst.Close

mais comme avant, k'ai un problème pour le additem...

[MGD_Software]

On est en VB, pas en VBA (re !)

Le ListBox du VB n'a rien à voir avec celui de VBA.
Le premier est un contrôle natif de Windows. Le second est un contrôle ActiveX développé pour Access.

La principale différence est que le controle VB n'a QU'UNE SEULE COLONNE !
Idem avec le contrôle ComboBox d'ailleurs.

On peut jouer avec un second paramètre numérique que l'on range dans la propriété ItemData. Mais il faut s'arrêter là.

S'il y a plusieurs colonnes à utiliser, le mieux est de changer de type de contrôle. Le choix ne manque pas : MSFlexgrid, ListView, DataGrid, ...

Si c'est juste de l'affichage, on peut quand même utiliser le listBox et concaténer les différents champs en insérant des espaces pour les aligner verticalement. Dans ce cas, il est recommandé d'utiliser une police non proportionnelle (type Courier) pour avoir des alignements corrects.

Si les données proviennent d'une base, le mieux est l'association d'une contrôle Data et d'un tableau DataGrid. Attention, ces contrôles ne fonctionnent plus avec le modèle DAO (qui est utilisé ici, à en croire l'utilisation de OpenRecodset) mais avec le modèle ADO.