单项选择题

下列程序要求用户输入一个年份，并能够判断用户输入的年份是否是闰年，下划线处应填( )。
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
<上一题 目录 下一题>
热门 试题

单项选择题
在窗体上有一个命令按钮Command1，通用过程fun和命令按钮的事件过程如下： Private Function fun(ByVal m As Integer) If m Mod 2=0 Then fun=2 Else fun=1 End If End Function Private Sub Command1_Click() Dim i As Integer,s As Integer s=0 For i=1 To 5 s=s+fun(i) Next Print s End 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
相关试题