题目内容

听力原文:M: Hi, Clara. I'd like to invite you to a party. Can you come?
W: Well, it depends. When is it?
M: This Saturday evening.
W: All right. I' 11 certainly come, but I' 11 bring a present. Something for you. 7/hat would you like?
M: Nothing. I mean, don' t bring anything. It’s not necessary.
W: But I'd still like...
M :Just bring yourself. I'm looking forward to seeing you again. It's been a long time.
W: Yes, it has. I' m looking forward to meeting again.
When will the man have a party?

A. Next Sunday evening.
B. Next Saturday evening.
C. This Saturday evening.

查看答案
更多问题

听力原文:M: Hello, Julia. Why are you in such a hurry?
W :Hello, Peter. I' m going to the theatre. They say there’s a lecture on how to improve the skills of listening. Do you want to go with me?
M: Oh, no. Thanks. I heard it yesterday.
W: Really? What did you think of it?
M: I liked it, but I was sorry to have missed the first part.
W: Oh, what happened?
M :I was held up on the way. So by the time I got there, the second part was just beginning.
W: What a pity ! But I' 11 tell you about it after I hear it.
M: Thanks. I hope you'll enjoy it.
Peter won't go with Julia because __________.

A. he's very busy
B. the traffic is busy
C. he has already heard it

听力原文:M: What shall we do tonight?
W: How about the cinema?
M: That’s a good idea. We haven' t been there for ages.
W: What would you like to see?
M: Oh, I don't know. Spy Story?
W: Spy Story? That terrible, old film?
M: But it's got the prize in 1988.
W: But I've seen it before.
M: Well, we can first go to the cinema and then see what film we enjoy.
W: OK.
What are they talking about?

About the plan for tonight.
B. About a terrible old film.
C. About whether they will go to the cinema.

下列过程的功能是:通过对象变量返回当前窗体的Recordset属性记录集引用,消息
框中输出记录集的记录(即窗体记录源)个数。
Sub GetRecNum()
Dim rs As Obj ect
Set rs=Me.RecordSet
MsgBox
End Sub
程序空白处应填写的是

A. Count
B. rs.Count
C. RecordCount
D. rs.RecordCount

在窗体中有一个命令按钮Commandl,编写事件代码如下:
Private Sub Command1_CliCk()
Dim s As Integer
s=P(1)+P(2)+e(3)+P(4)
debug.Print S
End SUb
Public Function P(N AS Integer)
Dim Sum As Integer
Sum=0
For i=1 To N
Sum=Sum+i
Next i
P=Sum
End Function
打开窗体运行后,单击命令按钮,输出结果是

A. 15
B. 20
C. 25
D. 35

答案查题题库