Question

我一直在Access 2013中编写一个零件数据库，为我的各种需求创建表单。每个部分都有它自己的记录，但现在我需要添加一个＆＃34;备用部分＆＃34;领域。换句话说，如果第123部分不可用，我列出了可以替代使用的替代项目。我想要做的是双击这个备用部分字段＆＃34; Alternate＆＃34;并将它跳转到记录（在同一个表中），其中PartID字段=第一个记录中的备用字段我不确定这是一个DoCmd类型语句还是某种类型的查找语句。在此先感谢您的帮助！

Answer 1

DoCmd.FindRecord是一种方法。

以下是另一个例子。

Private Sub lbxProjects_AfterUpdate()
With Me
.RecordsetClone.FindFirst "ProjRecID=" & .lbxProjects.Column(7)
If Not .RecordsetClone.NoMatch Then
    .Bookmark = Me.RecordsetClone.Bookmark
    .cbxStateNum = Null
    .lbxProjects.Requery
    .Detail.Visible = True
    .cbxName.Requery
    .cbxName.SetFocus
End If
End With
End Sub

基于等于字段值跳转到另一个记录

1 个答案: