Précédent   Forum du club des développeurs et IT Pro > Autres langages > Général Visual Basic 6 et VBScript > VB 6 et antérieur
VB 6 et antérieur Visual basic 6 et versions antérieures. Avant de poster -> La FAQ VB6, Les tutoriels VB
Partagez cette discussion sur d'autres réseaux sociaux : Viadeo Twitter Google Facebook Digg Delicious MySpace Yahoo
Réponse
 
Outils de la discussion
Publicité
'
Vieux 21/02/2013, 16h24   #1
megamario
Membre actif
 
Avatar de megamario
 
Homme
VB6/VB.net/C/C++/C#
Inscription : septembre 2008
Messages : 551
Détails du profil
Informations personnelles :
Sexe : Homme
Âge : 42
Localisation : France, Indre et Loire (Centre)

Informations professionnelles :
Activité : VB6/VB.net/C/C++/C#
Secteur : Industrie

Informations forums :
Inscription : septembre 2008
Messages : 551
Points : 176
Points : 176
Par défaut VB6 - Remplissage d'une listview avec colonne

Bonjour,

Je ne comprend pas pourquoi ma listview ne se remplit pas.

J'ai donc une listview avec 3 colonnes. Les colonnes je les ai paramétrées dans l'objet.

Au final j'aimerais bien des checkbox dedans mais pour le moment je n'arrive pas a construire ma list.

Mon objet s’appelle: ListViewFiles

Code :
1
2
3
4
5
6
7
8
Dim itmX As ListItem
Dim i as integer
for i = 0 to 20
     Set itmX = ListViewFiles.ListItems.Add()
     itmX.Text = "1"
     itmX.SubItems(1) = "2"
     itmX.SubItems(2) = "3"
next i
La on est bien d'accort, je rempli mes colonnes avec la même chose.
1er colone avec des 1, 2eme avec des 2 et 3eme avec des 3
sur 20 lignes. C'est juste pour les tests et simplifier.

Seulement mes 20 lignes se créent bien mais je n'est rien dedans c'est vide.
Je précise que view est sur lvwReport.

Je ne comprend pas pourquoi. J'ai ajouté le gridLines pour bien voir les lignes elle sont bien la mais vide.

Au final je veux donc des checkbox. Car c'est une liste de fichier a envoyé par ftp. L'utilisateur peux choisir de ne pas envoyé certain fichier. Donc au remplissage il faut que je check toutes les checkbox. mais a la validation pour envoie en ftp il faut que je regarde si le fichier est checké ou pas.

Merci de votre aide, cela me fait chi.. car je me base sur un code existant et qui fonctionne très bien depuis des années.
megamario est déconnecté   Envoyer un message privé Réponse avec citation 00
Vieux 21/02/2013, 22h38   #2
infosam76
Membre Expert
 
Homme Eric Metz
Développeur informatique
Inscription : avril 2006
Messages : 515
Détails du profil
Informations personnelles :
Nom : Homme Eric Metz
Âge : 36
Localisation : Belgique

Informations professionnelles :
Activité : Développeur informatique
Secteur : Santé

Informations forums :
Inscription : avril 2006
Messages : 515
Points : 1 601
Points : 1 601
Bonjour,

Chez moi ce code fonctionne :

Code :
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
 
ListViewFiles.ColumnHeaders.Add , , "Col 1"
ListViewFiles.ColumnHeaders.Add , , "Col 2"
ListViewFiles.ColumnHeaders.Add , , "Col 3"
 
ListViewFiles.View = lvwReport
 
Dim itmX As ListItem
Dim i As Integer
For i = 0 To 20
     Set itmX = ListViewFiles.ListItems.Add()
     itmX.Text = "1"
     itmX.SubItems(1) = "2"
     itmX.SubItems(2) = "3"
 
Next i
Je n'ai rien paramétré dans l'éditeur graphique sauf le nom du control ListView
__________________
Articles sur les technologies .NET

Une réponse vous a aidé ? utiliser le bouton

Votre problème est résolu ? utiliser le bouton
infosam76 est déconnecté   Envoyer un message privé Réponse avec citation 00
Vieux 22/02/2013, 07h44   #3
megamario
Membre actif
 
