Office中国论坛/Access中国论坛

标题: 為何出錯 [打印本页]

作者: tone 时间: 2002-9-29 06:28
标题: 為何出錯
為了使選擇組合方框內容打開相應窗體,我在組合方框的"Change"事件中加了代碼:"DoCmd.OpenForm Combo37.Value",但,當執行要打開某一窗體時,按"取消"后,則出現"執行階段錯誤'2501',巨集指令'openform'被消子,請問怎樣修改.

作者: tmtony 时间: 2002-9-29 17:27
取消在哪里或在哪个窗体上

作者: tone 时间: 2002-9-29 20:02
标题: 請見附加檔
進入畫面后,選"BOM資料"下的BOM查詢系統組合方框中的"BOM資料以信號料查詢",提示"請輸入信邦料號",若按"取消",則出現系統提示的錯誤,請幫忙解決

作者: huanghai 时间: 2002-9-29 20:21
'代码修改如下：

on error goto errDoing '错误处理代码

DoCmd.OpenForm Combo37.Value

exit sub

errDoing:
if err.number<> 2501 then '忽略错误号2051的系统提示，即取消提示
msgbox err.description
end if

'--------------------------------------
'这种忽略系统错误提示的方法可以通过的，使用是只要修改对应的错误号（ERR.NUMBER）

欢迎光临 Office中国论坛/Access中国论坛 (http://www.office-cn.net/)