Creer et remplir un ListBox en VB6 pr un nul

Résolu
Gegeleblond Messages postés 14 Date d'inscription   Statut Membre Dernière intervention   -  
 Fanatique VB6 -
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   Statut Membre Dernière intervention   1 204
 
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   Statut Membre Dernière intervention   1 204
 
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   Statut Membre Dernière intervention   1 204
 
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   Statut Membre Dernière intervention   1 204
 
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   Statut Membre Dernière intervention   3
 
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   Statut Membre Dernière intervention   3
 
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   Statut Membre Dernière intervention   3
 
J ai trouve mon erreur. Ca marche...
Merci encore
0
Gegeleblond Messages postés 14 Date d'inscription   Statut Membre Dernière intervention   3
 
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   Statut Membre Dernière intervention   1
 
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   Statut Membre Dernière intervention   1 204
 
salut

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