2003—2012全国计算机等级考试二级VB语言笔试试题及答案

1、2003年4月全国计算机等级考试二级vb语言笔试试题及答案一、选择题(1)一(20)每小题2分，(21)一(30)每小题3分，共30题，70分)下列各题a)、b)、c)、d)四个选项中，只有一个选项是正确的，请将正确选项涂在答题卡的相应位置上，答在试卷上不得分。 (1)以下不能在“工程资源管理器”窗口中列出的文件类型是 a)bas b)res c)fnn d)ocx (2)以下关于窗体的描述中，错误的是 a)执行unloadfoml语句后，窗体fonnl消失，但仍在内存中 b)窗体的ioad事件在加载窗体时发生 c)当窗体的enabled属性为false时，通过鼠标和键盘对窗体的操作都被禁止

2、d)窗体的height、width属性用于设置窗体的高和宽 (3)下列可作为v2sualbasic变量名的是 a)a#a b)4a c)?xy d)consta (4)设有如下的记录类型 type student numberas string name as string age as integer end type 则正确引用该记录类型变量的代码是 a) studentname=”张红” b) dim as student sname”张红” c) dim s as type student d) dim s as type sname=”张红” s.dame”张红” (5)函数stri

3、ng(n，“str”)的功能是 a)把数值型数据转换为字符串 b)返回由n个字符组成的字符串 c)从字符串中取出n个字符 d)从字符串中第n个字符的位置开始取子字符串 (6)将数学表达式cos2(a+b)+5e2写成visual basic的表达式，其正确的形式是 a)cos(a+b)a2十5。exp(2) b)cos2(a+b)+5*exp(2) c)cos(a+b)2十5*ln(2) d)cos2(a+b)+5*ln(2) (7)在窗体上画一个命令按钮，名称为commandl。单击命令按钮时，执行如下事件过 程： prlvate sub commandlc1icko a$=software

4、 and hardware b$right(a$,8) c$=mid(a$,1，8) msgbox a$,b$,c$,1 end sub 则在弹出的信息框的标题栏中显示的信息是 a)software and hardware b)software c)hardwafe d)1 (8)执行如下语句： ainutbox(”today”，”tomorrow，”yesterday”,day before yesterday，5) 将显示一个输入对话框，在对话框的输入区中显示的信息是 a)today b)tomorrow c)yesterday d)day before yesterday (9)表示滚

5、动条控件取值范围最大值的属性是 a)max b)largechange c)value d)maxmin (10)在窗体上画一个名称为listl的列表框，一个名称为labell的标签。列表框中显示 若干城市的名称。当单击列表框中的某个城市名时，在标签中显示选中城市的名称。 下列能正确实现上述功能的程序是 a) private sub listl_click() b)private sub listl_c1ick() labellcaptionlist1.listlndex labellnanlelistllistindex end sub end sub 程序运行后，如果单击命令按钮，则在窗体

6、上显示的内容是 a)空白 b)错误提示 c)北京 d)上海 (15)假定有以下函数过程： function fun(s as string) as string dim s1 as string for i=1 to len(s) s1ucase(mid(s，i，1)十s1 next i funs1 end function 在窗体上画一个命令按钮，然后编写如下事件过程： prlvate sub commmldl_click() dim str1 as string，str2 as string strlinputbox(”请输入一个字符串”) str2=fun(strl) print str

7、2 end sub 程序运行后，单击命令按钮，如果在输入对话框中输入字符串“abcdefg”，则单击“确 定”按钮后在窗体上的输出结果为 a)abcdefg b)abcdefg c)gfedcba d)gfedcba (16)设有语句 open c：testdat for output as#1 则以下错误的叙述是 a)该语句打开c盘根目录下一个己存在的文件testdat b)该语句在c盘根目录下建立一个名为testdat的文件 c)该语句建立的文件的文件号为1 d)执行该语句后，就可以通过print#语句向文件testdat中写入信息 (17)以下叙述中错误的是 a)用shell函数可以调用

