假如某For循环中,最终发现当i=31时出错,这时你需要在i=31时单步调试,有4个方法:
1.在n = fun1(i)行设置断点,然后按F5一步步到i=31时改按F8进入子函数单步调试
2.插入一小片代码设置断点,例如:
3.用debug.assert
1.在n = fun1(i)行设置断点,然后按F5一步步到i=31时改按F8进入子函数单步调试
2.插入一小片代码设置断点,例如:
1 2 3 4 5 6 7 8 9 10 | Dim i%, n%For i = 1 To 100 '其他代码 if i=31 then aa=1 '在这行设置断点,这行本身没有意义就是为了可以设置断点的。 end if n = fun1(i) debug.print i,n '其他代码Next |
3.用debug.assert
1 2 3 4 5 6 7 8 | Dim i%, n%For i = 1 To 100 '其他代码 debug.assert i<>31 n = fun1(i) debug.print i,n '其他代码Next4.和debug.assert类似:这样就ok了,一句代码不要。 |
版权声明:本文为asanscape原创文章,遵循CC 4.0 BY-SA版权协议,转载请附上原文出处链接和本声明。