"Roger" <ro******@hotmail.com> schrieb
Hei again Armin. Yes I already did, it does help significantly, but
that is what dropped me from several minutes to the 1 minute I'm at
now.... :-)
Still need to get further down or find an alternate way to display
this data...
Code to fill a listview with view=detail, 5 columns, 10,000 items:
Dim i As Integer
Dim Items As ListView.ListViewItemCollection
Dim s As Integer
s = Environment.TickCount
items = Me.ListView1.Items
Me.ListView1.BeginUpdate()
For i = 1 To 10000
Items.Add( _
New ListViewItem( _
New String() { _
i.ToString, _
"Column 2", "Column 3", "Column 4", "Column 5" _
} _
) _
)
Next
Me.ListView1.EndUpdate()
s = Environment.TickCount - s
MsgBox(s)
The code takes 0.84 seconds to execute.
--
Armin
http://www.plig.net/nnq/nquote.html http://www.netmeister.org/news/learn2quote.html