VB.NET實現(xiàn)閏年的簡單方法是什么

VB.NET實現(xiàn)閏年的簡單方法是什么，很多新手對此不是很清楚，為了幫助大家解決這個難題，下面小編將為大家詳細講解，有這方面需求的人可以來學習下，希望你能有所收獲。

創(chuàng)新互聯(lián)-專業(yè)網(wǎng)站定制、快速模板網(wǎng)站建設(shè)、高性價比平泉網(wǎng)站開發(fā)、企業(yè)建站全套包干低至880元,成熟完善的模板庫,直接使用。一站式平泉網(wǎng)站制作公司更省心,省錢,快速模板網(wǎng)站建設(shè)找我們，業(yè)務(wù)覆蓋平泉地區(qū)。費用合理售后完善，十多年實體公司更值得信賴。

想必大家都知道閏年是怎么回事吧，就是四年一閏，百年不閏，四百年再閏。在VB.NET中如何實現(xiàn)這個問題，下面我們就來看看吧。

西方公歷的“閏年”

陽歷中有閏日的年份叫閏年，相反就是平年，平年為365天，閏年為366天。在公歷（格里歷）紀年中，平年的二月為28天，閏年的二月為29天。閏年平月2月29日為閏日。

增加閏日的原因

現(xiàn)時的公歷以回歸年為“年”的計算基礎(chǔ)，而一個回歸年大約等于365.24220日。因為在平年公歷只計算365日，結(jié)果四年后便會累積0.24220×4=0.9688日，大約等于一日，所以便逢四年增加一日閏日以抵銷這0.9688日。

計算閏年的方法

公歷紀年法中，能被4整除的大多是閏年，不能被100整除而能被400整除的年份是閏年，能被3200整除的也不是閏年，如1900年是平年，2000年是閏年，3200年不是閏年。

中國農(nóng)歷的“閏年”

中國舊歷農(nóng)歷紀年中，有閏月的一年稱為閏年。一般年份為12個月，354或355天，閏年則為13個月，383或384天

編程中公歷閏年的簡單計算方法：
設(shè)年份year
（year能被4整除 并且 不能被100整除） 或者year能被400整除 則該年為閏年
否則該年為平年

vb.net閏年的判斷方法（vb.Net已經(jīng)加入了Date.IsLeapYear方法進行判斷，無須那么復(fù)雜了）

VB.NET基礎(chǔ)教程效果圖：

 

  

VB.NET基礎(chǔ)教程實例代碼如下：

Private Sub CheckLeapYear(ByVal Int_Year As Integer)  Dim Boo_LeapYear As Boolean  Boo_LeapYear = Date.IsLeapYear(Int_Year)  If Boo_LeapYear Then  MessageBox.Show(Int_Year & "年是閏年！", "樂博網(wǎng)提示")  Else  MessageBox.Show(Int_Year & "年不是閏年！", "樂博網(wǎng)提示")  End If  End Sub

VB.NET基礎(chǔ)教程調(diào)用方式：

CheckLeapYear(Now.Year)  CheckLeapYear(2000)

看完上述內(nèi)容是否對您有幫助呢？如果還想對相關(guān)知識有進一步的了解或閱讀更多相關(guān)文章，請關(guān)注創(chuàng)新互聯(lián)行業(yè)資訊頻道，感謝您對創(chuàng)新互聯(lián)的支持。

新聞名稱：VB.NET實現(xiàn)閏年的簡單方法是什么
URL地址：http://muchs.cn/article44/jpghhe.html

成都網(wǎng)站建設(shè)公司_創(chuàng)新互聯(lián)，為您提供、做網(wǎng)站、服務(wù)器托管、網(wǎng)站制作、網(wǎng)站內(nèi)鏈、軟件開發(fā)

廣告

聲明：本網(wǎng)站發(fā)布的內(nèi)容（圖片、視頻和文字）以用戶投稿、用戶轉(zhuǎn)載內(nèi)容為主，如果涉及侵權(quán)請盡快告知，我們將會在第一時間刪除。文章觀點不代表本網(wǎng)站立場，如需處理請聯(lián)系客服。電話：028-86922220；郵箱：631063699@qq.com。內(nèi)容未經(jīng)允許不得轉(zhuǎn)載，或轉(zhuǎn)載時需注明來源： 創(chuàng)新互聯(lián)