![[填空题] 给定年份，下列程序用来判断该年是否为闰年，请填空。 提示：闰年的条件是年份可以被4整除但不能被100整除，或者能被400整除。 Private Sub Comand6_Click()](http://www.mshxw.com/aiimages/31/254411.png "[填空题] 给定年份，下列程序用来判断该年是否为闰年，请填空。 提示：闰年的条件是年份可以被4整除但不能被100整除，或者能被400整除。 Private Sub Comand6_Click()")
[填空题] 给定年份，下列程序用来判断该年是否为闰年，请填空。
提示：闰年的条件是年份可以被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
参考答案：
And问题解析:
解析无
