Creer et remplir un ListBox en VB6 pr un nul

Résolu/Fermé
Gegeleblond Messages postés 14 Date d'inscription lundi 26 février 2007 Statut Membre Dernière intervention 10 juillet 2008 - 28 mars 2008 à 16:35
 Fanatique VB6 - 1 avril 2011 à 11:16
Bonjour,

Je tiens a preciser que je suis une catastrophe en programmation mais je cherche a creer et remplir un ListBox en VB6. Je voudrais seulement obtenir une liste avec les nombres 1 a 51. Ca a l air simplissime mais je sais meme pas ou je suis suppose taper le code...
J ai tente un truc comme mais rien ne s affiche :

Private Sub Projection_Click(Index As Integer) // ma liste s appelle "Projection"
Dim i as Integer
For i = 1 To 51
Projection(i) = i
Next i
End Sub

Ne riez pas lol, je vois déjà des sourires s esquisser...
Merci de m eclairer.

PS: desole pour le manque d accents mais j ecris avec un qwerty.
A voir également:

10 réponses

Polux31 Messages postés 6917 Date d'inscription mardi 25 septembre 2007 Statut Membre Dernière intervention 1 novembre 2016 1 204
28 mars 2008 à 17:08
Bonjour,

Un premier point, ne remplit pas ta listbox avec l'évènement click ... fais le par exemple dans le Form_Load :
Public Sub Form_Load()
Dim i as Integer 
    For i = 1 To 51 
       Projection.Additem i
    Next i
End Sub


^^

polux
1
Polux31 Messages postés 6917 Date d'inscription mardi 25 septembre 2007 Statut Membre Dernière intervention 1 novembre 2016 1 204
28 mars 2008 à 18:15
rfe,

non la syntaxe est la bonne. Assures toi que le nom de ta listbox est bien "'Projection" et qu'elle se trouve bien sur ta form ....
Ca fonctionne chez moi ...

;o)

polux
1
Polux31 Messages postés 6917 Date d'inscription mardi 25 septembre 2007 Statut Membre Dernière intervention 1 novembre 2016 1 204
28 mars 2008 à 20:13
Ok c'est super alors .. tu me dire où elle se situait, stp ... ça peut servir pour d'autres ...
N'oublies de mettre résolu.

Bon courage pour la suite

;o)

polux
1
Polux31 Messages postés 6917 Date d'inscription mardi 25 septembre 2007 Statut Membre Dernière intervention 1 novembre 2016 1 204
29 mars 2008 à 14:14
Re,

Pour TOJO, ouvres un autre topic si tu veux des réponses... celui ci est résolu et n'a rien à voir avec ton sujet ...Merci
1

Vous n’avez pas trouvé la réponse que vous recherchez ?

Posez votre question
Gegeleblond Messages postés 14 Date d'inscription lundi 26 février 2007 Statut Membre Dernière intervention 10 juillet 2008 3
28 mars 2008 à 17:28
Merci, je viens de comprendre un point essentiel.
Par contre j ai ecris le code et j ai cette erreur " method or data member not found"
J ai tente de remplacer 'Projection.AddItem i' par 'Projection(i).AddItem i'

mais ca fait une autre erreur...
0
Gegeleblond Messages postés 14 Date d'inscription lundi 26 février 2007 Statut Membre Dernière intervention 10 juillet 2008 3
28 mars 2008 à 18:37
En fait je viens de remarquer quelque chose : tu as ecrit "Public Sub Form_Load()" et dans ma form j'ai "Private Sub Form_Load()". Mais meme en changeant ca, me refait la meme erreur... Je vais tenter de verifier encore...
0
Gegeleblond Messages postés 14 Date d'inscription lundi 26 février 2007 Statut Membre Dernière intervention 10 juillet 2008 3
28 mars 2008 à 20:08
J ai trouve mon erreur. Ca marche...
Merci encore
0
Gegeleblond Messages postés 14 Date d'inscription lundi 26 février 2007 Statut Membre Dernière intervention 10 juillet 2008 3
28 mars 2008 à 20:35
En fait j avais fait un copie/colle d une listBox au tout debut qui devait devenir ma listBox "Projection". Le nom etait bien "Projection" mais il apparaissait dans la liste Properties comme "Projection(0)" . D ou l erreur.

Attention au copie/colle !!!
0
tanger7 Messages postés 4 Date d'inscription vendredi 7 mars 2008 Statut Membre Dernière intervention 9 avril 2008 1
29 mars 2008 à 12:57
pour remlir un listbox ondoit ecrire le code suivant:
dim i as integer
for i=debut to fin
listbox.etems.add(i)
next i
/*debut=debut de la boucle et fin=fin de la boucle*/
0
Polux31 Messages postés 6917 Date d'inscription mardi 25 septembre 2007 Statut Membre Dernière intervention 1 novembre 2016 1 204
29 mars 2008 à 14:13
salut

Tu sors ça d'où : listbox.etems.add(i) ????
0
Fanatique VB6
1 avril 2011 à 11:16
trop fort ptdr
0
bonjour, suis un jeun veux développer avec la programmation sous visual basic
je veux besoin des aides pour la programmation
0