Avatar de megamario
 
Homme
VB6/VB.net/C/C++/C#
Inscription : septembre 2008
Messages : 551
Détails du profil
Informations personnelles :
Sexe : Homme
Âge : 42
Localisation : France, Indre et Loire (Centre)

Informations professionnelles :
Activité : VB6/VB.net/C/C++/C#
Secteur : Industrie

Informations forums :
Inscription : septembre 2008
Messages : 551
Points : 176
Points : 176
Citation:
Envoyé par infosam76 Voir le message
Bonjour,

Chez moi ce code fonctionne :

Code :
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
 
ListViewFiles.ColumnHeaders.Add , , "Col 1"
ListViewFiles.ColumnHeaders.Add , , "Col 2"
ListViewFiles.ColumnHeaders.Add , , "Col 3"
 
ListViewFiles.View = lvwReport
 
Dim itmX As ListItem
Dim i As Integer
For i = 0 To 20
     Set itmX = ListViewFiles.ListItems.Add()
     itmX.Text = "1"
     itmX.SubItems(1) = "2"
     itmX.SubItems(2) = "3"
 
Next i
Je n'ai rien paramétré dans l'éditeur graphique sauf le nom du control ListView

Ba oui, c'est bien pour cela que cela m’inquiète sa. Il n'y a aucun raison que cela ne fonctionne pas. Enfin il doit bien y en avoir une.

Voila avant:


Voila après:


On voie bien que l’ascenseur est apparue après l'ajout des lignes et si je les compte j'ai ma quantité.

Je viens de voir que j'arrive a écrire dedans !!!!!:
megamario est déconnecté   Envoyer un message privé Réponse avec citation 00
Vieux 22/02/2013, 09h17   #4
infosam76
Membre Expert
 
Homme Eric Metz
Développeur informatique
Inscription : avril 2006
Messages : 515
Détails du profil
Informations personnelles :
Nom : Homme Eric Metz
Âge : 36
Localisation : Belgique

Informations professionnelles :
Activité : Développeur informatique
Secteur : Santé

Informations forums :
Inscription : avril 2006
Messages : 515
Points : 1 601
Points : 1 601
Écrire dedans de qu'elle façon, par programmation ou comme dans un fichier excel ?
__________________
Articles sur les technologies .NET

Une réponse vous a aidé ? utiliser le bouton

Votre problème est résolu ? utiliser le bouton
infosam76 est déconnecté   Envoyer un message privé Réponse avec citation 00
Vieux 22/02/2013, 11h18   #5
megamario
Membre actif
 
Avatar de megamario
 
Homme
VB6/VB.net/C/C++/C#
Inscription : septembre 2008
Messages : 551
Détails du profil
Informations personnelles :
Sexe : Homme
Âge : 42
Localisation : France, Indre et Loire (Centre)

Informations professionnelles :
Activité : VB6/VB.net/C/C++/C#
Secteur : Industrie

Informations forums :
Inscription : septembre 2008
Messages : 551
Points : 176
Points : 176
Citation:
Envoyé par infosam76 Voir le message
Écrire dedans de qu'elle façon, par programmation ou comme dans un fichier excel ?
Juste en double cliquant dedans, j'ai le curseur qui apparaît puis je peux éditer et écrire. Uniquement dans la colonne 1 apparemment.

Si non j'ai trouvé, enfin disont que cela fonctionne, il devais y avoir un conflit avec 2 composant (ref) de declarré.
J'avais la Microsoft Windows Common Controls 5.0 ainsi que la 6.0.

Il devait y avoir un conflit entre les 2 car ma listview utilisait bien la 6.0 (car le ckeckedboxes était présent, alors que tous les autres objets utilisaient la 5.0 car j'ai pas pu l'enlever tant que je n'avais pas supprimer tous les objets qui utilisaient ce package 5.0.

Donc voila résolu.
megamario est déconnecté   Envoyer un message privé Réponse avec citation 00
Réponse Cette discussion est résolue.
Outils de la discussion

Navigation rapide


Fuseau horaire GMT +2. Il est actuellement 19h39.


 
 
 
 
Partenaires

Hébergement Web