取现行时间加30分并且显示到编辑框

qinhanfeng3321

时间 取现行时间   在编辑框1里面显示  2015年3月31日12时1分4秒
编辑框2要求显示  加30分钟  显示         2015年3月31日12时31分4秒   
  取现行时间+30分钟后的时间  显示出来    怎么加   

追梦阿甘

EExiaolin

  

调试输出 (取现行时间 ())
调试输出 (增减时间 (取现行时间 (), 7, 30))

i支持库列表	支持库注释
spec	特殊功能支持库

.版本 2<br /> .支持库 spec<br /> <br /> 调试输出 (取现行时间 ())<br /> 调试输出 (增减时间 (取现行时间 (), 7, 30))

EExiaolin

按你的要求
记得最佳哦

补充内容 (2015-3-31 12:25):
已经写好 跟你图上说的一样了,我的只有2行代码,比4楼简便N倍

yuwu00

EExiaolin 发表于 2015-3-31 12:18
[e=1].版本 2
.支持库 spec

正解

qq780571

  

窗口程序集名	保 留	保 留	备 注
窗口程序集1

子程序名	返回值类型	公开	备 注
_时钟1_周期事件

变量名	类 型	静态	数组	备 注
局部_现行时间	日期时间型

局部_现行时间 ＝ 取现行时间 ()
编辑框1.内容 ＝ 到文本 (取年份 (局部_现行时间)) ＋ “年” ＋ 子程序_补全2位 (到文本 (取月份 (局部_现行时间))) ＋ “月” ＋ 子程序_补全2位 (到文本 (取日 (局部_现行时间))) ＋ “日” ＋ 子程序_补全2位 (到文本 (取小时 (局部_现行时间))) ＋ “时” ＋ 子程序_补全2位 (到文本 (取分钟 (局部_现行时间))) ＋ “分” ＋ 子程序_补全2位 (到文本 (取秒 (局部_现行时间))) ＋ “秒”

子程序名	返回值类型	公开	备 注
子程序_补全2位	文本型
参数名	类 型	参考	可空	数组	备 注
原文本	文本型

返回 (取文本右边 (“00” ＋ 原文本, 2))

子程序名	返回值类型	公开	备 注
_按钮1_被单击

变量名	类 型	静态	数组	备 注
局部_现行时间	日期时间型

局部_现行时间 ＝ 增减时间 (取现行时间 (), 7, 30)
编辑框2.内容 ＝ 到文本 (取年份 (局部_现行时间)) ＋ “年” ＋ 子程序_补全2位 (到文本 (取月份 (局部_现行时间))) ＋ “月” ＋ 子程序_补全2位 (到文本 (取日 (局部_现行时间))) ＋ “日” ＋ 子程序_补全2位 (到文本 (取小时 (局部_现行时间))) ＋ “时” ＋ 子程序_补全2位 (到文本 (取分钟 (局部_现行时间))) ＋ “分” ＋ 子程序_补全2位 (到文本 (取秒 (局部_现行时间))) ＋ “秒”

.版本 2<br /> <br /> .程序集 窗口程序集1<br /> <br /> .子程序 _时钟1_周期事件<br /> .局部变量 局部_现行时间, 日期时间型<br /> <br /> 局部_现行时间 ＝ 取现行时间 ()<br /> 编辑框1.内容 ＝ 到文本 (取年份 (局部_现行时间)) ＋ “年” ＋ 子程序_补全2位 (到文本 (取月份 (局部_现行时间))) ＋ “月” ＋ 子程序_补全2位 (到文本 (取日 (局部_现行时间))) ＋ “日” ＋ 子程序_补全2位 (到文本 (取小时 (局部_现行时间))) ＋ “时” ＋ 子程序_补全2位 (到文本 (取分钟 (局部_现行时间))) ＋ “分” ＋ 子程序_补全2位 (到文本 (取秒 (局部_现行时间))) ＋ “秒”<br /> <br /> .子程序 子程序_补全2位, 文本型<br /> .参数 原文本, 文本型<br /> <br /> 返回 (取文本右边 (“00” ＋ 原文本, 2))<br /> <br /> <br /> .子程序 _按钮1_被单击<br /> .局部变量 局部_现行时间, 日期时间型<br /> <br /> 局部_现行时间 ＝ 增减时间 (取现行时间 (), 7, 30)<br /> 编辑框2.内容 ＝ 到文本 (取年份 (局部_现行时间)) ＋ “年” ＋ 子程序_补全2位 (到文本 (取月份 (局部_现行时间))) ＋ “月” ＋ 子程序_补全2位 (到文本 (取日 (局部_现行时间))) ＋ “日” ＋ 子程序_补全2位 (到文本 (取小时 (局部_现行时间))) ＋ “时” ＋ 子程序_补全2位 (到文本 (取分钟 (局部_现行时间))) ＋ “分” ＋ 子程序_补全2位 (到文本 (取秒 (局部_现行时间))) ＋ “秒”

补充内容 (2015-3-31 12:27):
呃，果然很复杂，只要用 时间到文本（）

Hwak

qq780571 发表于 2015-3-31 12:22
[e=0].版本 2

.程序集 窗口程序集1

太复杂了

小白学习

2楼 7楼 正解

zhgx2950

都是正解啊啊

web11234

1. .版本 2
   
2. .支持库 spec
   
3. 
   
4. .程序集 窗口程序集_启动窗口
   
5. 
   
6. .子程序 __启动窗口_创建完毕
   
7. 
   
8. 
   
9. 
   
10. .子程序 _按钮1_被单击
    
11. .局部变量 现在时间, 文本型
    
12. .局部变量 小时分割1, 文本型, , "0"
    
13. .局部变量 分钟分割, 文本型, , "0"
    
14. .局部变量 分钟分割2, 文本型, , "0"
    
15. .局部变量 分钟加三十, 整数型
    
16. .局部变量 小时进一, 整数型
    
17. 
    
18. 现在时间 ＝ 到文本 (取现行时间 ())
    
19. 调试输出 (现在时间)
    
20. 小时分割1 ＝ 分割文本 (现在时间, “日”, )
    
21. 调试输出 (小时分割1)
    
22. 分钟分割 ＝ 分割文本 (小时分割1 [2], “时”, )
    
23. 调试输出 (分钟分割)
    
24. 分钟分割2 ＝ 分割文本 (分钟分割 [2], “分”, )
    
25. 调试输出 (分钟分割2, 分钟分割 [1], 分钟分割2 [1])
    
26. 
    
27. 分钟加三十 ＝ 到数值 (分钟分割2 [1]) ＋ 30
    
28. .如果 (分钟加三十 ＞ 60)
    
29.     分钟加三十 ＝ 分钟加三十 － 60
    
30.     小时进一 ＝ 到数值 (分钟分割 [1]) ＋ 1
    
31.     .如果真 (小时进一 ＞ 12)
    
32.         小时进一 ＝ 1
    
33.     .如果真结束
    
34. 
    
35. .否则
    
36. 
    
37.     小时进一 ＝ 到数值 (分钟分割 [1])
    
38. 
    
39. .如果结束
    
40. 
    
41. 编辑框1.内容 ＝ 小时分割1 [1] ＋ “日” ＋ 到文本 (小时进一) ＋ “时” ＋ 到文本 (分钟加三十) ＋ “分” ＋ 分钟分割2 [2]
    

复制代码