[范例]这是会员求助之数学函式的范例[已除错]

Home Home
引用 | 编辑 nomaid
2005-01-17 15:03
楼主
推文 x0
1/26 Code已修复..原因出于判断闰年二月的时候多了一个end..
现已修正 并重新整理code (稍微修改一下if的判断 以便缩短行数)
重新上传档案完成
并再烦请各位大大们帮我找一下看还有没有bug 谢谢

1/20 再次抱歉~ 我的判断回圈的逻辑错误
导致又有bug产生 真是不好意思
这几天比较忙 故可能暂时无法Debug
等小弟星期一或二有空闲的时候定会更新完成~
在此之前先暂停下载~ 不好意思ㄛ!!^^

1/18 抱歉 修改一下里面有关于闰年的判断
因为我同学帮我测了以后有说有问题产生 (2000年)
故重新修改了有关闰年判断的程序
并重新编译了附件~
有兴趣的大大们可以下载来看看^^

这是之前在程式设计版那边 有会员所问的问题
请详见
转贴他原本的问题
--------------问 题---------------------------------------------------------------------
就是 入境日期+工作期满=期满日

例如:2000年1月1日+1年5月30日=2001年7月1日

然后2000年1月1日跟1年5月30日这部分是要自己输入的
然后有分大月跟小月和润月的 所以不是那种一班的数学函式
有人知道怎么写的话或者哪个网站有关这类的可以告诉一下吗 3q
小弟我满急的要用这个函式 所以知道的告诉小弟一下我噜 在这先感谢噜~
-------------------------------------------------------------------------------------------------------

那以下这个程式码包含程式便是我针对它的问题所作出来的一个小程式
由于写的很笨 所以请各位大大多包含~@@"
就先让它能跑就可以了 呵呵~~

流程我在那篇已经有大概的解说 不过还是在这边再次解说一下
---------------------我的回答---------------------------------------------------------------
年份 月份 日期 各分为三个框框
也就是说
2000年 1月 1日 + 1年 5月 30日 = 2001年7月1日
EDIT1 EDIT2 EDIT3 EDIT4 EDIT5 EDIT6 后面结果可用label或是edit都可 也可用messagebox

程式写法就让 EDIT1的值 + EDIT 4的值 等于 一个变数 (PS:变数1)
EDIT2的值 + EDIT 5的值 等于 一个变数 (PS:变数2)
EDIT3的值 + EDIT 6的值 等于 一个变数 (PS:变数3)
然后
判断句就加在加法后面 使用 IF ELSE 去判断

个人写法是 一. 变数2 先判断是否大于12 (判断月份)
如果大于 12的话 则 变数1 加 1
二. 判断是否为闰年可用上面大大的写法
润年:
1. 西元年/4的余数为0:是润年
2. 西元年/100的余数为0:不是润年
3. 西元年/400的余数为0:是润年
如果为闰年的话 则跳到副程式 year 去做日期判断
否则为接着下面判断是否为大小月
三.大月则判断变数2 是否为1,3,5,7 ..

访客只能看到部份内容,免费 加入会员



献花 x0
引用 | 编辑 panasonic732
2005-01-17 21:50
1楼
  
以后抓图
按ALT+'PRINT SCRN'
只会抓到目前在执行的图喔

有包括闰年??嘿嘿

献花 x0
引用 | 编辑 nomaid
2005-01-18 01:00
2楼
  
是有做到啦 ~
不过小弟仅以 2004年去做测试
目前尚不知道有其他bug~
希望其他的大大们能帮忙找一下^^


欢迎各位大大指教^^

另外 闰年显示 是否有问题? 还是?

献花 x0
引用 | 编辑 panasonic732
2005-01-18 09:01
3楼
  
呵呵...
应该是没有...

您会哪几种程式语言呢
怎么不报名一下 高手驻版解答呢

这样COCO比较好赚

献花 x0
引用 | 编辑 nomaid
2005-01-18 09:46
4楼
  
我会一点点的 C ,VB , Delphi
不过都是这几年学校在教的~
都学的很资浅~
尤其是C (逃..)呵呵
还是一个正在摸索的新手学生哩~

最近是因为在学Delphi才比较会一点点而已~
所以就没去报名高手驻版解答~ (小弟还没像大大们那么厉害@@")

献花 x0
引用 | 编辑 panasonic732
2005-01-18 10:09
5楼
  
没关系...程式本来就是慢慢学

我也只会vb..c#而已 ˊˋ
要不要试试看...

献花 x0
引用 | 编辑 nomaid
2005-01-18 10:37
6楼
  
嗯 多谢大大哩

那小弟愿意试试看 ~

还请多多指教呐^^"

献花 x0
引用 | 编辑 panasonic732
2005-01-21 00:38
7楼
  

图 1.


我不小心发现的BUG
1987 7/22是我的出生年月日
2/15是某的女生的生日...呵呵

献花 x0