For i As Integer = 0 To dt.Rows - 1
  Dim oItem As New ListViewItem(dt.Item(0).ToString)
  oItem.SubItems.Add(dt.Item(1).ToString)
  ListView1.Items.Add(oItem)
Next i

_________________________
Professionelle Entwicklerkomponenten
www.tools4vb.de