下列程序要求用户输入一个年份 并能够判断用户输入的年份是否是闰年 横线处应填Sub EnSure() Dim
年份,闰年,用户
已帮助 人
下列程序要求用户输入一个年份,并能够判断用户输入的年份是否是闰年,横线处应填 Sub EnSure() Dim year As Integer Year=Val(InputBox("请输入年份:")) If(year Mod 4=0_____yaer Mod 100$amp;
-
参考答案:B
【解析】闰年的判断条件是:年份是4的倍数并且不是100的倍数,或者年份是400的倍数。所以表达式为:(year Mod 4=0 And year Mod 100$amp;
