你是否想知道，距離某個重要的日子，還有多少天？或者距離曾經的一個日子，已經過去了多少天？其實，想知道這些並不難，只要你掌握了陽曆的基本曆法（平年 365 天，閏年 366 天，大月 31 天，小月 30 天，平二月 28 天，閏二月 29 天，是 4 的整數倍且不是 100 的整數倍的年份是閏年，是 400 的整數倍的年份是閏年），只需要算出今天距公元 1 年 1 月 1 日多少天，再同時算出你設定的日期距公元 1 年 1 月 1 日多少天，兩個數字一相減，就能得出結果啦。
工具/原料
VB(Visual Basic 6.0)
步驟/方法
打開 VB(Visual Basic) 軟件，新建標準 EXE 工程，按照下圖設計好窗口。中間三個 TextBox（文本框）是用來輸入查詢日期的，將他們的“名稱”屬性分別設為 y,m,d。其下方的三個 Label（標籤框）是用來指示當前日期的，將他們的“名稱”屬性分別設置為 cy,cm,cd。“計算”按鈕下方還有兩個標籤框，是用來指示兩個日期的差值的，請把左邊的標籤框名稱設置為 t，右邊的標籤框名稱設置為 s。這些設置都是為後面編寫程序代碼而準備的。
窗體佈局已經完成，下面就開始正式的程序設計。第一步，剛打開程序時，必須提取出今天的日期。雙擊窗口的空白處，彈出代碼窗口，寫入如下代碼。綠色的文字是註釋，可參考其含義，你們在編寫代碼時不必寫入。
第二步，就是在輸入完日期之後，檢查所輸入的數字有沒有錯誤。年份必須在 1——9999 之間，月份必須在 1——12 之間，而日期就需要根據當前年份和月份來指定相應的範圍了。雙擊第一個文本框 y，進入代碼窗口，寫入如下代碼，同樣有註釋。
判斷完輸入的日期是否有誤後，下面一步就是計算今天，還有設定的日期，各距離公元 1 年 1 月 1 日有多少天了。雙擊“計算”按鈕，寫入如下的代碼。同樣有註釋。
好了，所有的代碼都已經寫完了，你可以點擊工具欄上的“運行”按鈕測試一下效果哦。如果覺得非常滿意，還可以點擊“文件”菜單下的“生成工程1.exe”命令直接生成應用程序，這樣隨時都可以運行啦！
注意事項
寫代碼的時候，所有的標點符號請務必用英文標點。
如需寫註釋，請務必先輸入英文標點的單引號，然後再輸入註釋。或者新開一行，先輸入 REM，再打一個空格，接著在後面輸入註釋內容。