Google Groups no longer supports new Usenet posts or subscriptions. Historical content remains viewable.
Dismiss

[問題]要如何"減緩"迴圈執行的速度?

0 views
Skip to first unread message

別再打混才是真的

unread,
Jun 22, 2001, 8:00:29 AM6/22/01
to
==> SoonW...@bbs.dyu.edu.tw (我要加油!!) 提到:
: 在VB中, 要如何減緩迴圈執行的速度
: 因為我想要模擬出電腦自己在"一張一張翻樸克牌"....
: 知道的人麻煩回我信箱, 感激不盡.....


for i=0 to 1000
DoEvent
next i

'讓它跑空迴圈...

--
[1;34;40m◢■■■ [1;36;40m◣ ◣　　 [1;37;40m　◢ ◢███◣
[1;34;40m■　　　 [1;36;40m ■　　 [1;37;40m　█ ▆ █
[1;34;40m■　　　 [1;36;40m 　◥██ [1;37;40m██ █▅▅▅◤
[1;34;40m■　　　 [1;36;40m　 ◣　　 [1;37;40m █ █　 █ [1;33;40m 12.16 [1;31;40m [5;31;40m ◆ [0;37;40m
[1;34;40m◥■■■ [1;36;40m◤ █▆▅ [1;37;40m▅◤▂█▂ █▅▅▂▂▂▂▂▂▂╯

--
◎ [1;31m龍 [32m貓 [33m資 [34m訊 [35m天 [36m地 [0m( [1mbbs.mgt.ncu.edu.tw [0m)
◎[ [1;33;46mcyr [0m]From: CYR.dailup.lhit.edu.tw

蒙面嫉妒團團長

unread,
Jun 22, 2001, 11:21:24 AM6/22/01
to
==> 在 cyr...@bbs.mgt.ncu.edu.tw (別再打混才是真的) 的文章中提到:

> ==> SoonW...@bbs.dyu.edu.tw (我要加油!!) 提到:
> : 在VB中, 要如何減緩迴圈執行的速度
> : 因為我想要模擬出電腦自己在"一張一張翻樸克牌"....
> : 知道的人麻煩回我信箱, 感激不盡.....
> for i=0 to 1000
> DoEvent
> next i
> '讓它跑空迴圈...

sleep()?...
--
* Origin: ★ 交通大學資訊科學系 BBS ★ <bbs.cis.nctu.edu.tw: 140.113.23.3>

台灣黑山豬

unread,
Jun 22, 2001, 12:21:03 PM6/22/01
to
※ 引述《Leesu...@bbs.cis.nctu.edu.tw (蒙面嫉妒團團長)》之銘言：

> ==> 在 cyr...@bbs.mgt.ncu.edu.tw (別再打混才是真的) 的文章中提到:
> > for i=0 to 1000
> > DoEvent
> > next i
> > '讓它跑空迴圈...
> sleep()?...

睡喔..sleep()
他應該是說加入一堆沒用的code吧??
--
[1;33m※ Origin: [36mYahoo!奇摩 大摩域 [37m<telnet://bbs.kimo.com.tw> [m
[1;35m◆ From: [1;32m163.32.215.47 [m

0 new messages