给定年份,下列程序用来判断该年是否为闰年,请填空。
提示:闰年的条件是年份可以被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
题库:计算机等级考试
类型:填空题
时间:2017-07-03 15:00:07
免费下载:《填空》Word试卷
给定年份,下列程序用来判断该年是否为闰年,请填空。
提示:闰年的条件是年份可以被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
本题关键词:包被过程,年年青牌清体能口服片,包被,被毛,老年患者,天能中年宝片,年费用,全部或部份鼻甲切除术,被动式太阳能建筑,工程使用年限;