VB调试中的条件断点

　　假如某For循环中，最终发现当i=31时出错，这时你需要在i=31时单步调试，有4个方法：
1.在n = fun1(i)行设置断点，然后按F5一步步到i=31时改按F8进入子函数单步调试
2.插入一小片代码设置断点，例如：

Visual Basic code

?

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

Visual Basic code

?

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      '其他代码 Next 4.和debug.assert类似： 右击代码区中的i，选择菜单“添加监视”，在表达式框里输入i=31，下面选择“当表达式值为真时中断”， 这样就ok了，一句代码不要。