题库考试答案搜索网 > 题目详情
问题题干   答案解析   相关问题   热门问题   最新问题

问题详情

下列程序要求用户输入一个年份，并能够判断用户输入的年份是否是闰年，下划线处应填( )。 Sub EnSure() Dim year As Integer year=Val(InputBox("请输入年份:")) If(year Mod 4=0 ______ year Mod 100＜＞0) ______ (year Mod 400=0) Then Print "您输入的是闰年" Else Print "不是闰年，是普通年份" End If End Sub

A、And And

B、And Or

C、Or Or

D、Or Or

时间：2022-01-02 04:00 关键词：

答案解析

B
解析：闰年的判断条件是：年份是4的倍数并且不是100的倍数，或者年份是400的倍数。所以表达式为：(yearMod4=0AndyearMod100＞0)Or(yearMod400=0)。