2001年(秋)二级VB笔试卷参考答案

1、2001年（秋）二级vb笔试卷参考答案第一部分 计算机基础知识1. 对于任意一个实数，在计算机内部都可以用_1_两部分来表示，这种表示实数的方法叫做“浮点表示法”。a. 指数和尾数b. 指数和基数c.整数和指数d.基数和小数2. 目前计算机中使用最广泛的西文字符编码集是ascii码集。在ascii码表中，可打印（或显示）的字符有_2_个。a. 55b. 75c. 95d. 1253. 在中文windows95/98环境下，设有一串汉字的内码为 b5 c8 bc b6 bf bc ca d4，则这串文字包含有_3_个汉字。 a. 2b. 4c. 8d. 184. 一台计算机中可以有“寄存器快存主

2、存辅存（磁盘）后援（海量）存储器”五种不同层次的存储器。其中_4_的存取周期目前在毫秒级。a. 快存b.主存c. 磁盘d. 后援（海量）存储器5. 以下是pc机所采用（过）的一些总线标准，其中_5_数据总线仅有16位宽。a. mcab.isac. eisad. pci6. 显示器是计算机重要的输出设备，它用红、绿、蓝三基色的组合来显示彩色，使用_6_位二进制z表示一个象素就可以表现出真彩色。a. 8b.16c. 24d. 327. 软件工程的思想就是使用工程化的概念、思想、方法和技术来指导软件开发的全过程。在软件的开发过程中，软件设计一般分为两步，即_7_。a. 总体设计和详细设计b. 算法设

3、计和程序设计c. 流程设计和程序设计d. 结构设计和模块设计8. 下列有关“计算机病毒”的叙述中，正确的是_8_。 a. 计算机病毒是一种对计算机系统造成一定损害的程序文件b. 光盘（cd-rom）虽然是只读型存储器，但也可能含有计算机病毒c. 计算机病毒破坏机制的激活总是与日期或时间有关d. “杀毒”软件（如kill等）不可能被计算机病毒感染9. windows me windows ce windows nt frontpage 98 access 97 unix linux ms-dos 6.22 os/2，对于以上列出的9个软件，_9_均为操作系统软件。a. b. c. d. 10.

4、在计算机网络中，目前不用中继设备时，传输距离最远的传输介质是_10_。a. 双绞线b. 同轴电缆c. 红外线d. 光缆11. vcd盘上的视频和音频信号采用国际标准_11_进行压缩编码，它们按规定的格式交错地存放在光盘上，播放时需进行压缩处理。a. mpeg-1b. mpeg-2c. mpeg-3d. mpeg-412. 在多媒体计算机中，声音信息处理后通常保存为下列类型的文件，其中_12_类型的文件通常是音乐文件。 a. .wav（文件大）b. .sndc. .midd. .aif13. 在使用windows 98操作系统时，下列叙述中正确的是_13_。a. fat 32支持磁盘压缩b. f

5、at 16仅支持2gb以下的硬盘分区c. windows 98仅支持fat 16d. windows 98仅支持fat 3214. 在关机时如果未正常地关闭windows 95/98，则下次开机后系统将首先自动地运行_14_。a. 注册表检测程序b. 磁盘清理程序c. 磁盘碎片整理程序d. 磁盘扫描程序15. 剪贴板是windows 提供的用于在不同应用程序间交换数据的工具。在windows 95/98环境下，下列有关剪贴板的叙述中正确的是_15_。 a. 剪贴板中同时可以保存多次复制的信息b. 只要剪贴板中有信息，则一定可以粘贴二次以上c. 按组合键alt+printscreen可以将当前屏

6、幕以图片形式复制到剪贴板d. 剪贴板中可以同时保存文本信息和图片信息16. 在windows95/98的环境下，下列叙述中正确的是_16_。 a. 利用“网上邻居”可以浏览网上其它计算机内的所有软件资源b. 用户可以利用“控制面板”中的“添加/删除程序”来创建启动盘c. 用户可以利用“控制面板”中的“字体”来设置汉字输入法特性d. 运行dos应用程序必须首先启动“ms-dos”方式17. 在word 7.0/97的编辑状态下，如果文档窗口有水平标尺，则说明当前的视图方式一定为_17_。a. 普通视图方式b. 页面视图方式c. 大纲视图方式d. 普通视图方式或页面视图方式18. 用word 7.

