2. 计算机
  3. 下列程序要求用户输入一个年份，并能够判断用户输入的年份是否是闰年，下划线处应填( )。 Sub EnSure() Dim year As Integer year=Val(InputBox("请输入年份:"))

下列程序要求用户输入一个年份，并能够判断用户输入的年份是否是闰年，下划线处应填( )。 Sub EnSure() Dim year As Integer year=Val(InputBox("请输入年份:"))

admin2013-01-23  64
问题 下列程序要求用户输入一个年份，并能够判断用户输入的年份是否是闰年，下划线处应填(    )。    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
答案2
解析 闰年的判断条件是：年份是4的倍数并且不是100的倍数，或者年份是400的倍数。所以表达式为：(year Mod 4=0 And year Mod 100＜＞0) Or (year Mod 400=0)。
转载请注明原文地址:https://www.kaotiyun.com/show/B8hp777K
本试题收录于： 二级VB题库NCRE全国计算机二级分类
0

二级VB

NCRE全国计算机二级

相关试题推荐
随机试题
最新回复(0)