作者chinoyan (chino)
看板Visual_Basic
标题Re: [VB6 ] 跳开for
时间Wed Nov 9 06:36:23 2011
※ 引述《BlueFeel (蓝色感觉)》之铭言:
: 请问一下, 我的for次数很多, 因此跑起来很久,
: 有时想 後悔取消, 但是按 任何物件, 就会出现 "没有回应" , 成现当机的样子
: 虽然 建了一个停止按钮将tri设1,在判断这1然後exit for
: 可是我发现, 还是无法解决"没有回应" 的情况, 它会延迟一些时间才跳开...
: 可能是因为"没有回应"一出现, tri就没法设1, 以至於无法马上跳开
: 小弟经验不够, 可能方法不对,可否请大大指点一下,
: 如何可以很顺的切断for, 且for过程按一些东西也不会 "没有回应"
: 感恩
: text1.text=100
: For n = 1 To text1.text
: For m = 1 To 2
: .......
: Next m
: ProgressBar1.Value = Int(n * (100 / (text1.text)))
: If tri = 1 Then
: Exit For
: End If
DoEvents
: Next n
1
2
--
████ █ ★ ████ █ █ █
█ █ █ █ █ █ 超 级 热 烈 欢 迎
█ ████ █ █ █ ████ █
█ █ █ █ ███★ █ █ 欢迎到嘉义版!
★███ █ █ █ █ █ █ █
讯驰电脑-路径 →
嘉义市林森西路496号 →
(05)2244-526 →
顺发斜对面
--
※ 发信站: 批踢踢实业坊(ptt.cc)
◆ From: 114.33.214.160
1F:→ MOONRAKER:何不用推的… 11/09 11:01
2F:→ chinoyan:因为不想解释放在那个位置 11/10 06:01