易语言如何将文本转换时间进行对比

发布网友 发布时间：2022-04-20 03:05

我来回答

共3个回答

热心网友 时间：2023-05-16 04:20

看一下是不是这个效果？（界面控件“标签1，标签2，编辑框1，编辑框2，按钮1”）代码如下：

.版本 2

.子程序 _按钮1_被单击

编辑框2.内容 ＝ 到文本 (取现行时间 ())
.如果 (到整数 (取时间间隔 (到时间 (编辑框1.内容), 取现行时间 (), #秒)) ≥ 0)
    信息框 (“当前软件正常使用”, 0, , )
.否则
    信息框 (“当前软件已经过期”, 0, , )
.如果结束

追问差不多

热心网友 时间：2023-05-16 04:20

文本转日期时间型可以用 到时间() 来转换 比如 到时间 (“2012年7月5日”)

下面是日期比较

.程序集 窗口程序集1
.程序集变量 过期时间, 日期时间型
.子程序 __启动窗口_创建完毕
过期时间 ＝ [2020年1月1日]

.子程序 _按钮1_被单击
.局部变量 当前时间, 日期时间型
.局部变量 时间间隔, 整数型
当前时间 ＝ 取现行时间 ()
时间间隔 ＝ 取时间间隔 (过期时间, 当前时间, #秒)
.如果 (时间间隔 ＞ 0)
信息框 (“未过期”, 0, )
.否则
信息框 (“已过期”, 0, )
.如果结束

热心网友 时间：2023-05-16 04:21

.版本 2
.支持库 eMMedia

.局部变量 局部_时间, 整数型
.局部变量 局部_分, 整数型
.局部变量 局部_秒, 整数型
.局部变量 局部_毫秒, 整数型

局部_时间 ＝ 媒体播放1.取位置 ()
局部_分 ＝ 局部_时间 ＼ 1000 × 60
输出调试文本 (局部_分)
局部_秒 ＝ (局部_时间 － 局部_分 × 1000 × 60) ÷ 1000
输出调试文本 (局部_秒)