Database 在VB.NET中从ListView控件检索数据

Database 在VB.NET中从ListView控件检索数据,database,vb.net,listview,highlight,Database,Vb.net,Listview,Highlight,我在详细信息模式下设置了一个ListView,如下所示: 当用户按下delete按钮时,我需要继续从数据库中删除他们的记录。这一点我可以做得很好,但我一直停留在如何检索ListView控件中突出显示的数据上。我尝试过使用谷歌,但我发现所有的例子都失败了 有人能帮我吗 您应该能够通过以下方式获取底层对象: ListView1.SelectedItems(0) 从数据库中删除该对象后,应重新绑定数据。您应能够使用以下方法获取基础对象: ListView1.SelectedItems(0) D

我在详细信息模式下设置了一个ListView,如下所示:

当用户按下delete按钮时,我需要继续从数据库中删除他们的记录。这一点我可以做得很好,但我一直停留在如何检索ListView控件中突出显示的数据上。我尝试过使用谷歌,但我发现所有的例子都失败了


有人能帮我吗

您应该能够通过以下方式获取底层对象:

ListView1.SelectedItems(0)

从数据库中删除该对象后,应重新绑定数据。

您应能够使用以下方法获取基础对象:

ListView1.SelectedItems(0)
Dim name, room, subject, date, period As String

If listviewName.SelectedItems.Count > 0 then

        '*********** transfer selected data on declare String variable ************'
        name= listviewName.SelectedItems(0).SubItems(0).Text
        room = listviewName.SelectedItems(0).SubItems(1).Text
        subject = listviewName.SelectedItems(0).SubItems(2).Text
        date= listviewName.SelectedItems(0).SubItems(3).Text
        period= listviewName.SelectedItems(0).SubItems(4).Text

        '*********** delete **************'
        cmd1.Connection = MYSQLCON
        MYSQLCON.Open()
        cmd1.CommandText = "DELETE FROM tablename WHERE columnname = '" & name & "'"
        reader = cmd1.ExecuteReader
        MYSQLCON.Close()

End If

从数据库中删除后,应重新绑定数据。

如何在ListView中绑定(放置信息)?使用datasource手动创建数据集,…?我在一个单独的子例程中从MS Access数据库获取结果,它直接将结果发布到ListView控件。如何在ListView中绑定(放置信息)?使用datasource手动创建Dataset,…?我在一个单独的子例程中从MS Access数据库获取结果,它直接将结果发布到ListView控件。
Dim name, room, subject, date, period As String

If listviewName.SelectedItems.Count > 0 then

        '*********** transfer selected data on declare String variable ************'
        name= listviewName.SelectedItems(0).SubItems(0).Text
        room = listviewName.SelectedItems(0).SubItems(1).Text
        subject = listviewName.SelectedItems(0).SubItems(2).Text
        date= listviewName.SelectedItems(0).SubItems(3).Text
        period= listviewName.SelectedItems(0).SubItems(4).Text

        '*********** delete **************'
        cmd1.Connection = MYSQLCON
        MYSQLCON.Open()
        cmd1.CommandText = "DELETE FROM tablename WHERE columnname = '" & name & "'"
        reader = cmd1.ExecuteReader
        MYSQLCON.Close()

End If