ListView VB 6.0

Hallo,

möchte eine mehrspaltige ListView erzeugen, bekomme jedoch bei der Zuweisung von Text2 einen Laufzeitfehler 380 ‚Ungültiger Eigenschaftswert‘.

Set litem = ListView1.ListItems.Add(, , „Text1“)
litem.SubItems(1) = „Text2“ ’ Fehler

Hat jemand eine Idee an was das liegt?

Hallo,

Hi,
machs doch so:

ListView1.ColumnHeaders.Add 1, "Menge", "Menge", 2000
ListView1.ColumnHeaders.Add 2, "Bezeichnung", "Bezeichnung", 2000
ListView1.View = lvwReport
ListView1.ListItems.Add 1, "M1", "123"
ListView1.ListItems(1).ListSubItems.Add 1, "B1", "rohe Eier"
ListView1.ListItems.Add 2, "M2", "545"
ListView1.ListItems(2).ListSubItems.Add 1, "B2", "dicke Eier"

Guß.Timo

möchte eine mehrspaltige ListView erzeugen, bekomme jedoch bei
der Zuweisung von Text2 einen Laufzeitfehler 380 ‚Ungültiger
Eigenschaftswert‘.

Set litem = ListView1.ListItems.Add(, , „Text1“)
litem.SubItems(1) = „Text2“ ’ Fehler

Hat jemand eine Idee an was das liegt?

Hallo Timo,

vielen Dank für die Info, so klappt es.

Wo kann man das nachlesen, habe nichts gefunden.

Gruß
Gunter

Hallo,

Hi,
machs doch so:

ListView1.ColumnHeaders.Add 1, „Menge“, „Menge“, 2000
ListView1.ColumnHeaders.Add 2, „Bezeichnung“, „Bezeichnung“,
2000
ListView1.View = lvwReport
ListView1.ListItems.Add 1, „M1“, „123“
ListView1.ListItems(1).ListSubItems.Add 1, „B1“, „rohe Eier“
ListView1.ListItems.Add 2, „M2“, „545“
ListView1.ListItems(2).ListSubItems.Add 1, „B2“, „dicke Eier“