Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As _
      System.EventArgs) Handles MyBase.Load
        ListView1.CheckBoxes = True
        ListView1.Columns.Add("Whatever", 50, HorizontalAlignment.Left)
        ListView1.Columns.Add("Is", 100, HorizontalAlignment.Left)
        Dim MyListViewItem As ListViewItem
        MyListViewItem = Me.ListView1.Items.Add("Blah")
        MyListViewItem.SubItems.Add("Meaningless value")
    End Sub

________
Alle Angaben ohne Gewähr. Keine Haftung für Vorschläge, Tipps oder sonstige Hilfe, falls es schiefgeht, nur Zeit verschwendet oder man sonst nicht zufrieden ist