VB如何从函数中跳出？

Question

VB如何从函数中跳出？

Answer 1

在被调用函数中使用DoEvents语句即可。Global BreakCall As BooleanFunction MyCall1() ......While BreakCall'函数语句..............DoEventsWendEnd Function通过在其它的代码部分改变 BreakCall 的值，可以控制函数运行或结束。BreakCall = True '允许函数语句部分无限次数执行。BreakCall = False '函数语句部分本次执行完后便退出函数。

Answer 2

VB中的函数有Sub和Function之分，其最明显的区别是有无返回值。实现二者的跳出功能语句就是Exit Sub和Exit Function 这二者大多用于遁环语句当中,比如：Private&nbsp;Sub YourSubName()i=1Do While i<20Print "i=";iIf i=10 Then Exit Subi=i+1LoopEnd&nbsp;Sub