全国2006年4月VB二级试题

1、2006 年 4 月全国计算机等级考试二级vb 程序设计试题（考试时间90分钟，满分100分）一、选择题 ( 每小题 2 分，共 70 分 )下列各题 a)、 b) 、 c)、 d)四个选项中，只有一个选项是正确的。请将正确选项填涂在答题卡相应位置上，答在试卷上不得分。(1) 下列选项中不属于结构化程序设计方法的是。a) 自顶向下 b) 逐步求精c) 模块化 d) 可复用(2) 两个或两个以上模块之间关联的紧密程度称为。a) 耦合度 b) 内聚度c) 复杂度 d) 数据传输特性(3) 下列叙述中正确的是。a) 软件测试应该由程序开发者来完成b) 程序经调试后一般不需要再测试c) 软件维护只包括

2、对程序代码的维护d) 以上三种说法都不对(4) 按照“后进先出”原则组织数据的数据结构是。a) 队列 b) 栈c) 双向链表 d) 二叉树(5) 下列叙述中正确的是。a) 线性链表是线性表的链式存储结构b) 栈与队列是非线性结构c) 双向链表是非线性结构d) 只有根结点的二叉树是线性结构(6) 对如下二叉树abdecf进行后序遍历的结果为。a) abcdefb) dbeafcc) abdecfd) debfca(7) 在深度为 7 的满二叉树中，叶子结点的个数为。a) 32b) 31c) 64 d) 63(8) “商品”与“顾客”两个实体集之间的联系一般是。a) 一对一 b) 一对多c) 多对

3、一 d) 多对多(9) 在 e-r 图中，用来表示实体的图形是。a) 矩形 b) 椭圆形c) 菱形 d) 三角形(10) 数据库 db、数据库系统 dbs、数据库管理系统 dbms之间的关系是。a) db 包含 dbs和 dbmsb) dbms包含 db和 dbsc) dbs 包含 db和 dbms d) 没有任何关系(11) 以下关于 visual basic 特点的叙述中，错误的是。a) visual basic是采用事件驱动编程机制的语言b) visual basic程序既可以编译运行，也可以解释运行c) 构成 visual basic 程序的多个过程没有固定的执行顺序d) visual

4、 basic程序不是结构化程序，不具备结构化程序的三种基本结构(12) 以下叙述中，错误的是。a) 一个 visual basic 应用程序可以含有多个标准模块文件b) 一个 visual basic 工程可以含有多个窗体文件c) 标准模块文件可以属于某个指定的窗体文件d) 标准模块文件的扩展名是 .bas(13) 以下叙述中，错误的是。a) 在 visual basic 中，对象所能响应的事件是由系统定义的b) 对象的任何属性既可以通过属性窗口设定，也可以通过程序语句设定c) visual basic中允许不同对象使用相同名称的方法d) visual basic中的对象具有自己的属性和方法(

5、14) 设有如下语句：dim a ， b as integerc=visualbasicd=#7 202005#以下关于这段代码的叙述中，错误的是。a) a 被定义为 integer 类型变量b) b 被定义为 integer 类型变量c) c 中的数据是字符串d) d 中的数据是日期类型(15) 以下能从字符串 visualbasic 中直接取出子字符串 basic 的函数是。a) leftb) midc) string d) instr(16) 设 a=4， b=3， c=2， d=1，下列表达式的值是。ab+1 or ca) trueb) 1c) -1d) 0(17) 以下可以作为vis

6、ual basic变量名的是。a) a#ab) counstac) 3ad) ?aa(18) 设 x=4， y=6，则以下不能在窗体上显示出“ a=10”的语句是。a) print a=x+yb) printa=;x+yc) print a=+str(x+y) d) printa=&x+y(19) 假定有如下的命令按钮 ( 名称为 command1)事件过程：private sub command1_click()x=inputbox(输入： ， 输入整数 )msgbox输入的数据是：”，”输入数据：+xend sub程序运行后，单击命令按钮，如果从键盘上输入整数10，则以下叙述中错误的是。a

7、) x 的值是数值 10b) 输入对话框的标题是“输入整数”c) 信息框的标题是“输入数据： 10”d) 信息框中显示的是“输入的数据是：”(20) 在窗体上画 1 个命令按钮 ( 名称为 command1)和 1 个文本框 ( 名称为 text1) ，然后编写如下事件过程：private sub command1_click()x=val(text1.text)select case xcase 1 ， 3y=x*xcase is=10 ， is90 then exit fornextend sub； 于 事件 程，以下叙述中 的是。a) a 数 中的数据是 30 个 100 以内的整数b)

8、 句for each arritem in a有 法 c) if arritem mod 7=0 句的功能是 出数 中能 被7 整除的数d) if arritem90 句的作用是当数 元素的 大于90 退出for循 2006 年 4 月笔试试卷第3 页 ( 共 12 页 )2006 年 4 月笔试试卷第4 页 ( 共 12 页)(22) 设有命令按钮 command1的单击事件过程，代码如下：private sub command1_click()dim a(3 ， 3)as integerfor i=1 to 3for j=1 to 3a(i ， j)=i*j+inext jnext isu

9、m=0for i=1 to 3sum=sum+a(i， 4-i)next iprint sumend sub运行程序，单击命令按钮，输出结果是。a) 20b) 7c) 16 d) 17(23) 在窗体上画 1 个名称为 command1的命令按钮，然后编写如下事件过程：private sub command1_click()a=0for i=1 to 2for j=1 to 4if j mod 20 thena=a-1end ifa=a+1next jnext iprint aend sub程序运行后，单击命令按钮，输出结果是。a) 0b) 2c) 3 d) 4(24) 窗体上有名称分别为te

10、xt1 、 text2的 2 个文本框，有一个由3 个单选按钮构成的控件数组option1，如图1 所示。程序运行后，如果单击某个单选按钮，则执行text1中的数值与该单选按钮所对应的运算( 乘以1、 10 或100) ，并将结果显示在text2中，如图2 所示。为了实现上述功能，在程序中的问号(?) 处应填入的内容是。图 1 图 2 private sub option1_click(index as integer) if text1.textthenselect case ? case 0 text2.text=val(text1.text) case 1text2.text=val(t

11、ext1.text)*10case 2text2.text=val(text1.text)*100end selectend ifend suba) indexb) option1.indexc) option1(index) d) option1(index).value(25) 在窗体上画 1 个命令按钮，其名称为 command1，然后编写如下程序：private sub command1_click()dim a(10)as integerdim x as integerfor i=1 to 10a(i)=8+inextx=2print a(f(x)+x)end subfunction

12、 f(x as integer)x=x+3f=xend function程序运行后，单击命令按钮，输出结果为。a) 12b) 15c) 17d) 182006 年 4 月笔试试卷第5 页 ( 共 12 页 )2006 年 4 月笔试试卷第6 页 ( 共 12 页)(26) 以下关于过程的叙述中，错误的是。a) 事件过程是由某个事件触发而执行的过程b) 函数过程的返回值可以有多个c) 可以在事件过程中调用通用过程d) 不能在事件过程中定义函数过程(27) 在窗体上画3 个标签、 3 个文本框 ( 名称分别为text1 、text2 和 text3) 和 1 个命令按钮( 名称为 command1

13、)，外观如图所示。编写如下程序：private sub form_load()text1.text=text2.text=text3.text=end subprivate sub command1_click()x=val(text1.text)y=val(text2.text)text3.text=f(x， y)end subfunction f(byval x as integer,byval y as integer)do while y0tmp=x mod yx=yy=tmploopf=xend function运行程序，在text1 文本框中输入36，在 text2 文本框中输入2

14、4，然后单击命令按钮，则在 text3 文本框中显示的内容是。a) 4b) 6c) 8 d) 12(28) 窗体上有名称分别为text1 、 text2 的 2 个文本框，要求文本框text1 中输入的数据小于 500，文本框 text2 中输入的数据小于 1000，否则重新输入。 为了实现上述功能， 在以下程序中问号 (?) 处应填入的内容是。private sub text1_lostfocus()call checkinput(text1， 500)end subprivate sub text2_lostfocus()call checkinput(text2 end sub， 100

15、0)sub checkinput(t as ?if val(t.text)x then， x as integer)msgbox请重新输入 !end ifend suba) textb) seltextc) controld) form(29) 在窗体上画1 个文本框，其名称为text1 ，然后编写如下过程：private sub text1_keydown(keycode as integer,shift as integer)print chr(keycode)end subprivate sub text1_keyup(keycode as integer， shift as integ

16、er)print chr(keycode+2)end sub程序运行后，把焦点移到文本框中，此时如果敲击“a”键，则输出结果为。a)aab)abc)acd)ad(30) 为了使列表框中的项目呈多列显示，需要设置的属性为。a) columnsb) stylec) listd) multiselect(31) 在窗体上画 1 个命令按钮，名称为 command1，然后编写如下程序：dim flag as booleanprivate sub command1_click()dim intnum as integerintnum=inputbox(请输入： )if flag thenprint f(

17、intnum)end ifend subfunction f(x as integer)as integerif x10 theny=xelsey=x+10end iff=yend functionprivatesub form_mouseup(button as integer,shiftas integer,xas single,yas single)flag=trueend sub运行程序，首先单击窗体，然后单击命令按钮，在输入对话框中输入5，则程序的输出结果为。a) 0b) 5c) 15d) 无任何输出(32) 在菜单编辑器中建立1 个名称为menu0的菜单项，将其“可见”属性设置为f

18、alse ，并建立其若干子菜单，然后编写如下过程：private sub form_mousedown(button as integer,shift as integer,x as single,y assingle)if button=1 thenpopupmenu menu0end ifend sub则以下叙述中错误的是。a) 该过程的作用是弹出一个菜单b) 单击鼠标右键时弹出菜单c) menu0 是在菜单编辑器中定义的弹出菜单的名称d) 参数 x、 y 指明鼠标当前位置的坐标(33) 窗体上有 1 个名称为 cd1的通用对话框， 1 个名称为 command1的命令按钮。命令按钮的单击

19、事件过程如下：private sub command1_click()cd1.filename=cd1.filter=all files|*.*|(*.doc)|*.doc|(*.txt)|*.txtcd1.filterindex=2cd1.action=1end sub关于以上代码，错误的叙述是。a) 执行以上事件过程，通用对话框被设置为“打开”文件对话框b) 通用对话框的初始路径为当前路径c) 通用对话框的默认文件类型为*.txtd) 以上代码不对文件执行读写操作(34) 以下叙述中错误的是。a) 用 shell 函数可以执行扩展名为 .exe 的应用程序b) 若用 static定义通用过

20、程，则该过程中的局部变量都被默认为static类型c) static 类型的变量可以在标准模块的声明部分定义d) 全局变量必须在标准模块中用public或 global声明(35) 以下关于文件的叙述中，错误的是。a) 使用 append 方式打开文件时，文件指针被定位于文件尾b) 当以输入方式 (input) 打开文件时，如果文件不存在，则建立一个新文件c) 顺序文件各记录的长度可以不同d) 随机文件打开后，既可以进行读操作，也可以进行写操作二、填空题 ( 每空 2 分，共 30 分 )请将每空的正确答案写在答题卡【1】【 15】序号的横线上，答在试卷上不得分。(1) 对长度为10 的线性表进行冒泡排序，最坏情况下需要比较的次数为【1】。(2) 在面向对象方法中，【 2】描述的是具有相似属性与操作的一组对象。(3)在关系模型中，把数据看成是二维表，每一个二维表称为一个【3】。(4)程序测试分为静态分析和动态测试。其中【4】是指不执行程序，而只是对程序文本进行检查，通过阅读和讨论，分析和发现程序中的错误。(5) 数据独立性分为逻辑独立性与物理独立性。当数据的存储结构改变时，其逻辑结构可以不变，因此，基于逻辑结构的应用程序不必修改，称为【5】。(6) 下列语句的输出结果是【 6】。print format(int(