在窗体中有一个标签Lb1和一个命令按钮Command1，事件代码如下： Option Compare Database Dim a As String*10 Private Sub Command1 Click()a="1234"b=Len(A)Me.Lb1.Caption=b End Sub 打开窗体后单击命令按钮，窗体中显示的内容是( )。

A．4

B．5

C．10

D．40

VI. 书面表达(满分25分)

写一则口头通知，词数为100左右。要点如下：

一澳大利亚学生旅游团(touring group) 要到我校参观，时间定在11月18日，星期五下午。我们的客人将于下午2点钟到达，晚上6点钟离开。我们将于下午2点10分在操场开欢迎会，人人都要准时参加。会后，我们要带他们参观教学楼、实验楼、图书馆和游泳池。最后，要在大礼堂 (auditorium) 举行聚会，聚会上有唱歌、跳舞、音乐、游戏和交换礼物等活动。请大家积极参与。谢谢。

Dear friends,

May I have your attention please? I have an announcement to make.

That’s all! Thank you.