求解第193页参考答案

急支糖浆

sub shtadd_1()
dim i as integer, sht as worksheet
i=2
set sht=worksheets("成绩表")
do while sht.cells(i,"c").value<>""
On error resume next
if worksheets(sht.cells(i,"c").value) is nothing then
worksheets.add after:=worksheets(worksheets.count)
activesheet.name=sht.cells(i,"c").value
end if
i=i+1
loop
end sub
打这个代码好长时间啊？？后面关于on error resume next的解释我也看了，但是我对于on error resume next的工作原理还是不清楚？什么叫做运行时的错误？是if worksheets(sht,cells(i,"c").value) is nothing这个判断总过程的错误还是单独这个语句的错误？！！如果错误的话，下面接着要运行的语句是哪个？是add过程吗？还是直接就跳过，直接到i=i+1这个？？？请ggsmart帮忙详细解说一下，论坛里关于on error, resume的介绍我也看了，但是看不懂哦。。。。。这本书我都看了3遍了，每次都能看懂一部分，每次都能学到新的知识，真的不错，就是如果能再白话的解释运行的过程就好了。谢谢。

急支糖浆

刚才搜了一下，看到了好多这个提问的，看来大家都很迷茫啊。我刚才自己试验了一下，原来这个错误是整个判断语句，如果判断语句错误的话，就会跳过整个判断语句，直接到end if，然后运行后面的语句。javascript:void(0)