Vb.net 如何添加我在ListView复选框中选中的项目的值

我正在做一个学校的项目，我发现自己陷入了这样的境地有多少天了。我找不到在ListView中添加选中项的值的方法

我找到了一种不勾选复选框就可以全部添加它们的方法，但是如果我勾选了复选框中的项目，我正在寻找一种添加它们的方法

Module PaymentControllerModule
    Public Sub TotalFeeValue()
        Dim query As String = "SELECT * FROM tbl_fees"
        Dim totalfees As Double

        Dim adapter As New MySqlDataAdapter
        Dim command As New MySqlCommand
        Dim table As New DataTable
        Dim i As Integer
        Dim o As Integer

        With command
            .CommandText = query
            .Connection = databaseconnect
        End With

        With adapter
            .SelectCommand = command
            .Fill(table)
        End With

        formPaymentsDynamic.Lv_Paymentfees.Items.Clear()

        For i = 0 To table.Rows.Count - 1
            With formPaymentsDynamic.Lv_Paymentfees
                .Items.Add(table.Rows(i)("fee_description"))
                With .Items(.Items.Count - 1).SubItems
                    .Add(table.Rows(i)("fee_price"))
                End With
            End With

            totalfees += Val(table.Rows(i)("fee_price"))
            formPaymentsDynamic.txtTotalAmount.Text = totalfees
        Next
    End Sub
End Module

我期望在ListView中检查的汇总项的输出，但即使不检查它们，我也只能计算所有项的汇总值。我希望你能帮助我

这是程序的示例输出，我设法在ListView中添加值，即使它没有被选中

---

您必须循环查看

列表视图中的选中项，而不是数据表。您的代码可能类似于：

For Each item As ListViewItem In YourListView.CheckedItems
    totalfees  += CDbl( item.SubItems("fee_price").Text)
Next

带有复选框的控制器是什么：datagridview，listview…？@CodePope LV可能意味着listview.listview先生@CodePope@LarsTechLv_Paymentfees是他将结果写入的控制器。我问的是一个控制器，他想从哪个位置读取ListView项中的数据，该项有一个Checked属性。问题不太清楚你在哪里需要帮助。谢谢你，长官@Code Pope。我会尽力的。如果有什么不清楚的，请告诉我。我有一个问题，先生，如果我这样做的话，我将如何获得选中项目的值。因为在datatable中，这就是我获取listview中每个项的值的地方？当您填充Sourcelistview时，请稍后在listview中插入所需数据表的所有数据作为子项。稍后，您可以通过调用
item.SubItem（“YourPropertyName”）.Text来获取每个属性