代码之家 › 专栏 › 技术社区 › Komakino_1251

Microsoft access记录结束错误“2105”

record if-statement ms-access forms

0

Komakino_1251 · 技术社区 · 7 年前

我有一个Microsoft access表单,允许用户通过“后退”和“下一步”两个按钮浏览记录。问题是,如果用户在第一条记录上单击“后退”,就会出现一条非常糟糕的错误消息。我如何防止这种情况发生?

因此,如果选择的记录为=1,并且按下了后退按钮,则什么也不做。

2 回复 | 直到 7 年前

1

0

Kostas K. 7 年前

尝试以下操作:

以前的记录:

If CurrentRecord <> 1 Then DoCmd.GoToRecord , , acPrevious

下一条记录:

If CurrentRecord <> Recordset.RecordCount Then DoCmd.GoToRecord , , acNext

2

0

Parfait 7 年前

考虑相应地调整错误处理程序:

Private Sub Back_Click()
On Error GoTo ErrHandle
     '...

ExitHandle:
  ' UNINITIALIZE SET OBJECTS
  Exit Sub

ErrHandle:
  If Err.Number = 2105 Then
     DoCmd.GoToRecord , , acFirst
  Else
     MsgBox Err.Number & Err.Description, vbCritical, "RUNTIME ERROR"
  End if
  Resume ExitHandle
End Sub