闹钟倒计时，求完善

p6301854

1. <p>功能 按钮5_点击()
   
2.     //这里添加你要执行的代码
   
3.     倒计小时,倒计分钟,倒计秒钟
   
4.    
   
5.     at=日期时间.当前日期()
   
6.     闹钟小时=编辑框.获得文本("编辑框3")
   
7.     当前小时=日期时间.时(at)
   
8.     倒计小时=闹钟小时-当前小时
   
9.    
   
10.     闹钟分钟=编辑框.获得文本("编辑框2")
    
11.     当前分钟=日期时间.分(at)
    
12.     倒计分钟=闹钟分钟-当前分钟
    
13.    
    
14.     闹钟几秒=编辑框.获得文本("编辑框1")
    
15.     当前秒钟=日期时间.秒(at)
    
16.     倒计秒钟=闹钟几秒-当前秒钟
    
17.     如果(倒计秒钟<0)
    
18.         倒计秒钟=倒计秒钟+60
    
19.     如果结束
    
20. 
    
21.     如果(倒计分钟<0)
    
22.         倒计分钟=倒计分钟+60
    
23.     如果结束
    
24.     如果(倒计小时<0)
    
25.         倒计小时=倒计小时+24
    
26.     如果结束
    
27.    
    
28.     如果(倒计秒钟>60)
    
29.         倒计分钟=倒计分钟+1
    
30.         如果(倒计分钟>60)
    
31.             倒计小时=倒计小时+1
    
32.         如果结束
    
33.     如果结束
    
34.     编辑框.设置文本("编辑框4",倒计小时)
    
35.     编辑框.设置文本("编辑框5",倒计分钟)
    
36.     编辑框.设置文本("编辑框6",倒计秒钟)
    
37. 功能结束

复制代码

小欧1023

日期框控件直接获得设定的时间
datetime.diff() 然后用这个函数判断距离设置的时间差多少秒
然后用除法/60 /60 /60 得,秒,分,时,
几句语句就可以了,而且简洁,

p6301854

小欧1023 发表于 2015-1-11 18:51
日期框控件直接获得设定的时间
datetime.diff() 然后用这个函数判断距离设置的时间差多少秒
然后用除法/60  ...

具体怎么写呐？

小欧1023

    time=日期框.获得文本("日期框0")
    traceprint(time)
    while(true)
        
        help.sleep(1000)
        max=datetime.diff("s",time,datetime.now())
        traceprint(max)
        max=math.abs(max)
        hour=type.int(max/3600)
        minute=type.int((max-(hour*3600))/60)
        second=type.int((max-(hour*3600)-(minute*60)))
        traceprint("小时:"&hour)
        traceprint("分钟:"&minute)
        traceprint("秒:"&second)
    endwhile

自己在界面做个日期框 就可以了,我理解的你可能是需要这么个倒计时的功能, 如不对自己参考修改,大概是这么个意思

p6301854

小欧1023 发表于 2015-1-11 19:10
time=日期框.获得文本("日期框0")
    traceprint(time)
    while(true)

真心看不懂英文

言术

我这个是笨方法

1. 变量 小时=0,分钟=0,秒=0   
   
2. 定时时间="2015/1/11 11:20:30"
   
3. 当前时间=日期时间.当前日期()
   
4. 得到的间隔秒=日期时间.日期间隔("s",当前时间,定时时间)
   
5. 循环(真)
   
6.     如果(得到的间隔秒>=3600)
   
7.         得到的间隔秒=得到的间隔秒-3600
   
8.         小时=小时+1
   
9.     否则
   
10.         如果(得到的间隔秒>=60)
    
11.             得到的间隔秒=得到的间隔秒-60
    
12.             分钟=分钟+1
    
13.         否则
    
14.             秒=得到的间隔秒
    
15.             跳出
    
16.         如果结束
    
17.     如果结束
    
18. 循环结束

复制代码

p6301854

期待更合适的

q273814

辅助.命令("at 6:00 \"铃声.mp3\"")

2645572175