如何在指定日期后弹出弹框

huang5466

程序在运行后自动对比日期，比如在2025年10月1日后软件就会弹出弹框。麻烦帮忙写个例子，能实现目的就行谢谢啦。。

搁浅的爱

时间对比.e (916.55 KB, 下载次数: 1)

2025-8-17 14:24 上传

点击文件名下载附件

zainex

  

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

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

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

时间 ＝ 取日期 (取现行时间 ())
调试输出 (时间, 到时间 (“2025年10月1日”))
如果真 (时间 ＝ 到时间 (“2025年10月1日”))
信息框 (“时间到了”, #信息图标, 到文本 (时间), )

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

.版本 2<br /> .支持库 spec<br /> <br /> .程序集 窗口程序集_启动窗口<br /> <br /> .子程序 __启动窗口_创建完毕<br /> .局部变量 时间, 日期时间型<br /> <br /> 时间 ＝ 取日期 (取现行时间 ())<br /> 调试输出 (时间, 到时间 (“2025年10月1日”))<br /> .如果真 (时间 ＝ 到时间 (“2025年10月1日”))<br />     信息框 (“时间到了”, #信息图标, 到文本 (时间), )<br /> .如果真结束

小麒QCC

  

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

变量名	类 型	静态	数组	备 注
时间	文本型

时间 ＝ 时间到文本 (取现行时间 (), 2)
标签1.标题 ＝ 时间
如果真 (时间 ＝ “2025年10月1日”)
信息框 (“时间到！”, 0, , )

.版本 2<br /> <br /> .子程序 _时钟1_周期事件<br /> .局部变量 时间, 文本型<br /> <br /> 时间 ＝ 时间到文本 (取现行时间 (), 2)<br /> 标签1.标题 ＝ 时间<br /> .如果真 (时间 ＝ “2025年10月1日”)<br />     信息框 (“时间到！”, 0, , )<br /> .如果真结束

杰西卡技术传媒

剩余时间

杰西卡技术传媒

剩余时间.精易模块

补充内容 (2025-8-17 14:10):
.版本 2

.子程序 __启动窗口_创建完毕
.局部变量 现在时间, 日期时间型
.局部变量 对比时间, 日期时间型
.局部变量 剩余时间, 文本型

现在时间 ＝ 时间_取北京时间 ()
对比时间 ＝ 到时间 (“2025年10月1日”)
剩余时间 ＝ 时间_取时间间隔 (现在时间, 对比时间)

.如果 (到整数 (文本_取左边 (剩余时间, “天”, , )) ≤ 0)
    信息框 (“已到期”, 0, , )
    结束 ()
.否则
    信息框 (“剩余时间：” ＋ 剩余时间, 0, , )
.如果结束

熬夜

喜欢哪个 自己搜：软件到期

E小菜鸟

  

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

变量名	类 型	静态	数组	备 注
提示时间	文本型

提示时间＝ 时间到文本 (取现行时间 (), 2)
标签1.标题 ＝ 提示时间
如果真 (提示时间＝ “2025年10月1日”)
信息框 (“时间到！”, 0, , )

.版本 2<br /> <br /> .子程序 _时钟1_周期事件<br /> .局部变量 提示时间, 文本型<br /> <br /> 提示时间＝ 时间到文本 (取现行时间 (), 2)<br /> 标签1.标题 ＝ 提示时间<br /> .如果真 (提示时间＝ “2025年10月1日”)<br />     信息框 (“时间到！”, 0, , )<br /> .如果真结束

huang5466

E小菜鸟 发表于 2025-8-17 15:20
[e=0].版本 2

.子程序 _时钟1_周期事件

.版本 2

.子程序 _时钟1_周期事件
.参数 提示时间, 文本型

提示时间 ＝ 时间到文本 (取现行时间 (), 2)

.如果真 (提示时间 ＝ “2025年8月17日”)
    信息框 (“时间到！”, 0, , )
我测试把时间设置为今天，没有弹窗，麻烦帮忙看看哪里出问题了

杰西卡技术传媒

今天论坛上传不了源码     2025年10月1日后软件就会弹出弹框-精易模块https://jck999.lanzout.com/iJFhl33qr04j