日期:2014-05-16  浏览次数:20881 次

谁会不?帮我看看了!
为什么我这样写程序,调用文件导入时,数据可以正确地导入到数库中,但是导入完成的时候,就是死机?为什么会这样子?
Private   Sub   Command36_Click()
On   Error   GoTo   ErrHandler           '出现错误信息时跳到Errhandler
        DoCmd.RunCommand   acCmdImport   '调用菜单中的文件导入
ExitHandle:
        Exit   Sub                                           '错误退出
ErrHandler:                                             '错误问题
        Select   Case   Err.Number
                Case   2501
                        'Do   nothing   as   cancel   selected   by   user
                        Resume   ExitHandle
                Case   Else
                        MsgBox   Err.Number   &   vbCrLf   &   Err.Description
                        Resume   ExitHandle
        End   Select

End   Sub

------解决方案--------------------
是你的代码问题,在导入C01后,系统出现死机,此时按住Ctrl+Break,会中断代码,跳到调用API函数的方法中。

这个方法无限制的循环,占用CPU,无法释放,没有出口,导致死机。