7、0/97编辑的文档，不可以保存为文件扩展名为_18_的文件。 a. .rtfb. .docc. .htmd. .xml19. internet将所有入网主机的名字空间划分为许多不同的域，每个域又划分为若干个子域，子域又分成多个子域，主机名字即由一系列的“域”和“子域”组成。下列关于主机名字的叙述中，不正确的是_19_。 a. 所包含的子域名的个数通常不超过5个b. 从左到右，子域的级别依次升高c. 子域名之间可用“.”（点符号）或“/”（斜杠符号）进行分隔d. dns用于主机名字与ip地址之间的自动转换20. 假设接入internet的某用户的用户名为liu213，提供电子邮件服务的服务器域名

8、为，则该用户相应的e-mail地址为_20_。a. liu213b. liu213c. liu213md. liu213第二部分 visual basic 程序设计（2001 年 秋季）一、选择题（用答题卡答题，答案依次填在21-30答题号内）21. 窗口上有多个控件，在 form_activate() 事件过程添加_21_语句，就可确保每次运行程序时，都将光标定位在文本框text上。a. text1.text=""b. text1.setfocusc. form1.setfocusd. text1.visible=true22. 在程序中分别将变量inta、bl、st、d

9、定义为整型、布尔形、字符串型和日期型，下列赋值语句在执行时会出错的是_22_。a.inta=4.6b.bl=#true#c.st=5&123.5d.d=#10/05/01#23.代数表达式对应的visual basic表达式是_23_。a. sqr(x+log(x)/(a+b)+exp(-2*t)+cos(x+y)/2)b. sqr(x+log(x)/(a+b)+exp(-2*t)+cos(x+y)/2)c. sqr(x+ln(x)/(a+b)+exp(-2t)+cos(x+y)/2)d. sqr(x+log(x)/(a+b)+exp(-2*t)+cos(x+y/2)24. 以下有关变

10、量作用域的说法中 ，正确的是_24_。a. 只有在标准模块中用public语句说明的变量才是全局变量b. 在过程中不能使用public语句说明全局变量c. 在标准模块的通用声明处可用private语句说明模块级变量d.在窗体的通用声明处可用private语句说明窗体级变量25. 语句print "5*20"输出的结果是_25_。a. "5*20"b. 出现错误信息c. 5*20d. 10026. 下列不正确的变量名是_26_。a. formb. commandc. textd. arry27. 若磁盘文件c:data1.dat不存在，下列打开文件语句中，

11、会产生错误的是_27_。a. open "c:data1.dat" for output as #1b. open "c:data1.dat" for input as #2c. open "c:data1.dat" for append as #3d. open "c:data1.dat" for binary as #428. 改变目录列表框(dirlistbox)控件的path属性的途径可以有_28_。单击目录列表框某一项程序代码中改变目录列表框的path属性值双击目录列表框某一项 在程序中用chdir命令设

12、置当前工作目录a. b. c. d. 29. 以下有关数组的说明中，错误的是_29_。a. 根据数组说明的方式，可将数组分为动态数组和静态数组b. 在过程中，不能用private语句定义数组c. 利用redim语句重新定维时，不得改变已经定义说明过的数组的数据类型d. 数组重新定维后，原有的数组元素内容将不予保留30. 窗体的name属性为frm1,在窗体模块通用声明处和过程sub1中分别用public k as integer, dim k as integer声明了两个同名变量k，则在过程sub1中要访问全局变量k，可采用_30_。a. frm1.kb. form.kc. form1.kd

13、. k31. 名为sort的sub子过程的形式参数为一数组，以下的定义语句中正确的是_31_。a. private sub sort(a() as integer)b. private sub sort(a(10) as integer)c. private sub sort(byval a() as integer)d. private sub sort(a(,) as integer)32. 可以在_32_中，使用语句public pubstr as string*20定义一个定长字符串。a. 窗体模块b. 标准模块c. 类模块d. 三者均可33. 以下有关由多个窗体和标准模块组成的应用程

14、序设计方法的叙述中，错误的是_33_。a. 在缺省情况下，设计时的第一个窗体被指定为启动窗体b. 通过人为设置，可指定任一窗体为启动窗体c. 通过人为设置，可指定标准模块中的main()过程为启动过程d. 通过人为设置，可指定窗体模块中的main()过程为启动过程34. 在过程中由语句for i=n1 to n2 step n3，在该循环体内有下列四条语句，其中_34_会影响循环执行的次数。n1=n1+in2=n2+n3 i=i+n3 n3=2*n3a. b.c. d. 35. 在窗体form1上，有一个列表框控件list1，在窗体的click事件中有如下代码：private sub form

