Question

我想创建一个按钮，允许我导航到下一个数据记录并显示在文本框中。

这是我当前的代码，它只能显示文本框中的第一条记录。

    Dim cmd As New SqlCommand
    cmd.Connection = Conn
    cmd.CommandText = "SELECT sendby,enquiry,status FROM Message WHERE recipient LIKE '" & namelbl.Text & "'"

    Dim dr As SqlDataReader
    dr = cmd.ExecuteReader


    If dr.HasRows Then

        dr.Read()
        form.Label2.Text = dr.Item("sendby")
        form.Label4.Text = dr.Item("enquiry")

        form.Label6.Text = dr.Item("status")

        dr.Close()

    End If
    Conn.Close()

那么如何在文本框中显示不同的行数据呢？

Answer 1

这应该允许您循环遍历DataReader

Do While dr.Read
    ' Work with items inside loop
Loop
If dr.IsClosed = False Then
    dr.Close()
End If

Answer 2

您可以执行以下操作

  While dr.Read
        form.Label2.Text = dr.Item("sendby")
        form.Label4.Text = dr.Item("enquiry")
        form.Label6.Text = dr.Item("status")
        dr.Close()
  Wend
  Conn.Close()

如何使用数据读取器从数据库导航到下一个数据记录？ vb.net

2 个答案: