单项选择题
下列程序要求用户输入一个年份,并能够判断用户输入的年份是否是闰年,横线处应填( )。 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
点击查看答案&解析
单项选择题
已知一个有序线性表为(13,18,24,35,47,50,62,83,90,115,134),当用二分法查找值为90的元素时,查找成功的比较次数为( )。
A.1
B.2
C.3
D.9
点击查看答案&解析
相关试题
在C盘当前文件夹下建立一个名为SDat.txt的...