【NO.0035】获取日期时间星期

梦，人生

取现行时间.rar (1.5 KB, 下载次数: 5)

2011-10-28 20:34 上传

点击文件名下载附件 两种显示方式、、、、、另外。。。我不知道怎么不能让别人看见、、、、只让LZ看、、、、、教我下、、、

弎巳◎

叔叔 我来哦~~

开心

第一次在这里发表自己的作品

仙子有毒

新手进来做一下题，还请版主加分指导。

风华一

.版本 2

.程序集 程序集1
.程序集变量 t, 文本型
.程序集变量 dqsj, 日期时间型

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

dqsj ＝ 取现行时间 ()

.如果 (取星期几 (dqsj) ＝ 1)
    t ＝ “星期一”
.否则


.如果结束
.如果 (取星期几 (dqsj) ＝ 2)
    t ＝ “星期二”
.否则

.如果结束
.如果 (取星期几 (dqsj) ＝ 3)
    t ＝ “星期三”
.否则

.如果结束
.如果 (取星期几 (dqsj) ＝ 4)
    t ＝ “星期四”
.否则

.如果结束
.如果 (取星期几 (dqsj) ＝ 5)
    t ＝ “星期五”
.否则

.如果结束
.如果 (取星期几 (dqsj) ＝ 6)
    t ＝ “星期六”
.否则

.如果结束
.如果 (取星期几 (dqsj) ＝ 7)
    t ＝ “星期日”
.否则

.如果结束

输出调试文本 (到文本 (取年份 (dqsj)) ＋ “-” ＋ 到文本 (取月份 (dqsj)) ＋ “-” ＋ 到文本 (取日 (dqsj)) ＋ “ ” ＋ 到文本 (取小时 (dqsj)) ＋ “:” ＋ 到文本 (取分钟 (dqsj)) ＋ “:” ＋ 到文本 (取秒 (dqsj)) ＋ “ ” ＋ t)

返回 (0)  ' 可以根据您的需要返回任意数值

{:3_226:}请原谅这么长。。

虚心求教zgw

这是我的。

邪君﹏

作业.rar (284.42 KB, 下载次数: 1)

2011-10-28 21:59 上传

点击文件名下载附件 [e].版本 2  .程序集 窗口程序集1 .程序集变量 x, 文本型  .子程序 __启动窗口_创建完毕  时钟1.时钟周期 ＝ 1000  .子程序 _时钟1_周期事件   .如果 (取星期几 (取现行时间 ()) ＝ 1)     x ＝ “一” .否则     .如果 (取星期几 (取现行时间 ()) ＝ 2)         x ＝ “二”     .否则         .如果 (取星期几 (取现行时间 ()) ＝ 3)             x ＝ “三”         .否则             .如果 (取星期几 (取现行时间 ()) ＝ 4)                 x ＝ “四”             .否则                 .如果 (取星期几 (取现行时间 ()) ＝ 5)                     x ＝ “五”                 .否则                     .如果 (取星期几 (取现行时间 ()) ＝ 6)                         x ＝ “六”                     .否则                         .如果 (取星期几 (取现行时间 ()) ＝ 7)                             x ＝ “日”                         .否则                          .如果结束                      .如果结束                  .如果结束              .如果结束          .如果结束      .如果结束  .如果结束   标签1.标题 ＝ 到文本 (取年份 (取现行时间 ())) ＋ “-” ＋ 到文本 (取月份 (取现行时间 ())) ＋ “-” ＋ 到文本 (取日 (取现行时间 ())) ＋ “  ” ＋ 到文本 (取小时 (取现行时间 ())) ＋ “：” ＋ 到文本 (取分钟 (取现行时间 ())) ＋ “：” ＋ 到文本 (取秒 (取现行时间 ())) ＋ “ ” ＋ “星期” ＋ x [/e]

恒华科技

请版主看看我的

不安分的情绪

做完了··········

小猪仔

交作业咯 交作业咯 哈哈  这个比较简单