VB 怎么调用一个函数F1结束另外一个函数F2

[MeBoss]

RT
有个死办法，在F2里面没一个步骤都去办法，除了这个还有什么好办法吗,3Q

[threenewbee]

dim stopf2 as boolean

function f1()
    stopf2 = true
end function

function f2()
    stopf2 = false
    while true
        doevents
        if stopf2 then exit while
    wend
    stopf2 = false
end function

[MeBoss]

[Quote=引用 1 楼 caozhy 的回复:]
dim stopf2 as boolean

function f1()
stopf2 = true
end function

function f2()
stopf2 = false
while true
doevents
if stopf2 then exit while
wend
stopf2 = false
end function
[/Quote]

我需要点击后 立即结束函数的动作，假如在20行代码有判断，但是当只执行到10行代码的时候，那么就从第十行代码那里结束