可以。不过要消除转向(关闭错误陷阱):
  on error goto XXX
   ...
   ...
  on error goto 0
  on error resume next
  ....
  ....
  on error goto 0
  on error goto XXX
  ...
  ...

解决方案 »

  1.   

    On Error goto XXX
    ......
    On Error Resume Next
    ......
    On Error Goto XXX
    這樣就行了. :))
      

  2.   

    同意: uguess(uguess) 的,要销毁的就是on error goto 0
    然后再设置就可以了!
      

  3.   

    on error goto 0
    的作用是什么?能说详细点吗?
      

  4.   

    就是让它前一个On Error语句失效。
      

  5.   

    那对于这样程序:
    sub xxx
    on error goto err
    ....
    ....
    kill somefile
    ....
    ...
    err:
    .........
    end sub
    我要在这个SUB中某处,删除一个文件
    但当这个文件不存在的时候,KILL就会出错并跳到err处
    我希望kill somefile即使出问题,仍然可以执行下面的语句
    怎么实现呢?
      

  6.   


      我倒!不是告诉你了么?
      
      sub xxx
      on error goto err
      ....
      ....
      on error goto 0
      on error resume next
      kill somefile
      on error goto 0
      on error goto err
      ....
      ...
    err:
    .........
    end sub