在代码中加上on error goto err进行错误处理试试 private sub command_click() on error goto err .... .... exi sub err: msgbox "错误:" & err.description,vbexclamation,"提示" exit sub end sub
跟客户环境也是有关系的.最好在打包的时候尽把所用到的DLL等文件都打包上去.并注册
你的程序中要加错误处理语句 on error goto err: exit suberr: msgbox err.description 这样就能看到错误的原因,也不至于程序全线崩溃退出
private sub command_click()
on error goto err
....
....
exi sub
err:
msgbox "错误:" & err.description,vbexclamation,"提示"
exit sub
end sub
on error goto err:
exit suberr:
msgbox err.description
这样就能看到错误的原因,也不至于程序全线崩溃退出
err:
msgbox err.number