2014计算机二级VB模拟试题与答案（三） .doc

2014年计算机二级vb模拟试题及答案（四）一、选择题1、任何控件都有的属性是( )。a.backcolorb.captionc.named.borderstyle2、设计数据库的存储结构属于()a.需求分析b.概念设计c.逻辑设计d.物理设计3、某人创建了1个工程，其中的窗体名称为form1;之后又添加了1个名为form2的窗体，并希望程序执行时先显示form2窗体，那么，他需要做的工作是()。a.在工程属性对话框中把启动对象设置为form2b.在forml 的load 事件过程中加入语句load form2c.在form2的load 事件过程中加入语句form2.showd.把form2的tabindex 属性设置为l ，把form1的tabindex 属性设置为24、设有如下通用过程：public function fun(xstr as stri ng)as stri ngdi mt str as stri ng ，strlas integertstf=strl=len(xstr)i =1 do while i ni =i -nloopprint iend suba.2b.4c.5d.37、复选框的value 属性为0时，表示该复选框()。a.未被选中b.被选中c.框内有灰色的勾d.操作有误8、在窗体上有一个名称为check1的复选框数组(含4个复选框)，还有一个名称为text1的文本框，初始内容为空。程序运行时，单击任何复选框，则把所有选中的复选框后面的方字罗列在文本框中(见图)。下面能实现此功能的事件过程是()。a.private sub check1_click(index as integer)text1.text =for k =0to 3if check1(k).value =1thentext1.text =text1.text &check1(k).caption &双引号中是空格 end if next kend subb.private sub check1_click(index as integer)for k =0to 3if check1(k).value =1thentext1.text =text1.text &check1(k).caption &双引号中是空格end ifnext kend subc.private sub check1_click(index as integer)text1.text = for k =0to 3 if check1(k).value =1thentext1.text =text1.text &check1(index).caption &双引号中是空格end ifnext kend subd.private sub check1_click(index as integer)text1.text = for k =0to 3if check1(k).value =1thentext1.text =text1.text &check1(k).caption &双引号中是空格exit forend ifnext kend sub9、在窗体上添加一个命令按钮，名为co mmand1，其单击事件中有下列程序段，则事件过程执行后，文本框中输出()。for i =1to 4for j=1to 3x=3for k =1to 2x=x+3next knext jnext itextl .text =str(x)a.3b.6c.9d.1210、下列关于sub 过程的叙述正确的是()。a.一个sub 过程必须有一个exit sub 语句b.一个sub 过程必须有一个end sub 语句c.在sub 过程中可以定义一个function 过程d.可以用goto 语句退出sub 过程11、下列叙述中正确的是( )。a.在窗体的form_load 事件过程中定义的变量是全局变量b.局部变量的作用域可以超出所定义的过程c.在某个sub 过程中定义的局部变量可以与其他事件过程中定义的局部变量同名，但其作用域只限于该过程d.在调用过程时，所有局部变量被系统初始化为0或空字符串12、编写如下两个事件过程：private sub form_keydown (keycode as integer，shift as integer)print chr(keycode)end subprivate sub form_keypress(keyascii as integer)print chr(keyascii)end sub在一般情况下(即不按住shift 键也未锁定大写键时)运行程序，如果按键盘上的a键，则程序输出的结果是()。a.aab.aac.aad.aa13、在窗体上画一个命令按钮，名称为co mmand1，然后编写下列代码：option base 0private sub co mmand1_click()di m a1(4)as integer ，a2(4)as integerfor k =0to 2a1(k +1)=inputbox(请输入一个整数)a2(3-k)=a1(k +1)next k print a2(k)end sub程序运行后，单击命令按钮，在输入对话框中依次输入2、4、6，则输出结果为()。a.0b.1c.2d.314、下面语句正确的是()。a.if xy then y =x3b.if xy then y =3xc.if xy then y =x3d.if xy then y =x*315、下面程序的输出结果是()。private sub co mmand1_click()ch$=abcdefproc ch ：print chend subprivate sub proc(ch as stri ng)s =for k =len(ch)to 1step -1s =s &mid(ch ，k ，1)next kch =send suba.abcdefb.fedcbac.ad.f16、语句di ma(-3to 4，3to 6)as integer 定义的数组元素个数是()。a.18b.28c.21d.3217、以下叙述中错误的是()。a.一个工程中只能有一个sub main 过程b.窗体的show 方法的作用是将指定的窗体装入内存并显示该窗体c.窗体的hide 方法和unload 方法的作用完全相同d.若工程文件中有多个窗体，可以根据需要指定一个窗体为启动窗体18、在窗体上先后画2个图片框，名称分别为picture1和banana，banana 中添加了香蕉图片，如图1所示，且将banana.drag mode 属性设置为1。要求程序运行时，可以用鼠标把banana 拖拽到picture1中，如图2所示。能实现此功能的事件过程是()。a.private sub form_dragdrop(source as control ，xas si ngle ，y as si ngle)banana . move picture1 . left +x，picture1 . top +yend subb.private sub banana_dragdrop(source as control ，xas si ngle ，y as si ngle)source . move picture1 . left +x，picture 1 . top +yend subc.private sub picture1_dragdrop(source as control ，x as si ngle ，y as si ngle)source . move picture1 . left +x，picture1 . top +yend subd.private sub picture1_dragdrop(source as control ，x as si ngle ，y as si ngle)banana . move banana . left +x，banana . top +yend sub19、用print 方法在forml 窗体中显示出4个#号的正确代码为()。a.debug .print#b.print#c.forml-print#d.forml .print#20、一个模块内部各个元素彼此结合的紧密程度的度量称为()a.耦合性b.内聚性c.复杂性d.数据传输特性21、函数值和余弦函数值，角度为1，2，3，90。请在空白处填入适当的内容，将程序补充完整。private type angk as integersi nx as si nglecosx as si ngleend typeprivate sub form_click()di m y as si ngledi mi as integerdi m ksc as angopen _y =3.14159/180for i =1to 90ksc .k =iksc .si nx=si n(i*y)ksc .cosx=cos(i +y)_next iclose #2elld stuba.datal .txtfor rando mas #1len =10 put #1，i ，kscb.datal .txtfor rando m as #1len =10 put #1，y ，kscc.datal .txtfor rando m as #1 put #1，i ，kscd.datal .txtfor rando m as #1 put #1，y ，ksc22、下列程序运行时输出的结果是()。option base 1const a=10private sub form_click0di mx(a)as integerk =-1for i =1to ax(i)=i*kk =(-1)*knext ifor i =1to 10print x(i)next iend suba.1 3 5 7 9 10b.-1-3-5-7-9c.-1 2-3 4-5 6-7 8-9 10d.1-2 3-4 5-6 7-8 9-1023、某人为计算n!(o=12)编写了下面的函数过程：private function fun(n as integer)as longdi m p as longp=lfor k =n -1to 2step -1p =p*knext kfun =pend function在调试时发现该函数过程产生的结果是错误的，程序需要修改。下面的修改方案中有3种是正确的，错误的方案是()。a.把p =1改为p =11b.把for k =n -1to 2step -1改为for k =1to n -1c.把for k =n -1to 2step -1改为for k =1to nd.把fo rk -n -1to 2step -1改为for k =2to n24、要设置窗体为固定对话框，并包含控制菜单栏和标题栏，但没有最大化和最小化按钮，设置的操作是()。a.设置borderstyle 的值为fi xed tool wi ndowb.设置borderstyle 的值为sizable tool wi ndowc.设置borderstyle 的值为fi xed dialogd.设置borderstyle 的值为sizable25、设在窗体上有一个文本框，然后编写如下的事件过程：private sub text1_keydown (keycode as integer ，shift as integer)const alt =4const key_f2=&h71altdown %=(shift and alt)0f2down %=(keycode =key_f2)if altdown %and f2down %thentext1.text =ablend ifend sub程序运行后，清除文本框中原有内容，如果按shift +f2键，则在文本框中显示的是( )。a.alt +f2b.ablc.随机出几个数d.不发生变化26、在窗体上画两个文本框(名称分别为text1和text2)和一个命令按钮(名称为co mmand1)，然后编写下列事件过程：private sub co mmand1_click()x=0do while x50x=(x+2)*(x+3)n =n +llooptext1.text =str(n)text2.text =str(x)end sub程序运行后，单击命令按钮，在两个文本框中显示的值分别为()。a.1和0b.2和72c.3和50d.4和16827、下列叙述中错误的是()。a.软件测试的目的是发现错误并改正错误b.对被调试的程序进行错误定位是程序调试的必要步骤c.程序调试通常也称为debugd.软件测试应严格执行测试计划，排除测试的随意性28、一个工程必须包含的文件的类型是( )。a.*.vbp*.frm*.frxb.*.vbp*.cls*.basc.*.bas*.ocx*.resd.*.frm*.cls*.bas29、在文本框中输入字符时，通过( )事件过程可以得到字符的ascii 码值。a.changeb.gotfocusc.keypressd.lostfocus30、在下列关系运算中，不改变关系表中的属性个数但能减少元组个数的是()。a.并b.交c.投影d.笛卡儿乘积31、有两个关系r ，s 如下：由关系r 通过运算得到关系s，则所使用的运算为()。a.选择b.投影c.插入d.连接32、一个栈的初始状态为空。现将元素1、2、3、4、5、a、b、c、d、e依次入栈，然后再一次出栈，则元素出栈的顺序是()。a.12345abcdeb.edcba54321c.abcdel2345d.54321edcba33、在窗体上建立通用对话框需要添加的控件是()。a.data 控件b.form 控件c.co mmondialog 控件d.vbcombobox 控件34、在窗体上画2个命令按钮，名称分别为co mmand1、co mmand2，然后编写下列事件过程。const n =5，m=4di ma(m，n)private sub co mmand1_click()k =1for i =1to mfor j=1to na(i ，j)=kk =k +1next jnext iend subprivate sub co mmand2_click()summ=0for i =1to mfor j=1to nif i =1or i =m thensumm=summ+a(i ，j)elseif j=1or j=n thensumm=summ+a(i ，j)end ifend ifnext jnext iprint summend sub过程command1_click()的作用是在二维数组a 中存放1个m 行n 列的矩阵;过程command2_click()的作用是()。a.计算矩阵外围一圈元素的累加和b.计算矩阵除外围一圈以外的所有元素的累加和c.计算矩阵第1列和最后一列元素的累加和d.计算矩阵第1行和最后一行元素的累加和35、下列关于复选框的说法，正确的是()。a.复选框的enabled 属性用于决定该复选框是否可见b.复选框的value 属性用于决定该复选框是否被选中c.复选框的tabi ndex 属性用于决定该复选框在控件数组中的序号d.复选框的visi ble 属性用于决定该复选框是否可用36、按照后进先出原则组织数据的数据结构是()。a.队列b.栈c.双向链表d.二叉树37、当一个复选框被选中时，它的value 属性的值是( )。a.3b.2c.1d.038、已知在4行3列的全局数组score(4，3)中存放了4个学生3门课程的考试成绩(均为整数)。现需要计算每个学生的总分，某人编写程序如下：option base 1private sub co mmand1_click()di msum as integersum=0for i =1to 4for j=1to 3sum=sum+score(i ，j)next jprint 第&i &个学生的总分是：;sum next iend sub运行此程序时发现，除第1个人的总分计算正确外，其他人的总分是错误的。程序需要修改。以下修改方案中正确的是()。a.把外层循环语句for i =1to 4改为for i =1to 3内层循环语句for j=1to 3改为for j=1to 4b.把sum=0移到for i =1to 4和for j =1to 3之间c.把sum=sum+score(i ，j)改为sum=sum+score(j，i)d.把sum=sum+score(i ，j)改为sum=score(i ，j)39、设有数组定义语句：di ma(5)as integer ，list1为列表框控件。下列给数组元素赋值的语句错误的是()。a.a(3)=3b.a(3)=inputbox(i nput data)c.a(3)=list1.listindexd.a=array(1，2，3，4，5，6)40、下列( )标识符不能作为visual basic 的变量名。a.abcabeb.b1234c.28wedd.crud二、基本操作题41、(1)在名称为form1的窗体上画一个命令按钮，名称为command1，标题为缩小一半。编写事件过程，程序运行后，如果单击command1命令按钮，则使command1按钮的长度和宽度各缩小到原来的一半。要求不得使用任何变量。程序运行时的窗体界面如图25-1所示。图25-1注意：保存时必须存放在考生文件夹下，窗体文件名为sj1.frm，工程文件名为sj1.vbp。(2)在名称为form1的窗体上画一个命令按钮和一个水平滚动条，其名称分别为command1和hscroll1。命令按钮的标题为滚动条变长。编写适当的事件过程，使得程序运行后，如果单击command1命令按钮，则使hscroll1水平滚动条的width属性减小1000，min属性为0，largechange的属性为100，smallchange的属性为20，且command1不可用，移动滚动条，在窗体上显示滚动条的位置值。不得使用任何变量。程序运行时的窗体界面如图25-2所示。图25-2注意：保存时必须存放在考生文件夹下，窗体文件名为sj2.frm，工程文件名为sj2.vbp。三、简单应用题42、(1)在窗体上画三个复选框，名称分别为ch1、ch2和ch3，标题分别为体育、音乐和美术，还有一个命令按钮，名称为c1，标题为显示。要求程序运行后，如果选中某个复选框，当单击显示命令按钮时，则显示相应的信息。例如，如果选中体育和美术复选框，单击显示命令按