菜鸟求助啊！

讲不出再见

写了我好久。希望采纳！！[e].版本 2

.程序集变量 开启时间, 文本型
.程序集变量 第二天时间, 文本型
.程序集变量 日, 文本型

.子程序 __启动窗口_创建完毕

开启时间 ＝ 到文本 (取现行时间 ())
日 ＝ 取中间文本 (开启时间, “月”, “日”)
第二天时间 ＝ 到文本 (到整数 (日) ＋ 1)
.如果 (文件是否存在 (“C:\Documents and Settings\Administrator\桌面\system.app”))  ' 判断是否存在没有就写  文件最好放的难找的文件夹 或者也可以设置隐藏文件
    信息框 (“您在:” ＋ 读配置项 (“C:\Documents and Settings\Administrator\桌面\system.app”, “时间”, “时间”, ) ＋ “才可以用”, 0, )
    _启动窗口.可视 ＝ 假
.否则
    写配置项 (“C:\Documents and Settings\Administrator\桌面\system.app”, “开启时间”, “开启时间”, 开启时间)
    写配置项 (“C:\Documents and Settings\Administrator\桌面\system.app”, “时间”, “时间”, 子文本替换 (开启时间, 日, 到文本 (到整数 (日) ＋ 1), 1, , 真))

.如果结束


.子程序 取中间文本, 文本型
.参数 原文本, 文本型
.参数 前标识文本, 文本型
.参数 后标识文本, 文本型
.局部变量 文本, 文本型
.局部变量 前标识位置, 整数型
.局部变量 后标识位置, 整数型
.局部变量 前标识长度, 整数型

前标识位置 ＝ 寻找文本 (原文本, 前标识文本, 1, 假)
前标识长度 ＝ 取文本长度 (前标识文本)
后标识位置 ＝ 寻找文本 (原文本, 后标识文本, 1, 假)
文本 ＝ 取文本中间 (原文本, 前标识位置 ＋ 前标识长度, 后标识位置 － 前标识位置 － 前标识长度)
返回 (文本)


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

.判断开始 (读配置项 (“C:\Documents and Settings\Administrator\桌面\system.app”, “时间”, “时间”, ) ＝ 到文本 (取现行时间 ()))

.默认
    _启动窗口.可视 ＝ 真
.判断结束
[/e]

讲不出再见

源码忘发了！

补充内容 (2012-2-19 13:12):
对了，到了时间要删除那个文件。
[e]删除文件("C:\Documents and Settings\Administrator\桌面\system.app")[e]

偶私雨

千年 发表于 2012-2-19 13:06
就算是电脑重启了，再次打开软件的时候，也是可以继续执行的。。。

请问下  ：时间_北京转格林威治 是？？

千年

偶私雨 发表于 2012-2-19 13:13
请问下  ：时间_北京转格林威治 是？？

实话说，这是我以前回答别人的一个问题  刚刚去翻出来的，地址如下，他需要6天后才运行。。。

100精币 求高手写个计时源码 完成后在送100精币
http://www.3600gz.cn/thread-81280-1-1.html


这个源码就是你指定一个目标时间，就ok了

A1014280203

你好，假如你是今天（2012年2月19日）写的，你想明天（2012年2月20日）让按钮.可视=真】这个我会
首先在【_启动窗口】那里添加一个日期框（在基本组件里面有）代码如下：
  .版本 2

.程序集 窗口程序集1

.子程序 __启动窗口_创建完毕

.如果真 (到文本 (日期框1.今天) ＝ “2012年2月20日”)
    按钮1.可视 ＝ 真
.如果真结束


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

按钮1.可视 ＝ 假
    将如果真（）里面的改成你想要的日期就可以了。不会的话，追问！
采纳我吧！{:3_240:}）

补充内容 (2012-2-19 13:32):
按钮1.可视=真】下面的【如果真结束】不是，打错了，忽略。