我的編輯按鈕和刪除按鈕沖突

Question

在我對 select 列表視圖和編輯按鈕進行編碼后，我嘗試使用 VB.net 在列表視圖中編輯我的記錄，但在我對刪除按鈕進行編碼后，它開始出錯

這是我的編輯按鈕

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

End Sub

這是我的列表視圖 Select 代碼

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

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

End Sub

這是我的刪除按鈕代碼

  CustomerList.Items.Remove(CustomerList.SelectedItems(0))

我得到一個錯誤：

ArgumentOutofRangeException 未處理

當我刪除列表視圖 select 代碼時，兩個按鈕都可以正常工作

請幫忙

Answer 1

刪除選定的 ListView 項目獲取選定項目的索引然后使用該索引來標識要刪除的項目。

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