8、能够在windows下运行的应用程序 b)用shell函数可以调用可执行文件，也可以调用visualbasic的内部函数 c)调用shell函数的格式应为：shell() d)用shell函数不能执行dos命令 (18)以下关于过程及过程参数的描述中，错误的是 a)过程的参数可以是控件名称 b)用数组作为过程的参数时，使用的是“传地址”方式 c)只有函数过程能够将过程中处理的信息传回到调用的程序中 d)窗体可以作为过程的参数 (19)在窗体上画一个名称为txta的文本框，然后编写如下的事件过程： private sub txta_keypress(keyascii as integer) en

9、d sub 若焦点位于文本框中，则能够触发keypress事件的操作是 a)单击鼠标 b)双击文本框 c)鼠标滑过文本框 d)按下键盘上的某个键 (20)目录列表框的path属性的作用是 a)显示当前驱动器或指定驱动器上的路径 b)显示当前驱动器或指定驱动器上的某目录下的文件名 c)显示根目录下的文件名 d)只显示当前路径下的文件 (21)假定有如下事件过程： private sub form_mousedown(button as integer,shift as integer, x as single，y as single) if button2 then popupmenu popf

10、orm end if end sub 则以下描述中错误的是 a)该过程的功能是弹出一个菜单 b)popform 是在菜单编辑器中定义的弹出式菜单的名称 c)参数x、y指明鼠标的当前位置 d)button=2 表示按下的是鼠标左键 (22)以下能够正确计算n!的程序是 二级visual basic语言程序设计试卷第5页 (共15页) a) private sub commandl_click() n5:x1 do x=x*1 ii十1 loop while in print x end sub b) private sub commandl_click() n5: x1：i=1 do xx*1

11、ii十1 loop while in print x end sub c)private sub commandl_click() n=5：x1：i1 do x=x*1 ii十1 loop while i、13和 14处将程序补充完整。 private sub combol_ (keyascii as integer) 1f keyascii13 then fori0 to combo1listcount1 1f combo1text_ 13 ihen label2caption”输入项己在组合框中” exit sub end lf next i label2caption“已成功添加输入项”

12、 combo1_ 14 combo1text end lf end sub (10)设有如下程序 private sub search(a()as variant，byval key as variant，index%) dim i forilbound(a)to ubound(a) if keya(i) then indexi exit sub end if next i index-1 end sub private sub form_load() show dtm b() as variant dim n as integer barray(1，3，5，7，9，11，13，15) cal

13、l search(b，11，n) printt n end sub 程序运行后，输出结果是_。2003年4月全国计算机等级考试二级visual basic笔试答案一、选择题1-5：dadbb 6-10：accad 11-15：dbbdd 16-20：abcda 21-25：dcbbc 26-30：ccdca二、填空题(1) 组合框(2) 顺序访问方式(3) 9(4) picture1.picture=loadpicture(d:pica.jpg)(5) timer(6) rnd和x mod 5和x(7) 30和70(8) 123456789(9) keypress和combo1.list(i)

14、和additem(10) 52003年9月全国计算机等级考试二级vb语言笔试试卷（考试时间90分钟，满分100分） 一、 选择题（1）（20）每小题2分，（21）（30）每小题3分，共70分）（1）以下叙述中错误的是a）visual basic 是事件驱动型可视化编程工具b）visual basic应用程序不具有明显的开始和结束语句c）visual basic工具箱中的所有控件都具有宽度（width）和高度（height）属性d）visual basic中控件的某些属性只能在运行时设置（2）以下叙述中错误的是a）在工程资源管理器窗口中只能包含一个工程文件及属于该工程的其他文件 b）以.bas为

15、扩展名的文件是标准模块文件c）窗体文件包含该窗体及其控件的属性d）一个工程中可以含有多个标准模块文件（3）以下叙述中错误的是a）双击鼠标可以触发dblclick事件b）窗体或控件的事件的名称可以由编程人员确定c）移动鼠标时，会触发mousemove事件d）控件的名称可以由编程人员设定（4）以下不属于visual basic系统的文件类型是a）.frm b）.bat c）.vbg d）.vbp（5）以下叙述中错误的是a）打开一个工程文件时，系统自动装入与该工程有关的窗体、标准模块等文件b）保存visual basic程序时，应分别保存窗体文件及工程文件c）visual basic应用程序只能以解

