VB6使用DataControl

Question

大家好，只是想让你问一下我的代码...我的数据库中有5条记录，用户ID为A02-0005 ...我希望使用 DataControl 并分别显示到TextBoxes ...我的问题是我只获得一组记录，当我单击DataControl的NextButton时，没有任何反应。在设计时，我设置了DataControl的DatabaseName，RecourdSource和RecordSetType ......那么问题可能出现在哪里？我正在使用VB6 ...提前致谢。

Answer 1

这里的问题是Seek方法。该方法采用另一个名为SeekOption的参数，默认情况下它只会找到第一个匹配。

相反，你可以使用Recordset上的Find方法，如下所示。您需要指定搜索条件以及记录集中开始搜索的位置。

Data1.Recordset.Find Criteria:="idxid= 'A02-0005'", Start:=adBookmarkFirst

最后，如果您希望文本框在用户单击数据控件时自动更新，那么您只需设置DataSource＆amp;文本框的DataField属性在设计时控制。