NOVA COLUNA LISVIEW

CEREBRO.X 24/05/2007 18:08:11
#218168

Boa noite pessoal

tenho o listiview abaixo e carrega de uma consulta no mdb

queria incluir no listviem mais uma linha tipo uma colocaçaõ
alem dos dados que foram retornados a sua posição.
acho que é isso

tipo
1
2
3
4

While Drr.Read
Dim codigo As String = Drr.Item(0)
Dim ls As New ListViewItem(codigo, 0)
ls.SubItems.Add(Drr.Item(1))
'ls.SubItems.Add(Drr_Reader.Item(2))
' ls.SubItems.Add(Drr_Reader.Item(3))
ListView1.Items.Add(ls)

vale ummmm !!!
End While