我的编辑按钮和删除按钮有冲突

问题描述

在我对选择列表视图和编辑按钮进行编码后，我正在尝试使用 VB.net 在列表视图中编辑我的记录，但在我对删除按钮进行编码后，它开始出错

这是我的编辑按钮

    txtID.Text = CostumerList.SelectedItems(0).SubItems(0).Text
    txtFN.Text = CostumerList.SelectedItems(0).SubItems(1).Text
    txtLN.Text = CostumerList.SelectedItems(0).SubItems(2).Text
    txtAdr.Text = CostumerList.SelectedItems(0).SubItems(3).Text
    cbOrder.Text = CostumerList.SelectedItems(0).SubItems(4).Text
    cbPaymen.Text = CostumerList.SelectedItems(0).SubItems(5).Text
    DatePicker.Text = CostumerList.SelectedItems(0).SubItems(6).Text

End Sub

这是我的列表视图选择代码

    Dim s = n1 + n2 + n4 + n8
    br = ListBox1.SelectedItem.ToString()

    CostumerList.SelectedItems(0).SubItems(1).Text = txtFN.Text
    CostumerList.SelectedItems(0).SubItems(2).Text = txtLN.Text
    CostumerList.SelectedItems(0).SubItems(3).Text = txtAdr.Text
    CostumerList.SelectedItems(0).SubItems(4).Text = cbOrder.Text
    CostumerList.SelectedItems(0).SubItems(5).Text = cbPaymen.Text
    CostumerList.SelectedItems(0).SubItems(6).Text = DatePicker.Text
    CostumerList.SelectedItems(0).SubItems(7).Text = i
    CostumerList.SelectedItems(0).SubItems(8).Text = br
    CostumerList.SelectedItems(0).SubItems(9).Text = s

End Sub

这是我的删除按钮代码

  CostumerList.Items.Remove(CostumerList.SelectedItems(0))

它说 ArgumentOutofRangeException 未处理

当我删除我的列表视图选择代码时，两个按钮都可以正常工作

请帮忙

解决方法

要删除选定的 ListView 项目，请获取选定项目的索引，然后使用该索引来标识要删除的项目。

Private Sub RemoveListViewItem()
    Dim myIndex As Integer = CostumerList.SelectedIndices(0)
    CostumerList.Items(myIndex).Remove()
End Sub