Vb.net 单击按钮运行查询后，您可以了解如何移动到下一条记录

我正在visual studio中构建。我已经创建了表单，可以运行在查询设计器中生成的查询，但执行BindingSource时，MoveNext（）不再工作。我在网上找到了一些代码（粘贴在下面），但它是从第一条记录开始的，而不是从当前记录开始的。感谢您的帮助。我也是一个最低级的新手

Dim current = 0
    current = BindingSource.Position
    TableAdapter1.Fill(DataSet.TABLE)
    BindingSource.Position = Math.Min(current + 1, BindingSource.Count - 1)

查询代码：

Public Function Search() As Task
        Try
            Me.TableAdapter1.QueryName(Me.DataSet.TABLE, CType(TextBox1.Text, Integer))
        Catch ex As System.Exception
            System.Windows.Forms.MessageBox.Show(ex.Message)
        End Try
        Return Nothing

    End Function

再次感谢

---

编辑：我想我知道它为什么这么做。查询仅提取一条记录。符合条件的那个。是否有一种方法可以提取所有记录，并可能使用if语句转到我要查找的记录，然后使用move-next命令查看其余记录？

能否提供QueryName方法？根据我的搜索，我找不到那个方法。顺便问一下，如何检查记录是否正确。方法QueryName是我在查询设计器中创建的sql查询的名称。我不明白你所说的检查记录是什么意思，查询检索记录并显示在屏幕上。它由连接到的数据库的主键拉取。如何检查记录，是否使用datagridview？屏幕上会显示各种文本框