15、_click() dim k as integerdim entry as string, item as stringentry="edcba"for k=len(entry) to 1 step -1item=lcase(mid(entry,k,1)&klist1.additem itemnext kend sub运行此程序，单击窗体后在窗体的列表框中显示的第四个列表项内容是_35_。a. b4b. b2c. d4d. d2二、填空题（请把答案填写在答题纸的相应答题号内，每个答题只占一行）1. 执行下面的程序，在窗体上显示的输出结果的第一行是_this is a

16、 book._，第二行结果是_this is a book._。option explicitprivate sub form_click()dim s as string,i as integer,flag as booleans="this is a book."s=lcase(s)print sflag=truefor i=1 to len(s)if mid(s,i,1)="" thenflag=trueelseif flag thens=left(s,i-1)&ucase(mid(s,i,1)&right(s,len(s)-i)f

17、lag=falseend if next iprint send sub2. 执行下面的程序，在窗体上显示的输出结果的第二行是_4 9 13_，第三行结果是_19.5_。option explicitdim a as integer,b as integerprivate sub form_click()dim c as integera=1b=3c=5print fun(c)print a,b,cprint fun(c)end subprivate function fun(x as integer)as singlefun=a+b+x/2a=a+bb=a+xx=b+aend functio

18、n3. 执行下面的程序，第一行输出结果是_18_，第二行输出结果是_30_。option explicitprivate sub form_click()dim m as integer,n as integerm=1:n=2print m+n+fun1(m,n)m=2:n=1print fun1(m,n)+fun1(m,n)end subprivate function fun1(x as integer,y as integer)x=x+yy=x+3fun1=x+yend function4. 执行下面程序，在窗体上显示的输出结果的第二行是_4 5 6_，第五行是_9 8 7_，第六行是_

19、6 5 4_。option explicitprivate sub form_click()dim a(3,3) as integer, ias integerdim j as integer,k as inteherfor i=1 to 3 for j=1 to 3 a(i,j)=(i-1)*3+jprint a(i,j);next jprintnext iprintk=(i-1)*3for i=1 to 3for j=1 to 3a(i,j)=kk=k-1print a(i,j);next jprintnext iend sub5. 执行下面的程序，在窗体上显示的第一行输出结果是_1 3

20、5 7 9_，第三行输出结果是_4_, form_click()事件过程中的第二个for-next循环共执行了_2_次。option explicitoption base 1private sub form_click()dim a(5) as integer,i as integer,j as integerfor i=1 to 5a(i)=2*i-1print a(i)next iprint for j=1 to i-2call sub1(a(j),j)print jnext jend subpublic sub sub1(x as integer,p as integer)if x-p

21、<=2 thenp=p+1elsep=p+2end ifend sub6.下面程序的功能是统计随机产生的十个两位正整数中偶数于奇数的个数，并求出偶数与奇数各自的总和。option explicitprivate sub form_click()dim x as integer， s1 as integer，s2 as integerdim n1 as integer， n2 as integer，i as integerrandomizefor i=1 to 10x=int(rnd*90)+10print xif _x mod 2=0_thenn2=n2+1s2=s2+xelse_n1=

22、n1+1_s1=s1+xend if next iprintprint "奇数个数="n1,"偶数个数="n27. 下面程序功能为：单击命令按纽command1，找出100以内的所有约数之和为一个完全平方数的正整数，并按图中所示的格式将结果显示在图形框picture1中。option explicitprivate sub command1_click()dim i as integer，j as integer dim f() as integer，sum as integerfor i=3 to 100_sum=0_if fac(i,f,sum) t

23、henpicture1.print i; ":"for j=1 to ubound(f)-1picture1.print f(j); "+"next jpicture1.print f(j); "=" sum; "=" sqr(sum); "2"end ifnext iend subprivate function fac(byval k as integer，a() as integer，sum as integer) as booleandim n as integer，j as integ

24、erfor n=1 to kif_k mod n=0_thenj=j+1_redim preserve a(j)_a(j)=nsum=sum+nend ifnext nif sum=_int(sqr(sum)2_then fac=trueend function8. c盘根目录下文件data4.txt的内容是：2，4，6，8，10，1，3，5，7，9。下面程序的功能是将文件后半部分的奇数分别按序插入到前半部分的适当位置，得到的新数列是：1 2 3 4 5 6 7 8 9 10。（实现方法：第一次调整后的数列是：1 2 6 8 10 3 5 7 9第二次调整后的数列是：1 2 3 4 6 8 1

25、0 5 7 9）。option explictprivate sub form_click()dim a(10) as integer,i as integer,j as integeropen "c:data4.txt" for input as #12do _while not eof(12)_j=j+1input #12,a(j)loopcall insert(a)for i=1 to 10print a(i)next iprintclose #12end subprivate sub insert(a() as integer)dim i as integer,putp as integer,j as integerdim getp as integer,n as integer,tem as integern=u