精易论坛

标题: 建议增加时间_取时间到毫秒 [打印本页]

作者: 你不丑    时间: 2021-9-3 19:58
标题: 建议增加时间_取时间到毫秒
.版本 2

.程序集 程序集1

.子程序 _启动子程序, 整数型, , 本子程序在程序启动后最先执行

输出调试文本 (时间_取现行时间 ())
返回 (0)  ' 可以根据您的需要返回任意数值

.子程序 时间_取现行时间, 文本型, 公开, 返回当前系统时间
.参数 取毫秒, 逻辑型, 可空, 真为取毫秒
.局部变量 时间, 时间成员
.局部变量 年, 文本型
.局部变量 月, 文本型
.局部变量 日, 文本型
.局部变量 时, 文本型
.局部变量 分, 文本型
.局部变量 秒, 文本型
.局部变量 豪, 文本型

系统时间到毫秒 (时间)
年 = 到文本 (时间.取年份) + “年”
月 = 到文本 (时间.取月份) + “月”
日 = 到文本 (时间.取日) + “日”
日 = 到文本 (时间.取日) + “日”
时 = 到文本 (时间.取时) + “日”
分 = 到文本 (时间.取分) + “分”
秒 = 到文本 (时间.取秒) + “秒”
豪 = 到文本 (时间.取豪) + “毫秒”
.如果真 (取毫秒)
    返回 (年 + 月 + 日 + 时 + 分 + 秒 + 豪)
.如果真结束
返回 (年 + 月 + 日 + 时 + 分 + 秒)

.版本 2

.数据类型 时间成员, 公开
    .成员 取年份, 短整数型
    .成员 取月份, 短整数型
    .成员 取星期, 短整数型
    .成员 取日, 短整数型
    .成员 取时, 短整数型
    .成员 取分, 短整数型
    .成员 取秒, 短整数型
    .成员 取豪, 短整数型

.版本 2

.DLL命令 系统时间到毫秒, 整数型, "kernel32", "GetLocalTime"
    .参数 系统时间格式, 时间成员, 传址



QQ截图20210903195756.png (2.17 MB, 下载次数: 7)

QQ截图20210903195756.png

作者: shituo    时间: 2021-9-3 20:30
代码都不会写 把那个豪=到文本 写到如果真下面就行了
作者: 神女软件定制    时间: 2021-9-3 22:06

作者: 远航接单    时间: 2021-9-3 22:24
真的没必要,谁需要毫秒自己从时间戳里取就行了
作者: huxian    时间: 2021-9-3 22:47
你这个毫秒,用时钟是不是都带不动啊
作者: 小帆啊    时间: 2021-9-4 03:33

作者: 鼎诚    时间: 2021-9-9 21:28
看看 学习下




欢迎光临 精易论坛 (https://125.confly.eu.org/) Powered by Discuz! X3.4