在ACCESS中，这个效果应该放在哪个事件中？
答案:2 悬赏:10 手机版
解决时间 2021-11-15 23:49
- 提问者网友：我的未来我做主
- 2021-11-15 06:46
在ACCESS中，这个效果应该放在哪个事件中？
最佳答案
- 五星知识达人网友：廢物販賣機
- 2021-11-15 07:44
应当放在窗体加载事件中！即：Form_Load
窗体打开事件在窗体加载事件前面触发，主要用于根据指定条件判断是否打开窗体；而加载事件主要用于对窗体及控件数据源的定义和各种属性的设置。
晕，请以后尽可能一次性把问题描述清楚。。免得白费时间啦。。。
放到【添加新记录】按钮的代码中判断比较合适。但必须关闭窗体的导航按钮。。
下面示例以最多输入10条记录为限。仅供参考！
Private Sub Command1_Click()
On Error GoTo Err_Command1_Click
'获取当前记录编号
i = CurrentRecord
'添加新记录
DoCmd.GoToRecord , , acNewRec
'如果此时的记录编号超过10
If CurrentRecord > 10 Then
'返回记录编号为i的记录（即添加新记录前的记录）
DoCmd.GoToRecord , , acGoTo, i
'提示记录数达到上限
MsgBox "记录数已达上限，添加新记录命令不可用！", 64 + 0 + 4096, "提示"
End If
Exit Sub
Err_Command1_Click:
MsgBox Err.Description
End Sub
窗体打开事件在窗体加载事件前面触发，主要用于根据指定条件判断是否打开窗体；而加载事件主要用于对窗体及控件数据源的定义和各种属性的设置。
晕，请以后尽可能一次性把问题描述清楚。。免得白费时间啦。。。
放到【添加新记录】按钮的代码中判断比较合适。但必须关闭窗体的导航按钮。。
下面示例以最多输入10条记录为限。仅供参考！
Private Sub Command1_Click()
On Error GoTo Err_Command1_Click
'获取当前记录编号
i = CurrentRecord
'添加新记录
DoCmd.GoToRecord , , acNewRec
'如果此时的记录编号超过10
If CurrentRecord > 10 Then
'返回记录编号为i的记录（即添加新记录前的记录）
DoCmd.GoToRecord , , acGoTo, i
'提示记录数达到上限
MsgBox "记录数已达上限，添加新记录命令不可用！", 64 + 0 + 4096, "提示"
End If
Exit Sub
Err_Command1_Click:
MsgBox Err.Description
End Sub
全部回答
- 1楼网友：第幾種人
- 2021-11-15 08:16
放到打开事件即可！Open事件。
我要举报
如以上回答内容为低俗、色情、不良、暴力、侵权、涉及违法等信息，可以点下面链接进行举报！
点此我要举报以上问答信息
大家都在看
推荐资讯