将项目从数据库添加到 ListView答案

【问题标题】：Add Items to a ListView from a database将项目从数据库添加到 ListView
【发布时间】：2015-04-05 23:29:13
【问题描述】：

我是一个 Vb nooby，我无法将特定项目从数据库添加到我的 Listview。

我想将组合框的值与表的列值进行比较。证明它们是否相等，例如 apple = apple 当它们相等时，应将整个数据集添加到我的 ListView。（仅与组合框的选定项具有相同值的数据集）

请帮忙！！

非常感谢和最好的问候

【问题讨论】：

欢迎来到 Stack Overflow！请花点时间仔细阅读：How to Ask

标签： database vb.net listview combobox add

【解决方案1】：

你可以试试下面的代码..

Imports System.Data.SqlClient
Public Class Form1
Dim conn As SqlConnection
Dim cmd As SqlCommand
Dim da As SqlDataAdapter
Dim ds As DataSet
Dim itemcoll(100) As String
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Me.ListView1.View = View.Details
Me.ListView1.GridLines = True
conn = New SqlConnection("Data Source=SQLEXPRESS;Initial Catalog=Northwind;Persist Security Info=True;User ID=id;Password=pass")
Dim strQ As String = String.Empty
strQ = "SELECT * FROM Northwind.dbo.Products"
cmd = New SqlCommand(strQ, conn)
da = New SqlDataAdapter(cmd)
ds = New DataSet
da.Fill(ds, "Table")
Dim i As Integer = 0
Dim j As Integer = 0
' adding the columns in ListView
For i = 0 To ds.Tables(0).Columns.Count - 1
Me.ListView1.Columns.Add(ds.Tables(0).Columns(i).ColumnName.ToString())
Next
'Now adding the Items in Listview
For i = 0 To ds.Tables(0).Rows.Count - 1
For j = 0 To ds.Tables(0).Columns.Count - 1
itemcoll(j) = ds.Tables(0).Rows(i)(j).ToString()
Next
Dim lvi As New ListViewItem(itemcoll)
Me.ListView1.Items.Add(lvi)
Next
End Sub
End Class

你可以试试这个link.

【讨论】：

【解决方案2】：

感谢您的帮助。在我的解决方案中，我只是在 sql 语句中设置了一个参数。

Public Function getRahmenvertrag**(ByVal costumerID As Integer)** As List(Of Rahmenvertrag)


    Dim sqlCom As New SqlServerCe.SqlCeCommand
    sqlCom.CommandText = **"SELECT * FROM Rahmenvertrag LEFT OUTER JOIN Kunde ON Kunden_FID = Kunden_ID WHERE Kunden_ID = @Kunde "**
    **sqlCom.Parameters.AddWithValue("Kunde", costumerID)**

Private Sub ComboBox1_Click(sender As Object, e As EventArgs) Handles ComboBox1.SelectedIndexChanged

    ListView4.DataBindings.Clear()
    ListView4.Items.Clear()

    If IsNothing(ComboBox1.SelectedItem) = False Then


        For Each Rahmenvertrag As Rahmenvertrag In controller.getRahmenvertrag(ComboBox1.SelectedItem.kunde_ID)

            With ListView4.Items.Add(Rahmenvertrag.bezeichnung)
                .SubItems.Add(Rahmenvertrag.inhalt)
            End With
        Next
    End If
End Sub

【讨论】：