首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
下列程序要求用户输入一个年份,并能够判断用户输入的年份是否是闰年,下划线处应填( )。 Sub EnSure() Dim year As Integer year=Val(InputBox("请输入年份:"))
下列程序要求用户输入一个年份,并能够判断用户输入的年份是否是闰年,下划线处应填( )。 Sub EnSure() Dim year As Integer year=Val(InputBox("请输入年份:"))
admin
2013-01-23
55
问题
下列程序要求用户输入一个年份,并能够判断用户输入的年份是否是闰年,下划线处应填( )。 Sub EnSure() Dim year As Integer year=Val(InputBox("请输入年份:")) If(year Mod 4=0 ______ year Mod 100<>0) ______ (year Mod 400=0) Then Print "您输入的是闰年" Else Print "不是闰年,是普通年份" End If End Sub
选项
A、And And
B、And Or
C、Or Or
D、Or Or
答案
2
解析
闰年的判断条件是:年份是4的倍数并且不是100的倍数,或者年份是400的倍数。所以表达式为:(year Mod 4=0 And year Mod 100<>0) Or (year Mod 400=0)。
转载请注明原文地址:https://kaotiyun.com/show/B8hp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
在窗体中添加一个命令按钮,(其Name属性为Command1),然后编写代码。程序的功能是产生100个小于1000(不含1000)的随机正整数,并统计其中5的倍数所占比例。请在【】和【】、【】处填入适当的内容,将程序补充完整。Pri
当Form1_Click事件发生时,写出在窗体上显示的第二行和第三行是()。PrivateaAsInteger,cAsIntegerPrivateSubForm_Click()DimaAsInte
程序代码如下,当单击窗体上的Command1控件时,窗体上显示的结果是()。OptionBase1PrivateSubCommand1_Click()DimiAsIntegerDimx(3,3)As
为了使一个标签透明且没有边框,必须将它的BorderStyle属性设置为0,并将【】属性设置为0。
要打印出50个在-100~100之间不同的随机整数,并找出第几个是最大数。给定的程序不完整,将程序补充完整。OptionBase1PrivateSubCommand1_Click()Dimb()Rand
要存放如下矩阵的数据,在不浪费存储空间的基础上,能实现声明的语句是123246369
当关闭窗体(Form1)或执行Unload语句时所能触发的事件是
在一个容量为15的循环队列中,若头指针front=6,尾指针rear=9,则该循环队列中共有【】个元素。
设一棵完全二叉树共有699个结点,则在该二叉树中的叶子结点数为
具有n个结点的完全二叉树的深度为【】。
随机试题
根据《中华人民共和国民事诉讼法》的规定,凡是经过公证证明的事项,______,除有相反证据可以推翻的以外,人民法院都应直接作为证据采用或交付执行。()
A.腹水细胞总数是200×106×106/L,分类以单核为主B.腹水比重<1.016.蛋白<20g/LC.腹水比重>1.018.李凡他试验阳性D.乳糜样腹水E.血性腹水结核性腹膜炎腹水性质常为
比例代表制
“备案号”栏应填:“收货单位”栏应填:
读地球昼夜分布图(阴影部分为夜),回答问题。上图为____________极上空俯视图,图中共有____________条经线,____________段为晨线。
Thedetectivesinsistedonadetailedandsequentialaccountoftheevening’sevents.
邓小平指出:“现在我们虽说在搞社会主义,但事实上不够格。”这说明()。
下列关于RPR技术的描述中,错误的是()。
【26】【39】
FiveGoldenRulesforGivingAcademicPresentationsAcademicpresentationsaredifferentfromtheclassroompresentationsthats
最新回复
(
0
)