如果在窗体的第一个/最后一个记录中如何禁用导航按钮

时间:2013-03-08 15:10:59

标签: vba ms-access navigation

在MS Access 2007中,我希望能够禁用表单上的导航按钮。

伪代码如下

If at the first record Then
Disable Previous button

ElseIf at the last record Then
Disable the Next button

我认为它与Current事件有关。虽然我不确定具体的逻辑。

有什么想法吗?

1 个答案:

答案 0 :(得分:5)

如果您位于记录集的开头或结尾,

Access会默认禁用普通导航窗格上的上一个和下一个按钮。

如果您使用自定义导航按钮,则可以使用

Private Sub Form_Current()
    cmdPrevious.Enabled = Not (CurrentRecord = 1)
    cmdNext.Enabled = Not (CurrentRecord = DCount(AnyField, RecordSource))
End Sub