SQL Server 使用循环在文本框中显示所有Listview数据

mv1qrgav 于 2022-11-21 发布在其他

关注(0)|答案(2)|浏览(141)

Dim Mysqlconn = New SqlConnection
    Mysqlconn.ConnectionString = "Data Source=DESKTOP-D32ONKB;Initial Catalog=Attendance;Integrated Security=True"

    Dim dt As DataTable = New DataTable("studentdata")

    Mysqlconn.Open()

    Dim query As String
    query = "select ID from studentdata where Class='" & ComboBox1.Text & "'"

    Dim Command = New SqlCommand(query, Mysqlconn)
    Dim dr = Command.ExecuteReader(CommandBehavior.CloseConnection)

    ListView1.Items.Clear()
    Dim x As ListViewItem

    Do While dr.Read = True
        x = New ListViewItem(dr("ID").ToString)
        ListView1.Items.Add(x)
    Loop

    For i = 0 To ListView1.Items.Count - 1
        TextBox1.Text = ListView1.Items(i).SubItems(0).Text
    Next

在这段代码中，Textbox1显示的是Listview1中的最后一行。我的要求是将Listview1中的所有数据一个接一个地显示在textbox1中。是否可以使用循环在textbox1中显示从Listview1中读取的所有数据。谢谢...

sql-server

来源：https://stackoverflow.com/questions/74426503/all-listview-data-show-in-textbox-using-loop

2条答案

按热度按时间

xmq68pz91#

一个文本框一次只能保存一个字符串。如果它被设置为允许多行字符串（问题中没有明确说明），你可以用换行符分隔每一项。否则，你可以用逗号之类的分隔符分隔字符串。

Dim query As String = "select ID from studentdata where Class= @class"
Using conn As New SqlConnection("Data Source=DESKTOP-D32ONKB;Initial Catalog=Attendance;Integrated Security=True"), _
      cmd  As New SqlCommand(query, conn)

    cmd.Parameters.Add("@class", SqlDbType.NVarChar, 20).Value =  ComboBox1.Text
    conn.Open()
    Using dr As SqlDataReader = cmd.ExecuteReader()
        While dr.Read()
            ListView1.Items.Add(New ListViewItems(dr("ID").ToString()))
        End While
    End Using
End Using

TextBox1.Text = String.Join(",", ListView1.Items.Select(Function(i) i.SubItems(0).Text))

还要注意我是如何使用查询参数在SQL命令中包含组合框值的。其他任何事情都会给你带来麻烦，通常是迟早的事。

赞(0）回复(0）举报 2022-11-21

ehxuflar2#

使用 as 循环，正确的方式应该是这样：

Dim lines As New List(Of String)

For i = 0 To ListView1.Items.Count - 1
    lines.Add(ListView1.Items(i).Text)
Next

TextBox1.Lines = lines.ToArray()

中的每一个
你不能一直把 Text 属性设置为一个新值，然后期望旧值毫无理由地一直挂在那里。你可以每次都追加到 Text ，但是这样效率很低。正确的方法是创建一个值列表，将其转换为 String 数组，然后将其赋给 Lines 属性。
请注意，获取第一个子项的 Text 是没有意义的，因为它与该项的 Text 相同。

赞(0）回复(0）举报 2022-11-21

我来回答

SQL Server 使用循环在文本框中显示所有Listview数据

2条答案

相关问题

热门标签

最新问答