谁会不?帮我看看了!
为什么我这样写程序，调用文件导入时，数据可以正确地导入到数库中，但是导入完成的时候，就是死机？为什么会这样子？
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，无法释放，没有出口，导致死机。