您所在的当前位置: 计算机等级考试题库   >  
BASIC题库  
  >   [填空题] 给定年份,下列程序用来判断该年是否为闰年,请填空。 提示:闰年的条件是年份可以被4整除但不能被100整除,或者能被400整除。 Private Sub Comand6_Click() Dim y As Integer y=InputBox("请输入年份") If(y Mod 4=0______y Mod 100<>0)or(y Mod 400=0)Then   Print"是闰年" Else   Print"是普通年份" End If End Sub
问题:
发布时间:2022-07-01

[填空题] 给定年份,下列程序用来判断该年是否为闰年,请填空。 提示:闰年的条件是年份可以被4整除但不能被100整除,或者能被400整除。 Private Sub Comand6_Click() Dim y As Integer y=InputBox("请输入年份") If(y Mod 4=0______y Mod 100<>0)or(y Mod 400=0)Then   Print"是闰年" Else   Print"是普通年份" End If End Sub

可能感兴趣的题目: