在Visual Basic中运行时创建的ListView中的索引选择(Visual Studio2019)

Dim listView1 As New ListView()
listView1.Location = New Point(10, 10)
listView1.Size = New Size(200, 200)
listView1.View = View.Details
listView1.FullRowSelect = True
Me.Controls.Add(listView1)

' 添加列
listView1.Columns.Add("列1", 100)
listView1.Columns.Add("列2", 100)

' 添加行
Dim item1 As New ListViewItem("行1-列1")
item1.SubItems.Add("行1-列2")
listView1.Items.Add(item1)

Dim item2 As New ListViewItem("行2-列1")
item2.SubItems.Add("行2-列2")
listView1.Items.Add(item2)

' 获取选中的索引
Dim selectedIndex As Integer = listView1.SelectedIndices(0)

' 获取选中的项目
Dim selectedItem As ListViewItem = listView1.SelectedItems(0)

' 获取选中的子项
Dim selectedSubItem As ListViewItem.ListViewSubItem = selectedItem.SubItems(0)