![[填空题] 给定年份，下列程序用来判断该年是否为闰年，请填空。 提示：闰年的条件是年份可以被4整除但不能被100整除，或者能被400整除。 Private Sub Comand6_Click() Di,第1张](/aiimages/%5B%E5%A1%AB%E7%A9%BA%E9%A2%98%5D+%E7%BB%99%E5%AE%9A%E5%B9%B4%E4%BB%BD%EF%BC%8C%E4%B8%8B%E5%88%97%E7%A8%8B%E5%BA%8F%E7%94%A8%E6%9D%A5%E5%88%A4%E6%96%AD%E8%AF%A5%E5%B9%B4%E6%98%AF%E5%90%A6%E4%B8%BA%E9%97%B0%E5%B9%B4%EF%BC%8C%E8%AF%B7%E5%A1%AB%E7%A9%BA%E3%80%82+%E6%8F%90%E7%A4%BA%EF%BC%9A%E9%97%B0%E5%B9%B4%E7%9A%84%E6%9D%A1%E4%BB%B6%E6%98%AF%E5%B9%B4%E4%BB%BD%E5%8F%AF%E4%BB%A5%E8%A2%AB4%E6%95%B4%E9%99%A4%E4%BD%86%E4%B8%8D%E8%83%BD%E8%A2%AB100%E6%95%B4%E9%99%A4%EF%BC%8C%E6%88%96%E8%80%85%E8%83%BD%E8%A2%AB400%E6%95%B4%E9%99%A4%E3%80%82+Private+Sub+Comand6_Click%28%29+Di.png "[填空题] 给定年份，下列程序用来判断该年是否为闰年，请填空。 提示：闰年的条件是年份可以被4整除但不能被100整除，或者能被400整除。 Private Sub Comand6_Click() Di,第1张")
[填空题] 给定年份，下列程序用来判断该年是否为闰年，请填空。 提示：闰年的条件是年份可以被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
欢迎分享，转载请注明来源：内存溢出
微信扫一扫
支付宝扫一扫
评论列表（0条）