题目内容

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

And And
B. And Or
C. Or Or
D. Or Or

查看答案
更多问题

下列程序的功能是:将数据1,2,…,8写入顺序文件Num.txt中,请选择正确的程序段( )。 Private Sub Form_Click() Dim i As Integer Open "Num.txt" For Output As #1 For i=1 To 8 ______ Next i Close #1 End Sub

A. print #1,i
B. input #1,i
C. print #1
D. input #1

血缘婚、族外婚、对偶婚

[听力原文] 男:什么?刚刚制作好的广告又要修改?这些人到底在想些什么呀? 女:刚才也通知我了,我也觉得很无奈。 问:根据对话,可以知道什么?()

A. 广告不用修改
B. 问题已经解决
C. 女的也没有办法
D. 女的觉得很愤怒

[听力原文] 女:到6月28号你们公司就成立十年了,祝贺啊! 男:前一天还是我女儿的生日,我准备开个晚会一起庆祝一下。 问:他女儿的生日是哪天?()

A. 6月26日
B. 6月27日
C. 6月28日
D. 6月29日

答案查题题库