移到下一条记录时为什么出错！

WTM1

移到下一条记录
Private Sub 命令0_Click()
On Error GoTo Err_命令0_Click
    DoCmd.GoToRecord , , acNext

Exit_命令0_Click:
    Exit Sub
Err_命令0_Click:
    MsgBox Err.Description
    Resume Exit_命令0_Click   
End Sub
这是标准的access 生成命令
为什么没有纪录的时候，使用总是出错！
谢谢！

marco2

因为记录已经处于Eof或Bof再用acNext/acPrevious当然会出错了。

WTM1

这我知道！如何避免，或者使纪录循环！？？

eio

将“MsgBox Err.Description”改“'MsgBox Err.Description”

WTM1

错误依旧！

yachtz

在docmd之前增加一条语句试试：
if me.form.recordclone.recordcount=0 then exit sub

WTM1

的！连下一步都不允许了！

大熊

以下是引用WTM1在2003-2-26 13:56:50的发言：
为什么没有纪录的时候，使用总是出错！

没记录还移动什么，关闭该按钮！

cattjiu

使用DAO的EOF来处理，具体可以看说明。

还是大熊的方法好，判断窗体一必填字段为空，则说明已经EOF，则按钮无效。

[此贴子已经被cattjiu于2003-3-4 11:13:23编辑过]

WTM1

谢谢！