Public Class Form2
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim _ListItem As ListViewItem
_ListItem = New ListViewItem({ListView1.Items.Count + 1, ""})
ListView1.Items.Add(_ListItem)
If ListView1.Items.Count > 1 Then
ListView1.Items(ListView1.Items.Count - 2).SubItems(1).Text = ListView1.Items.Count
End If
End Sub
End Class