主题：求教倒记时怎么写
ytnifs
[专家分：10] 发布于 2007-03-17 22:21:00
倒记时函数怎么写
回复列表 （共5个回复）
沙发
def [专家分：3380] 发布于 2007-03-18 19:25:00
QBASIC里有一个
SLEEP NUM
NUM是停留时间
要在右上角写就要
function sleeps(sleepnum as integer)
dim i as integer
for i=sleepnum to 1
locate 1,74
print ltrim$(str$(i-1));
sleep 1
next i
locate 1,74
print ltrim$(str$(0));
end function
板凳
冷石_jasv [专家分：1570] 发布于 2007-03-19 11:17:00
嘿...这个方法的确是巧
我调试程序是多会用到...因为的确是按秒算的....非常高兴的是如果我等不急了.可以乱拍键盘..它会跑得飞快的...
呵呵..我喜欢..
3 楼
ytnifs [专家分：10] 发布于 2007-03-20 21:48:00
问楼上
要求显示多少秒,怎么定义
4 楼
moz [专家分：37620] 发布于 2007-03-20 23:20:00
timer
5 楼
冬夜的雪 [专家分：90] 发布于 2007-09-21 14:07:00
[quote]QBASIC里有一个
SLEEP NUM
NUM是停留时间
要在右上角写就要
function sleeps(sleepnum as integer)
dim i as integer
for i=sleepnum to 1
locate 1,74
print ltrim$(str$(i-1));
sleep 1
next i
locate 1,74
print ltrim$(str$(0));
end function[/quote]
我来回复
您所在位置：