下列程序要求用戶輸入一個(gè)年份,并能夠判斷用戶輸入的年份是否是閏年,橫線處應(yīng)填Sub EnSure() Dim
下列程序要求用戶輸入一個(gè)年份,并能夠判斷用戶輸入的年份是否是閏年,橫線處應(yīng)填 Sub EnSure() Dim year As Integer Year=Val(InputBox("請(qǐng)輸入年份:")) If(year Mod 4=0_____yaer Mod 100<>0)______(yaer Mod 400=0)Then Print"您輸入的是閏年" Else Print"不是閏年,是普通年份" End If End SubA.And And B.And Or C.Or Or D.Or Or
正確答案:B【解析】閏年的判斷條件是:年份是4的倍數(shù)并且不是100的倍數(shù),或者年份是400的倍數(shù)。所以表達(dá)式為:(year Mod 4=0 And year Mod 100<>0) Or (year Mod 400=0)。
詞條內(nèi)容僅供參考,如果您需要解決具體問(wèn)題
(尤其在法律、醫(yī)學(xué)等領(lǐng)域),建議您咨詢相關(guān)領(lǐng)域?qū)I(yè)人士。