2. 计算机
  3. 给定年份，下列程序用来判断该年是否为闰年，请填空。 提示：闰年的条件是年份可以被4整除但不能被100整除，或者能被400整除。 Private Sub Comand6_Click() Dim y As Integer y=Input

给定年份，下列程序用来判断该年是否为闰年，请填空。 提示：闰年的条件是年份可以被4整除但不能被100整除，或者能被400整除。 Private Sub Comand6_Click() Dim y As Integer y=Input

admin2012-03-22  46
问题 给定年份，下列程序用来判断该年是否为闰年，请填空。
   提示：闰年的条件是年份可以被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
解析
转载请注明原文地址:https://kaotiyun.com/show/I2hp777K
本试题收录于： 二级VB题库NCRE全国计算机二级分类
0

二级VB

NCRE全国计算机二级

相关试题推荐
随机试题
最新回复(0)