查看记录的示例程序

Question

大家好......我正在尝试制作一个示例程序来查看数据库中的记录，如上面的输出。我正在使用visual basic 6.0和Access ...使用DataControl，我想通过单击Next按钮查看特定ID号的下一个记录。我在下面的代码中遇到的问题是出现了其他ID号的记录......

Private Sub cmdNext_Click()
    With Me.dtaInfo.Recordset
        .MoveNext

        Me.txtCash.Text = .Fields("Cash")
        Me.txtAddress.Text = .Fields("Country")
    End With
End Sub

Private Sub cmdShow_Click()
    With Me.dtaInfo.Recordset
        .Index = "idxIDNumber"
        .Seek "=", Me.txtIDNumber.Text

        Me.txtCash.Text = .Fields("Cash")
        Me.txtAddress.Text = .Fields("Country")
    End With
End Sub

这是我的记录

Answer 1

由于您使用的是数据控件，因此只需将文本框绑定到该文件夹​​即可。

右键单击每个文本框控件，然后选择“属性”。在DataSource属性上将其设置为您的数据控件。即DATA1。

接下来，在文本框控件上设置DataField属性。即现金

当您在数据控件上单击向前/向后时，文本框控件将自动更新。

如果您真的想要控制记录集导航以进行查看/更新等，我建议切换到使用ADO而不是DAO并使用您自己的导航控件而不是数据控件。