| 以文本方式查看主题 - 金字塔客服中心 - 专业程序化交易软件提供商 (http://weistock.com/bbs/index.asp) -- 公式模型编写问题提交 (http://weistock.com/bbs/list.asp?boardid=4) ---- 关于时间的问题 (http://weistock.com/bbs/dispbbs.asp?boardid=4&id=55285) |
| -- 作者：武田晴信 -- 发布时间：2013/8/16 18:32:05 -- 关于时间的问题 我想写一个判断一个月的第三周星期五这样一个时间值，怎么用程序代码来确定呢？一个判断语句。谢谢 |
| -- 作者：武田晴信 -- 发布时间：2013/8/17 16:56:32 -- 现在已经自己写出来了。看来的确是要逼着自己一把，以前想到的用VBA写，其实金字塔的PEL就能解决 |
| -- 作者：jinzhe -- 发布时间：2013/8/19 8:55:50 -- 发表下算法吧~这个问题能解决的话，也算是大功一件了~ |
| -- 作者：武田晴信 -- 发布时间：2013/8/19 16:28:23 -- 公式 if (day >= 14 and day <=20 and weekday = 5) then begin a=1; end |
| -- 作者：jinzhe -- 发布时间：2013/8/19 16:48:06 -- 哦哦，原来是这样的思路，不错 |
| -- 作者：武田晴信 -- 发布时间：2013/8/19 17:21:39 -- 刚刚开始的是用的是：先确定N，N为每个月的1号。先必须确定每个月的1号是星期几然后n>=5 就按照 6-n+14 n>5呢就按照 n-6+21，这样的用VB先建立一个数组。最后脑子乱了，现在好了，这种目测是最简单的 |
| -- 作者：武田晴信 -- 发布时间：2013/8/20 8:31:13 -- 关于确定每个月1号。 对了金泽，我想问下，用什么样的算法写，用来确定每个月的1号是星期几呢，我想用另外一种方法写出来，然后再集中的共享一下，就是确定每个月的1号为星期几？ |
| -- 作者：武田晴信 -- 发布时间：2013/8/20 9:00:59 -- 我又写出来了。 层主帮我看下这个是不是正确的： variable: n = 1;//n为如果是每月的第三周的星期五的日期 variable: a = 1;//a为判断是不是为星期五的一个值，ture 为 1 false 为 0； if day=1 then begin //如果当月的日期为1号，判断1号为星期几
if WEEKDAY<=5 then begin//当1号为星期一到星期五的时候
n=6-WEEKDAY+14;
a=1;
end
if WEEKDAY>5 then begin//当1号为星期六的时候
n=6 - WEEKDAY + 20;
a=1;
end
a=0; end 反正测试是木有问题的，关键是菜鸟刚刚接触金字塔没有什么自信心
|