当我在编辑表单的组合框的After Update事件中使用以下vba代码时,我收到调试错误。当我将这段代码与数字字段一起使用时,效果很好。当我使用ProgramName(文本字段)时,我收到一个调试错误 3070,光标指向FindFirst行。 非常感谢所有帮助!
Private Sub cmbFindRecord_AfterUpdate() 如果IsNull(Me!cmbFindRecord)则退出Sub
使用Me.RecordsetClone .FindFirst“[ProgramName] =”&我!cmbFindRecord 如果不是.NoMatch然后 如果Me.Dirty然后Me.Dirty = False Me.Bookmark = .Bookmark
End If
End With
End Sub