随机生成从小到大日期时间的问题

瓶中仙子

糖糖—贝亚安娜 发表于 2015-7-8 18:42
时间都有了 转换不了格式？ 嘛 他好像在帮你弄 不行再AT俺叭 摸摸爪

你的代码也可以的啊，能不能帮忙完善下

瓶中仙子

jr21066 发表于 2015-7-8 18:40
感觉好象到定制区了.这个你要是解决不了.我再改改

谢谢！大虾帮帮忙吧

jr21066

自己也可以在源码里把时分改成冒号的.

瓶中仙子

jr21066 发表于 2015-7-8 18:51
自己也可以在源码里把时分改成冒号的.

需要是生成下面类似的格式文本：
2015-7-8 09:24:09
2015-7-8 09:26:35
2015-7-8 09:31:56
2015-7-8 09:42:31
2015-7-8 10:52:17
2015-7-8 11:09:03
2015-7-8 17:13:12
2015-7-8 17:23:57
2015-7-8 17:33:07
（最后一个是当前的日期时间）

应该是这个格式才对，可是你的源码输出的不是啊

qq780571

功能都已经实现了，剩下的多简单，你子文本替换一下，把文本格式化成你要的样子就好了

按键精灵

  

子程序名	返回值类型	公开	备 注
__启动窗口_创建完毕

变量名	类 型	静态	数组	备 注
i	整数型
时间	日期时间型

置随机数种子 ()
时间 ＝ 取现行时间 ()
计次循环首 (10, i)
时间 ＝ 增减时间 (时间, #秒, 取随机数 (1000, 5000) × -1)
调试输出 (时间)
计次循环尾 ()

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

.版本 2<br /> .支持库 spec<br /> <br /> .子程序 __启动窗口_创建完毕<br /> .局部变量 i, 整数型<br /> .局部变量 时间, 日期时间型<br /> <br /> 置随机数种子 ()<br /> 时间 ＝ 取现行时间 ()<br /> .计次循环首 (10, i)<br />     时间 ＝ 增减时间 (时间, #秒, 取随机数 (1000, 5000) × -1)<br />     调试输出 (时间)<br /> .计次循环尾 ()

瓶中仙子

qq780571 发表于 2015-7-8 18:58
功能都已经实现了，剩下的多简单，你子文本替换一下，把文本格式化成你要的样子就好了

jr21066 的代码是用超级列表框排序的，不是我要的效果。不要用那个排序，因为我是要计次循环陆续取数的。

喵娘

瓶中仙子 发表于 2015-7-8 18:47
你的代码也可以的啊，能不能帮忙完善下

  

变量名	类 型	静态	数组	备 注
cmd	日期时间型
s	整数型
cmd2	日期时间型

' 2015年7月8日18时24分31秒
cmd ＝ 取现行时间 ()
计次循环首 (10, s)
cmd2 ＝ 增减时间 (cmd, 8, －s × 取随机数 (s × 10, 100))
调试输出 (时间_到文本 (cmd2, 1, ))
计次循环尾 ()

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

.版本 2<br /> .支持库 spec<br /> <br /> .局部变量 cmd, 日期时间型<br /> .局部变量 s, 整数型<br /> .局部变量 cmd2, 日期时间型<br /> <br /> ' 2015年7月8日18时24分31秒<br /> <br /> <br /> cmd ＝ 取现行时间 ()<br /> .计次循环首 (10, s)<br />     cmd2 ＝ 增减时间 (cmd, 8, －s × 取随机数 (s × 10, 100))<br />     调试输出 (时间_到文本 (cmd2, 1, ))<br /> <br /> .计次循环尾 ()

时间_到文本（）  是精易模块代码

七月你好

  

窗口程序集名	保 留	保 留	备 注
窗口程序集_启动窗口

子程序名	返回值类型	公开	备 注
__启动窗口_创建完毕

变量名	类 型	静态	数组	备 注
当前时间	日期时间型
随机时间	日期时间型
索引	整数型
时间文本	文本型

当前时间 ＝ 取现行时间 ()
计次循环首 (15, )
索引 ＝ 超级列表框1.插入表项 (, , , , , )
随机时间 ＝ 增减时间 (当前时间, #秒, ���汇编_取随机数 (1, 10000))
时间文本 ＝ 时间_到文本 (随机时间, 1)
超级列表框1.置标题 (索引, 0, 时间文本)
计次循环尾 ()
超级列表框1.置标题 (索引, 0, 时间_到文本 (当前时间, 1))
模块_超级列表框排序 (超级列表框1, 0, 2)

i支持库列表	支持库注释
iext	扩展界面支持库一

.版本 2<br /> .支持库 iext<br /> <br /> .程序集 窗口程序集_启动窗口<br /> <br /> .子程序 __启动窗口_创建完毕<br /> .局部变量 当前时间, 日期时间型<br /> .局部变量 随机时间, 日期时间型<br /> .局部变量 索引, 整数型<br /> .局部变量 时间文本, 文本型<br /> <br /> 当前时间 ＝ 取现行时间 ()<br /> .计次循环首 (15, )<br /> 索引 ＝ 超级列表框1.插入表项 (, , , , , )<br /> 随机时间 ＝ 增减时间 (当前时间, #秒, －汇编_取随机数 (1, 10000))<br /> 时间文本 ＝ 时间_到文本 (随机时间, 1)<br /> 超级列表框1.置标题 (索引, 0, 时间文本)<br /> .计次循环尾 ()<br /> 超级列表框1.置标题 (索引, 0, 时间_到文本 (当前时间, 1))<br /> 模块_超级列表框排序 (超级列表框1, 0, 2)

你把他那个代码小小改下就好啦，加个精益模块，用里面的时间_到文本() 命令 写成这样就是你要的那个格式啦

瓶中仙子

按键精灵 发表于 2015-7-8 19:00
[e=0].版本 2
.支持库 spec

需要是生成下面类似的格式文本：
2015-7-8 09:24:09
2015-7-8 09:26:35
2015-7-8 09:31:56
2015-7-8 09:42:31
2015-7-8 10:52:17
2015-7-8 11:09:03
2015-7-8 17:13:12
2015-7-8 17:23:57
2015-7-8 17:33:07
（最后一个是当前的日期时间）

分钟，小时，秒为个位数的时候，必须加0的