[vb.net] données listview

Version imprimable

03/02/2006, 22h07
iamunknown

[vb.net] données listview
bonjour bonjour !

je suis sur une listbox actuellement qui me pose quelques problèmes !

en résumé j'ai x champs dans ma listbox, et je voudrais récupérer par exemple le 2eme et 5eme champs de toutes mes lignes.

j'ai donc essayé un for each comme cela :
Code:

1 2 3 4 5 Dim champs As String For Each ligne As DataRowView In listBox1.Items champs = ligne.Item(0).ToString Next MessageBox.Show(champs)
et j'ai cette erreur : Le cast spécifié n'est pas valide :?

une petite idée ? merci ;)

Ben oui :roll:

Citation:

Envoyé par MSDN

Public ReadOnly Property Items As ListBox.ObjectCollection

qu'attends-tu pour transtyper :?: :?

Code:

1
2
3
4
5
6
7
8
9
10
11
12
 
Dim fieldValue2 As String
Dim fieldValue5 As String
Dim message As String = String.Empty
 
For Each ligne As Object In listBox1.Items 
   fieldValue2 = CType(ligne, DataRowView).Item(1).ToString()
   fieldValue5 = CType(ligne, DataRowView).Item(4).ToString()  
   message &= "valeur2 : " & fieldValue2 & ", valeur5 : " & fieldValue5)
   message &= Environment.NewLine
Next
MessageBox.Show(message)

04/02/2006, 11h30
iamunknown

bonjour !

euh, j'ai exactement la même erreur avec ton code :?
04/02/2006, 13h09
neguib

Montres nous le code de peuplement de ton ListBox stp pour savoir exactement quel est le type chargé dans la liste :?:

alors voici la création de ma listbox

Code:

1
2
3
4
5
6
7
8
9
lstSite.View = View.Details
lstSite.GridLines = True
lstSite.AllowColumnReorder = True
lstSite.FullRowSelect = True
lstSite.Columns.Add("Catégorie", 230, HorizontalAlignment.Left)
lstSite.Columns.Add("Site", 200, HorizontalAlignment.Center)
lstSite.Columns.Add("Pourcentage", 100, HorizontalAlignment.Center)
lstSite.Columns.Add("URL", 140, HorizontalAlignment.Center)
lstSite.Columns.Add("Auteur", 140, HorizontalAlignment.Center)

et je remplis ma listbox de cette façon :

Code:

1
2
3
4
5
6
7
Dim list As New ListViewItem
list.Text = cb_categorie.SelectedItem
list.SubItems.Add(cbSite.SelectedValue)
list.SubItems.Add(nbVisite.Text)
list.SubItems.Add(lbUrl.Text)
list.SubItems.Add(lbAuteur.Text)
lstSite.Items.Add(list)

04/02/2006, 13h57
neguib

Ben heureusement que je t'ai demandé
ListBox t'es sûr 8O
çà serait pas ListView par hasard :?
n'oublies pas de modifier ton titre ...
04/02/2006, 14h06
iamunknown

autant pour moi :oops: ça faisait un moment que j'avais pas touché cette application :oops:

et j'ai même pas fait attention en plus 8O
04/02/2006, 17h35
iamunknown

c'est bon ;) merci de m'avoir écouté même si c'était pas la bonne question ! :lol: