2008年第2次全国高等学校（安徽考区）计算机水平考试
《Visual Basic程序设计》(211)考试说明
一、课程基本情况
课程名称：Visual Basic程序设计 课程代号：211
考试方式：笔试+机试
考试时间：笔试120分钟 机试60分钟 主要参考书：
《Visual Basic程序设计》潘地林等 高等教育出版社 2006.8
《Visual Basic程序设计实训与考试指导》汪采萍等 高等教育出版社 2006.8 《Visual Basic程序设计》潘地林等 中国科大出版社 2005.8 二、课程内容与考核目标
按安徽省教育厅组编、安徽大学出版社出版的《全国高等学校（安徽考区）计算机基础教育教学（考试）大纲》（2005年第2版）《Visual Basic程序设计》（211）教学（考试）大纲执行。
三、关于本次修改的说明
1．考试命题中的考核要求包括了解、理解、掌握、应用、技能、综合。试题总体平均难易度为0.7-0.75，区分度为25-30%。
2．今后将逐步加强对编程能力的考查。
3．考试形式由无纸化考试调整为笔试与上机考试相结合。 四、题型及样题
1．笔试
考试时间120分钟，主要考查Visual Basic集成开发环境及基本操作、Visual Basic程序设计基础知识、Visual Basic常用控件的使用以及阅读程序和编写程序的能力。由考试院统一命题并在统一时间内组织考试。笔试题型和分值分配如下表：
题型 选择 填空 阅读程序 程序设计 题数 40 10 4-5 1-3 每小题分值 1 2 4-5 5-10 题目说明 10题 计算机文化基础 30题Visual Basic程序设计 Visual Basic程序设计 Visual Basic程序设计 Visual Basic程序设计 总分值 40 20 20 20 答题纸 形式 答题卡
2．机试
考试时间60分钟，主要测试程序设计及调试的综合能力，以测试操作能力为主。机试由各考点自主安排，但必须在考试院规定的时间内完成。
题型 基本操作 简单应用 综合应用 题数 1 1 1 单元分值 30 40 30 题目说明 窗体与常用控件 程序设计 菜单及窗体调用 总分值 30 40 30 笔试样题
一、选择题
1. 计算机能够自动工作，主要是因为采用了 。 A) 二进制数制 B) 大规模集成电路 C) 程序设计语言 D) 存储程序控制原理 2. 下列数值中最大的是 。
A) (10110)2 B) (120)8 C) (70)10 D) (3A)16 3. 在计算机指令系统中，一条指令通常由 组成。 A) 数据和字符 B) 操作码和操作数 C) 运算符和数据 D) 被运算数和结果 4. 运算器主要由 组成。
A) 算术逻辑单元 B) 微处理器 C) 控制器 D) 存储器 5.下列关于Windows“回收站”的叙述中，不正确的是 。
A)“回收站”中的信息可以清除 B) “回收站”中的信息可以还原 C) “回收站”的大小可以设置 D) “回收站”不占用硬盘空间 6. 多媒体信息不包括 。
A) 文字、图形 B) 音频、视频 C) 光驱、声卡 D) 影像、动画 7. 学校机房的若干台计算机连接而成的网络通常属于 。 A) WAN B) LAN C) MAN D) GPS 8. FTP是 。
A) 发送电子邮件的软件 B) 浏览网页的工具 C) 文件传输协议 D) 聊天工具
9. 下列关于计算机病毒的叙述中，不正确的是 。 A) 计算机病毒只破坏硬件，不破坏软件 B) 计算机病毒是人为编写的一种程序
C) 计算机病毒能通过磁盘、网络等媒介传播、扩散 D) 计算机病毒具有潜伏性、传染性和破坏性 10. 下列关于算法的叙述中，正确的是 。
A) 算法就是对特定问题求解步骤的描述 B) 算法就是程序 C) 算法就是软件 D) 算法没有优劣之分 11. VB的标准化控件位于IDE(集成开发环境)中的 11 窗口内。
A) 工具栏 B) 工具箱 C) 对象浏览器 D) 窗体设计器 12. 以下关于事件的说法，正确的是 12 。
A) 用户可以根据需要建立新的事件
B) 事件的名称是可以改变的，由用户预先定义 C) 不同类型的对象所能识别的事件一定不相同
D) 事件是由系统预先定义好的能够被对象识别的动作 13. 下列符号中，可以用作VB变量名的是 13 。
A) x.y.z B) 3xyz C) x_yz D) Integer 14. 下列属于非法调用的函数是 14 。
A) Sqr(-5) B) Sgn(-5) C) Exp(-5) D) Int(-5)
15. 已知f= \，则表达式Val(Left(f,3)) + Val(Mid(f,4,2))的值是 15 。
A) 168 B) 12345 C) 123 D) 45
16. 执行语句：MsgBox \北京欢迎您！\，所产生的消息对话框的标题是 16 。
A) 北京欢迎您！ B) 2008 C) 0 D) 1 17. 数学关系5≤y<10表示成正确的VB表达式为 17 。
A) 5<=y<10 B) 5≤y And y<10 C) 5<=y And y<10 D) 5<=y Or y<10 18. 表达式5+6*5 Mod 35\\8的值是 18 。
A) 5 B) 6 C) 7 D) 8 19. 表达式Len(\中文版VB6.0\的值是 19 。
A) 6 B) 8 C) 10 D) 11 20. 下列正确的赋值语句是 20 。
A) 3x=y＋z B) x+y=z C) 2=x+y D) z=x+y 21. 若a=1,b=2,则语句Print a = 1 And b > 2的输出结果是 21 。
A) True B) False C) -1 D) 结果不确定 22. 用以下语句定义的数组A包含的元素个数是 22 。 Option Base 1 Dim a(4,-1 To 1,5)
A) 10 B) 20 C) 60 D) 90 23. 针对语句If x = 1 Then y = 1，下列说法正确的是 23 。
A) x = 1 和 y = 1均为赋值语句 B) x = 1 和 y = 1均为关系表达式
C) x = 1 为赋值语句，y = 1为关系表达式 D) x = 1为关系表达式，y = 1为赋值语句
24. 结构化程序设计所规定的三种基本结构是 24 。
A) 输入、处理、输出 B) 树形、网形、环形 C) 顺序、选择、循环 D) 主程序、子程序、函数
25. 对于窗体Form1，执行了Form1.Left = Form1.Left + 200语句后，该窗体将 25 。
A) 上移 B) 下移 C) 左移 D) 右移 26. 水平滚动条HScroll1的LargeChange属性值为10，表示 26 为10。
A) 该滚动条的最小值 B) 该滚动条的最大值
C) 单击滚动条两端箭头时滚动条值的变化量
D) 单击滚动条两端箭头和滑块之间的空白处时滚动条值的变化量 27. 若要使标签框的大小自动与所显示的文本相适应，则可通过设置 27 属性的值为True
来实现。 A) AutoSize B) Alignment C) Font D) Visible 28. 若要使文本框成为只读文本框，可通过设置 28 属性值为True来实现。
A) ReadOnly B) Visible C) Enabled D) Locked 29. 复选框的Value属性值为1时，表示 29 。
A) 复选框未被选中 B) 复选框被选中 C) 复选框内有灰色的勾 D) 复选框操作错误 30. 下列控件中，没有Caption属性的是 30 。
A) 列表框 B) 框架 C) 复选框 D) 单选按钮 31. 将数据项“安徽”添加到列表框List1中作为第一项，应使用的语句是 31 。
A) List1.AddItem 0,\安徽\B) List1.AddItem \安徽\C) List1.AddItem \安徽\D) List1.AddItem 1,\安徽\
32. 如果每秒触发10次Timer事件，那么计时器控件的Interval属性应设为 32 。
A) 1 B) 10 C) 100 D) 1000
33. 为了在运行时把E:\\img文件夹下的图形文件a.jpg装入图片框Picture1中，所使用的语
句为 33 。
A) Picture1. Image=LoadPicture(\ B) Picture1. Picture =LoadPicture(\ C) Picture1. Picture =Load(\ D) Picture1. Picture =LoadPicture(E:\\img\\a.jpg)
34. 为了使目录列表框Dir1的显示内容与驱动器列表框Drive1的选择一致，应当 34 。
A) 在Dir1_Change事件中加入代码Dir1.Path = Drive1. Drive B) 在Dir1_Change事件中加入代码Drive1. Drive = Dir1.Path C) 在Drive1_Change事件中加入代码Dir1.Path = Drive1. Drive D) 在Drive1_Change事件中加入代码Drive1. Drive = Dir1.Path 35. 在VB中，可以作为容器的对象是 35 。
A) 窗体、文本框、图片框 B) 窗体、图片框、框架 C) 窗体、文本框、标签 D) 标签、文本框、图片框 36. 使图像框控件（Image）中的图像自动适应控件的大小，需要 36 。
A) 将控件的AutoSize属性设为True B) 将控件的AutoSize属性设为False C) 将控件的Stretch属性设为True D) 将控件的Stretch属性设为False 37. 设菜单项名称为MenuCut，为了在运行时使该菜单项失效（变灰），应使用的语句为
37 。
A) MenuCut.Enabled = False B) MenuCut.Enabled = True C) MenuCut.Visible = False D) MenuCut.Visible = True 38. 菜单控件只有一个 38 事件。
A) Click B) DblClick C) MouseUp D) KeyPress 39. 执行语句Open \后，对文件“Example.dat”能够进行的操作是
39 。
A) 只能读不能写 B) 只能写不能读 C) 既可以写，也可以读 D) 既不能读，也不能写 40. Data控件的 40 属性用来设置和返回数据源的名称和位置。
A) Connect B) DatabaseName C) RecordSource D) RecordsetType 二、填空题
1. 在VB中，程序错误的类型大致可分为 (1) 、运行错误和逻辑错误三大类。 2. 在VB中，模块文件的扩展名是 (2) 。
3. 在VB中，日期/时间型常量应使用 (3) 符号将其括起来。 4. VB表达式Abs(a + b) / 2 * a对应的数学表达式是 (4) 。
5. VB中有一种控件组合了文本框和列表框的特点，这种控件是 (5) 。 6. 下列程序段执行后，变量n的值是 (6) 。
For n = 1 To 15 Step 4 Print n Next n
7. 如果一个过程直接或间接调用自身，则称这种调用为 (7) 调用。
8. 在VB中，可以使用通用对话框控件（CommonDialog）的 (8) 方法来显示颜色对话
框。
9. 下列程序的功能是对数组a 中的元素按从小到大的顺序进行排列，请将程序补充完整。
Option Base 1
Private Sub Form_Click()
Dim i As Integer, j As Integer, t As Integer a = Array(12, 9, 21, 18, 62, 14, 32, 29, 56, 30) For i = 1 To 9
For j = (9) To 10 If a(i) > a(j) Then t = a(i) (10) a(j) = t End If Next j Next i
For i = 1 To 10 Print a(i); Next i End Sub
三、阅读程序题
1. 执行下面程序后，输出的结果是 1 。 Private Sub Form_Click()
Dim m As Integer, k As Integer m = 5: k = 7 Select Case m Case Is < 0 m = m + 5 Case 1 To 10 m = m-k Case Else m = k Mod 3 End Select Print m, k End Sub
2．执行下面程序后，输出的结果是 2 。 Private Sub Form_Click()
Dim x As Integer , n As Integer