单项选择题
下列程序要求用户输入一个年份,并能够判断用户输入的年份是否是闰年,横线处应填( )。 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 Of
点击查看答案&解析
<上一题
目录
下一题>
热门
试题
填空题
在结构化设计方法中,数据流图表达了问题中的数据流与加工间的关系,且每一个______实际上对应一个处理模块。
点击查看答案&解析
单项选择题
在窗体上有一个命令按钮Command1,通用过程fun和命令按钮的事件过程如下:Private Function fun(ByVal m As Integer)Ifm Mod2=0 Thenfun=2Elsefun=1End IfEnd FunctionPrivate Sub Command1_Click()Dim i As Integer,s As Integers=0For i=1 To 5s=s+fun(i)NextPrintsEnd Sub程序运行后,单击命令按钮,则窗体上输出( )。
A.6
B.7
C.8
D.9
点击查看答案&解析
相关试题
下列程序段运行后,a的值为______。a...
建立一个通讯录的随机文件phonBook.txt,...
在窗体上设计两个复选框,一个显示粗体,另...
一个变量未被显式定义,末尾没有类型说明符...
设A= 345678 ,则表达式Val(Mid...