[填空题] 给定年份,下列程序用来判断该年是否为闰年,请填空。 提示:闰年的条件是年份可以被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

[填空题] 给定年份,下列程序用来判断该年是否为闰年,请填空。 提示:闰年的条件是年份可以被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
上一篇 [填空题] 执行下面程序,单击命令按钮cmd1后,窗体上显示的第一行内容是
下一篇 [单项选择题] 设有以下函数过程 Function fun(a As Integer,b As Integer) Dim c As Integer If a<b Then c=a:a=b