16、释方式执行d）事件可以由用户引发，也可以由系统引发（6）以下能正确定义数据类型telbook的代码是a）type telbook b）type telbookname as string*10 name as string*10telnum as integer telnum as integerend type end telbookc）type telbook d）typedef telbookname string*10 name string*10telnum integer telnum integerend type telbook end type（7）以下声明语句中错误的是a）

17、const var1=123 b）dim var2 = abcc）defint a-z d）static var3 as integer（8）设窗体上有一个列表框控件list1，且其中含有若干列表项。则以下能表示当前被选中的列表项内容的是a）list1.list b）list1.listindex c）list1.index d）list1. text（9）程序运行后，在窗体上单击鼠标，此时窗体不会接收到的事件是a）mousedown b）mouseup c）load d）click（10）设a=10，b=5，c=1，执行语句print a b c后，窗体上显示的是a）true b）false

18、 c）1 d）出错信息 2004年4月全国计算机等级考试二级vb语言笔试试题及答案一、选择题（(1)(20)每小题2分，(21)(30)每小题3分，共70分）下列各题 a) 、b)、c)、d)四个选项中，只有一个选项是正确的，请将正确选项涂写在答题卡相应位置上，答在试卷上不得分。(1) 在窗体上画一个名称为command1的命令按钮，然后编写如下事件过程： private sub command1_click() move 500，500 end sub 程序运行后，单击命令按钮，执行的操作为a) 命令按钮移动到距窗体左边界、上边界各500的位置b) 窗体移动到距屏幕左边界、上边界各500的位

19、置c) 命令按钮向左、上方向各移动500d) 窗体向左、上方向各移动500(2) 在窗体上有若干控件，其中有一个名称为text1的文本框。影响text1的tab顺序的属性是a) tabstop b)enabledc) visible d)tabindex(3) 以下定义数组或给数组元素赋值的语句中，正确的是(4) 在窗体上画一个名称为list1的列表框，为了对列表框中的每个项目都能进行处理，应使用的循环语句为a) for i=0 to list1.listcount-1nextb) for i=0 to listcount-1nextc) for i=1 to list1.listcountn

20、extd) for i=1 to listcountnext(5) 以下case语句中错误的是a) case 0 to 10 b) case is%26gt;10c) case is%26gt;10 and is%26lt;50 d) case 3,5,is%26gt;10(6) 以下关于图片框控件的说法中，错误的是a) 可以通过print方法在图片框中输出文本b) 清空图片框控件中图形的方法之一是加载一个空图形c) 图片框控件可以作为容器使用d) 用stretch属性可以自动调整图片框中图形的大小(7) 执行语句s=len(mid(visualbasic,1,6)后，s的值是a) visua

21、l b) basic c) 6 d) 11(8) 以下叙述中错误的是a) 下拉式菜单和弹出式菜单都用菜单编辑器建立b) 在多窗体程序中，每个窗体都可以建立自己的菜单系统c) 除分隔线外，所有菜单项都能接收click事件d) 如果把一个菜单项的enabled属性设置为false，则该菜单项不可见(9) 在窗体上画一个命令按钮，其名称为command1，然后编写如下事件过程： private sub command1_click() a = 12345print format$(a, 000.00)end sub程序运行后，单击命令按钮，窗体上显示的是a) 123.45 b) 12345.00 c

22、) 12345 d)00123.45(10) 以下叙述中错误的是a) 一个工程可以包括多种类型的文件b) visual basic应用程序既能以编译方式执行，也能以解释方式执行c) 程序运行后，在内存中只能驻留一个窗体d) 对于事件驱动型应用程序，每次运行时的执行顺序可以不一样 (11) 以下关于函数过程的叙述中，正确的是a) 函数过程形参的类型与函数返回值的类型没有关系b) 在函数过程中，过程的返回值可以有多个c) 当数组作为函数过程的参数时，既能以传值方式传递，也能以传址方式传递d) 如果不指明函数过程参数的类型，则该参数没有数据类型(12) 以下关于变量作用域的叙述中，正确的是a) 窗体

