[範例]這是會員求助之數學函式的範例[已除錯]

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