如何统计程序或者某功能的运行时间

lx0113

比如我用定时器，注册1秒一次显示

如何显示把程序运行时间 显示为 1时1分1秒

1. 功能 开始（）
   
2. 定时器.注册("定时器0",1000)
   
3. 功能结束
   
4. 功能 定时器0_时钟()
   
5.     运行时间++
   
6.         if(运行时间<60)
   
7.         时间="0分"&运行时间&"秒"
   
8.     endif
   
9.     窗口.设置标题(窗口.自身句柄(),时间)
   
10. 功能结束

复制代码

sam7894604

无聊写个...

1. 变量 运行时间
   
2. 功能 按钮0_点击()
   
3.     定时器.注册("定时器0",1000)
   
4. 功能结束
   
5. 
   
6. 功能 定时器0_时钟()
   
7.     运行时间++
   
8.     时间 = 日期时间.指定日期("s",运行时间,"2000/01/01 00:00:00")
   
9.     时 = 日期时间.时(时间)
   
10.     如果(时 < 10)
    
11.         时 = "0"&时
    
12.     如果结束
    
13.     分 = 日期时间.分(时间)
    
14.     如果(分 < 10)
    
15.         分 = "0"&分
    
16.     如果结束
    
17.     秒 = 日期时间.秒(时间)
    
18.     如果(秒 < 10)
    
19.         秒 = "0"&秒
    
20.     如果结束
    
21.     时间 = 字符串.格式化("%s 时 %s 分 %s 秒",时,分,秒)
    
22.     调试输出(时间)
    
23. 功能结束

复制代码

lx0113

自己写了个 貌似可以运行了

1. 运行时间++
   
2.    
   
3.     分=类型.取整(运行时间/60)
   
4.     时= 类型.取整(分/60)
   
5.     if(运行时间<60)
   
6.         时间="0分"&运行时间&"秒"
   
7.     else
   
8.         时间=分&"分"&(运行时间-分*60)&"秒"
   
9.         if(分>60)
   
10.             时间=时&"时"&(分-时*60)&"分"&(运行时间-分*60)&"秒"
    
11.         endif
    
12.         
    
13.     endif

复制代码

q273814

程序启动的时候获取下系统毫秒
然后定时器里获取系统毫秒并计算启动时间的差
接着格式化成时间格式
然后显示

lx0113

lx0113 发表于 2014-10-21 12:43
自己写了个 貌似可以运行了

谢谢帮助，请问

1. 如果(时 < 10)
   
2.         时 = "0"&时
   
3.     如果结束

复制代码

的意思是什么呢？时间怎么有10？