23、中凡被声明为private的变量只能在某个指定的过程中使用b) 全局变量必须在标准模块中声明c) 模块级变量只能用private关键字声明d) static类型变量的作用域是它所在的窗体或模块文件(13) 确定一个控件在窗体上的位置的属性是a) width和height b) width或heightc) top和left d) top或left (14) 在窗体上画一个名称为text1的文本框和一个名称为command1的命令按钮，然后编写如下事件过程 private sub command1_click() text1.text = visual me.text1 = basic text

24、1 = programend sub程序运行后，如果单击命令按钮，则在文本框中显示的是a) visual b) basic c) program d) 出错(15) 以下关系表达式中，其值为false的是a) abcabc b) thetheyc) visual=ucase(visual) d) integerint(16) 语句print 5/4*65 mod 2的输出结果是a) 0 b)1 c) 2 d) 3(17) 在窗体上画一个文本框、一个标签和一个命令按钮，其名称分别为text1、label1和command1，然后编写如下两个事件过程：private sub command1_cl

25、ick() strtext = inputbox(请输入) text1.text = strtextend subprivate sub text1_change() label1.caption = right(trim(text1.text), 3)end sub程序运行后，单击命令按钮，如果在输入对话框中输入abcdef，则在标签中显示的内容是a)空 b) abcdef c) abc d) def(18) 在窗体上画一个名称为command1的命令按钮，然后编写如下事件过程：private sub command1_click()x = -5if sgn(x) then y = sgn(

26、x 2)else y = sgn(x)end ifprint yend sub程序运行后，单击命令按钮，窗体上显示的是a) -5 b) 25 c) 1 d) -1(19) 一个工程中含有窗体form1、form2和标准模块model1，如果在form1中有语句pubilc x as integer，在model1中有语句pubilc y as integer，则以下叙述中正确的是a) 变量x、y的作用域相同 b) y的作用域是model1c) 在form1中可以直接使用x d) 在form2中可以直接使用x和y(20) 在窗体上画一个名称为drive1的驱动器列表框，一个名称为dir1的目录列

27、表框。当改变当前驱动器时，目录列表框应该与之同步改变。设置两个控件同步的命令放在一个事件过程中，这个事件过程是a）drive1_change b) drive1_clickc) dir1_click d) dir1_change (21) 在窗体上画一个命令按钮（其name属性为command1），然后编写如下代码:option base 1private sub command1_click() dim a s = 0 a = array(1,2,3,4) j = 1 for i = 4 to 1 step -1 s = s + a(i) * j j = j * 10 next i prin

28、t send sub运行上面的程序，单击命令按钮，其输出结果是a) 4321 b) 1234 c) 34 d) 12(22) 在窗体上画一个名称为text1的文本框，要求文本框只能接收大写字母的输入。以下能实现该操作的事件过程是a) private sub text1_keypress(keyascii as integer) if keyascii 90 then msgbox 请输入大写字母 keyascii = 0 end ifend subb) private sub text1_keydown(keycode as integer, shift as integer) if keyc

29、ode 90 then msgbox 请输入大写字母 keycode = 0 end ifend subc) private sub text1_mousedown(button as integer, shift as integer, x as single, y as single) if asc(text1.text) 90 then msgbox 请输入大写字母 end ifend subd) private sub text1_change() if asc(text1.text) 64 and asc(text1.text) sqr(i) then print i next iend sub该事件过程的功能是a) 输出n以内的奇数 b) 输出n以内的偶数c) 输出n以内的素数 d) 输出n以内能被j整除的数(27) 在以下描述中正确的是a) 标准模块中的任何过程都可以在整个工程范围内被调用b) 在一个窗体模块中可以调用在其他窗体中被定义为public的通用过程c) 如果工程中包含sub main过程，则程序将首先执行该过程d) 如果工程中不包含sub main过程，则程序一定首先执行第一个建立的窗体(28) 在窗体上画一个名称为command1的命令按钮，然后编写如下通用过程和命令按钮的事件过程：private function f(m as