Question

VB 如何停止程序

用VB做的程序运行的过程中，怎样停止程序，不要强制关闭VB

Answer 1

在过程中停止用exit sub

Answer 2

dim isstop as boolean'这个放在最上面
private sub command1_click()
isstop = true
end sub
sub main()
for j=0 to 1000000
if isstop = true then isstop = false:exit for
sum=sum+j
doevents
next
end sub

Answer 3

Ctrl+C

追问

我的意思是，比如这样一个程序：
for j=0 to 1000000
sum=sum+j
doevents
next
当j不到1000000时是不会停下来的，我想加个button，随时实现中止功能，