错误处理

Question

on error resume next
for i=1 to 10 
sentence1(i)
         if err then
            err.clear
            '这儿处理
         end if 
sentence2
next

Answer 1

vb菜鸟，见笑了
怎么替换 '这儿处理 
然后不执行sentence2而直接进入下一循环

Answer 2

on error resume next
for i=1 to 10 
sentence1(i)
         if err then
            err.clear
            '这儿处理
         else
            sentence2
         end if 
next

Answer 3

'''出现错误时跳过不处理直接进入下一循环的写法：
on Error GoTo RE
for i=1 to 10 
sentence1(i)

         sentence2
     
RE:
next
'''出现错误时跳过不处理直接进入下一循环的写法：
on Error GoTo RE
for i=1 to 10 
sentence1(i)

         sentence2
     
RE:
next'''出现错误时处理完错误后进入下一循环的写法：
on Error GoTo RE
for i=1 to 10 
　　R:
sentence1(i)

         sentence2
     
next
exit sub
RE:
    msgbox err.number
    i = i + 1
    GoTo R

Answer 4

for i=1 to 10 
         on error goto handleerr:
sentence1(i)
         on error goto 0
         '这儿处理
          sentence2
aa:
next
handleerr:
     goto aa