VB程序出错，如何调试？

Question

如题所述

Answer 1

如果要让程序在循环中多次出错时都去执行eeerrr,只要把你的行标志st的位置改到Name的上一句即可.但是这样修改比较容易出死循环,比如你一直用同一个名字命名元来的文件,就会出死循环.

Answer 2

你的错误是重名造成,应该是这个原因:
假设D盘有个txt文件(该路径下就这一个txt文件),原名0.txt
现在你第一次改名,由于你的名称是用Str(I
+
1)
+
Right(jj,
4),也就是把文件从0.txt变为了10.txt(I=0
To
Z,由于就一个文件,I=0所以Str(I+1)1)
第二次在进行改名,由于还是一个txt文件,这时候I从0开始,而你后面每次取的是文件的右4位,这时候10.txt的右4位还是0.txt,组合后得到的文件名还是10.txt,也就是和第一次改名后的一样,所以就会出现重名错误.
修改方法:
把On
Error
GoTo
eeerrr改为On
Error
Resume
Next
或者
修改你的重命名的规则(也就是修改你的代码)