Fattar inte hur jag ska göra för att få in tre stycken kolumener med rubriken och en in data under varje.

Någon som har en kod och kan förklara så är jag tacksam :)

Löste det själv

<code>
Private Sub Additem(ByVal strName As String, Optional ByVal strSubitem1 As String = "", Optional ByVal strSubItem2 As String = "", Optional ByVal intImage As Integer = 0)

'Declare the Listview Items for adding

'The variable to hold the item in
Dim oitem As ListViewItem = New ListViewItem()

'The variable to hold a subitem in
'Note: You can no longer do Oitem.subitems(x) or oitem.listsubitems(x) to access the items subitems
Dim osItem As ListViewItem.ListViewSubItem

oitem.Text = strName

osItem = New ListViewItem.ListViewSubItem()
osItem.Text = strSubitem1

oitem.SubItems.Add(osItem)

osItem = New ListViewItem.ListViewSubItem()
osItem.Text = strSubItem2

Me.ListView1.Items.Add(oitem)
End sub

</code>

Nu använder man bara
<code>
Additem(TextBox1.Text, TextBox2.Text, TextBox3.Text)
</code>