2022年程序设计基础模拟复习题 .pdf

《2022年程序设计基础模拟复习题 .pdf》由会员分享，可在线阅读，更多相关《2022年程序设计基础模拟复习题 .pdf（10页珍藏版）》请在淘文阁 - 分享文档赚钱的网站上搜索。

1、一、是非判断题（每小题1分，共 15分） （判断下列各小题的叙述正确与否，如正确则在答题纸对应编号上填T，否则填 F）1DIM I，J As INTEGER 表明 I和J都是整型变量。（ F）2在 VB中保存工程文件时，系统默认的路径是VB的安装目录。（ T）3菜单中的每一菜单项都是控中，可以通过点击菜单项或通过光标选择并按回车键，以触发Click 事件。（T）4某一过程中的静态变量在过程结束后，静态变量及其值可以在其它过程中使用。（F）5控件的属性值不可以在程序运行时动态地修改。（F）6一个变量没有定义就赋值，该变量即为变体类型。（T）7在 VB的表达式中，运算符两端的数据类型要求一致。（F

2、）8VISUAL BASIC 程序的运行，仅能从某一窗体启动，如Form1窗体。（F）9CIRCLE 方法绘制扇形或圆弧图形时，图形的形状不仅与起始角、终止角的大小相关，而且与起始角、终止角的正或负相关。（T10事件过程由某个用户事件或系统事件触发执行，它不能被其它过程调用。（F）11VISUAL BASIC允许设计和使用用户自己设计的控什。（T）12在 VB中，窗体事件和其中所有控件事件的代码都放在窗体文件中。（T）13标签控件与文本框一样也能接收焦点。（F）14MSGBOX 函数的返回值为整型。（T）15在设计 VB程序时，窗体、标准模块、类模块等需要分别保存为不同类型的磁盘文件。（T）二

3、、单项选择题（每小题1分，共 15分）1VISUAL BASIC 6.0的三个工作模式是（16）。A启动模式、运行模式、调试模式B设计模式、运行模式、中断模式C执行模式、编译模式、解释模式D编辑模式、运行模式、调试模式2关于 VISUAL BASIC事件的说法中，不正确的是（17）。A事件是由 VISUAL BASIC预先定义好的，能够被对象识别的动作BDBLCLICK （双击）是 VISUAL BASIC中的一个事件C一个对象可以识别一个或多个事件D一个对象可以识别哪些事件，需要由程序员自己决定名师资料总结 - - -精品资料欢迎下载 - - - - - - - - - - - - - -

4、- - - - 名师精心整理 - - - - - - - 第 1 页，共 10 页 - - - - - - - - - 3以下控件中可以作为容器控件的是（18）。AIMAGE 图像框控件BPICTUREBOX 图片框控件CTEXTBOX 文本框控件DLISTBOX 列表框控件4下列变量名中不合法的是（19）。Aa$x Babcd# Ca DC_E 5表达式 INT(RND*71)+25的值的范围是（20）。A257l B25 90 C2595 D025 6以下 CASE语句中错误的是（21）。ACASE 0 TO 10 BCASE IS10 CCASE IS10 AND IS10 7执行语句

5、S=LEN(MID(V1SUAL BASIC, 1, 6)后， S的值是（ 22）A VISUAL BBASIC C11 D6 8一个工程中含有窗体FORMl 、FORM2 和标准模块 MODEL1 ，如果在 FORMl 中有语句 PUBLIC X AS INTEGER ，在 MODELl 中有语句 PUBLIC Y AS INTEGER 。则以下叙述中正确的是（23）。A变最 X、 Y的作用域相同BY的作用域是 MODEL1 C在 FORMl 中可以直接使用X和 YD在 FORM2 中可以直接使用X和 Y 9窗体上有一个文本框，名称为TEXTl ，程序运行后，要求该文本框只能显示信息，不能接

6、收输入信息，以下能实现该操作的语句是（24）。ATEXTl MAXLENGTH=0 BTEXT1 ENABLED=FALSE CTEXTl VISIBLE=FALSE DTEXTl WIDTH=0 10在窗体上画一个名称为TIMERl 的计时器控件，要求每隔0.5秒发生一次计时器事件，则以下正确的属性设置语句是（25）。AT1MERl INTERVAL=0.5 BTIMERl INTERVAL=5 CTIMERl INTERVAL=50 D TIMERI INTERVAL=500 11下列 FOR-NEXT 循环的循环体的执行次数为（26）。FOR I=l TO 11 I=I+5 NEXT I

7、 A2 B3 C4 D不确定12以下关于文件的叙述中，错误的是（27）。名师资料总结 - - -精品资料欢迎下载 - - - - - - - - - - - - - - - - - - 名师精心整理 - - - - - - - 第 2 页，共 10 页 - - - - - - - - - A顺序文件中的记录一个接一个地顺序存放。B随机文件中记录的长度是随机的。C执行打开文件的命令后，自动生成一个文件指针。DLOF函数返回给文件分配的字节数。13在窗体上画一个名称为COMMANDl 的命令按钮，然后编写如下事件过程：PRIVATE SUB COMMAND1_CLICK() A$=” VISUAL

8、 BASIC”PRINT STRING (3, A$) END SUB 程序运行后，单击命令按钮，在窗体上显示的内容是（28）。A VVVBVIS CSIC D 1l14下列函数中返回值是数值型的是（29）。ASPACE BMID CINSTR D CHR15下列循环不能正常结束的是（30）。AI=5 BI=l DO DO I=I+l I=I+2 LOOP UNTIL I0 LOOP UNTIL I=1 三、阅读分析程序（每个选择2分，共 40分）1 在窗体上画一个命令按钮，名称为 commandl。然后编写如下程序： （已知字母 “ A”的 ASCII 码为 65。）PRIVATE SUB

9、COMMANDl_CLICK( ) FOR I=1 TO 4 FOR J=0 TO I PRINT CHR$(65+I); &L1 NEXT J PRINT NEXT I END SUB （1）如果单击命令按钮，则在窗体上显示的内容是（31）。名师资料总结 - - -精品资料欢迎下载 - - - - - - - - - - - - - - - - - - 名师精心整理 - - - - - - - 第 3 页，共 10 页 - - - - - - - - - A BB B AB C AB D AA CCC ABC CDE BBB DDDD ABCD FGHI CCCC EEEEE ABCDE J

10、KLMN DDDDD （2） 如果将 &L1 处的语句改为： PRINT CHR$(65+J); 则单击命令按钮后，在窗体上显示的内容是（32） 。A BB B AB C AB D AA CCC ABC CDE BBB DDDD ABCD FGHI CCCC EEEEE ABCDE JKLMN DDDDD （3）整个循环执行完后，变量J的值是（ 33）。A 0 B 1 C 5 D随机值2阅读下面程序：PRIVATE SUB COMMANDl_CLICK ( ) DIM A AS INTEGER, B AS INTEGER A=36 B=16 PRINT F(A, B) &L1 PRINT A,

11、 B &L2 END SUB PUBLlC FUNCTION F (M , N ) &L3 DO WHlLE MN IF MN THEN M=M N ELSE N=N M END IF LOOP F=M END FUNCTION （1）语句 &Ll 处的输山结果是（34）。A 72 B 20 C 一 20 D 4（2）函数 FUNCTION F(M , N%) 的功能是（ 35）。A求出两个数的差B求出两个数的最大公约数C求出两个数的最小公倍数D求出两个数中的较大值（3）语句 &L2 处的输出结果是（36）。A 36 16 B 20 16 C 36 20 D 4 4 （4）若将语句 DIM A

12、 As INTEGER, B As INTEGER 去掉，则语句&Ll 处的输出结果是（37）。名师资料总结 - - -精品资料欢迎下载 - - - - - - - - - - - - - - - - - - 名师精心整理 - - - - - - - 第 4 页，共 10 页 - - - - - - - - - A 4 B 20 C 一20 D程序将报错（5）若将 &L3 处的语句改为PUBLIC FUNCTION F(BYVAL M, BYVAL N)，则语句 &L2 处的输出结果是（38）。A 36 16 B 20 16 C 36 20 D 4 4 3阅读下面程序：OPTION BASE

13、l PRIVATE SUB COMMANDl_CLICK ( ) DIM A, B(3, 3) A=ARRAY(1, 2, 3, 4, 5, 6, 7, 8, 9) FOR I=l TO 3 FOR J=1 TO 3 B(I, J)=A(I*J) IF (J=I) THEN PICTUREl. PRINT TAB(J*3); FORMAT(B(I,J),” # # #” ); &L1 NEXT J PICTUREl PRINT NEXT I END SUB （1）程序运行后输出的结果是（39）。A 1 B 3 6 9 C 1 2 3 D1 2 4 2 4 4 6 4 2 3 6 9 1 9 9

14、 6 3 （2）若将 &L1 处的语句中的IF(J=I ) 改为IF(J=I ) ，则程序运行后输出的结果是（40）。A 1B 3 6 9 C 1 2 3 D1 2 4 2 4 4 6 4 2 3 6 9 1 9 9 6 3 （3）该程序在窗体上至少设置了（41）个控件对象 ? A一个B二个C三个D四个4阅读下面群序：PRIVATE SUB FORM_CLICK () RANDOMIZE DIM A(10) AS INTEGER S=0 FOR K=1 TO 10 X=INT(RND*45+5)*2+1 A(K)=X 名师资料总结 - - -精品资料欢迎下载 - - - - - - - - -

15、 - - - - - - - - - 名师精心整理 - - - - - - - 第 5 页，共 10 页 - - - - - - - - - NEXT K PRINT FOR K=1 TO 10 N=INT(SQR(A(K) FOR J=2 TO N IF A(K) MOD J=0 THEN EXIT FOR NEXT J L0： IF J=N THEN A(K)=0 NEXT K FOR K=1 TO 10 PRINT A(K); IF A(K)0 THEN S=S+A(K) NEXT KPRINT S=; S END SUB （1）数组 A中的 l0个元素的初始值为（42）。A 分别为固定

16、的两位正整数B 1099 之间的随机数C 11-99 之间的随机奇数D 11-101之间的随机奇数（2）程序运行的结果S所表示的值是（43）。A A数组中所有数之和B A数组中所有非素数之和C A数组中所有偶数之和D A数组中所有素数之和（3）如果删除程序中的语句L0，则运行的结果S所表示的值是（44）。A A数组中所有数之和B A数组中所有非素数之和C A数组中所有偶数之和D A数组中所有素数之和5阅读以下函数过程：FUNCTION FACT(N) S=0 FOR K=1 TO N S=S+(K+1)*K NEXT K FACT=S END FUNCTION （1）判断以上函数的功能是（45

17、）。A计算 N! B计算 1*2*2*3*3 ,*N*N C计算 l*2+2*3 十3*4 ,+(N+1)*N D计算 1+2+3+, 十N （2）该函数的返回值类型是（46）。名师资料总结 - - -精品资料欢迎下载 - - - - - - - - - - - - - - - - - - 名师精心整理 - - - - - - - 第 6 页，共 10 页 - - - - - - - - - A 整型B单精度型 C 双精度型D 变体类型（3）若将该函数过程的功能改由SUB过程实现，刚至少需要（47）形参。A 一个B 二个C 三个D 四个6阅读下面程序：PRIVATE SUB COMMANDl_

18、CLICK () DIM A(10) OPEN APP PATH+ ” FILEl DAT”FOR OUTPUT AS #l FOR I=l To 10 X=VAL(INPUTBOX(“ DATA ： ” ) WRITE #1, X NEXT I CLOSE #1 OPEN APP PATH+ ” FILEl DAT”FOR INPUT AS #1 FOR I=1 TO 10 INPUT #1, X A(I)=X PRINT A(I) ；NEXT I PRINT FOR I=1 TO 9 K=I FOR J=I+l T0 10 IF A(K)A(J) THEN K=J NEXT J IF KI

19、 THEN T=A(K) A(K)=A(I) A(I)=T END IF NEXT I FOR I=1 TO 10 PRINT A(I) ；NEXT I END SUB （1）语句“ OPEN APPPATH+” FILEl DAT ” FOR INPUT AS #1”表示（ 48）。A 以读的方式打开顺序文件B 以追加方式打开顺序文件C 以读的方式打开随机文件D 以随机读写的方式打开随机文件（2）语句“ X=VAL(INPUTBOX(“ DATA ：” )”中， Val () 函数的功能是（49）。A 输入字符串B 输入数值名师资料总结 - - -精品资料欢迎下载 - - - - - - -

20、 - - - - - - - - - - - 名师精心整理 - - - - - - - 第 7 页，共 10 页 - - - - - - - - - C 将字符串转换为数字数值D 将数字数值转换为字符串（3）如果将 IF A(K)A(J) THEN K=J改为IF A(K)=0.00001) S=S+T T= (4) N=N+1 LOOP END SUB 2下面程序的功能是随机产生6个整数（其值均在20, 80 之间），找出最大数和最小数所在的位置，并把两者对调，然后输出调整后的6个数。PRIVATE SUB COMMAND1_CLICK() DIM A(5) AS INTEGER, MAXI

21、 , MINI , I , TFOR I=0 TO 5 A(1)= (5) NEXT I 名师资料总结 - - -精品资料欢迎下载 - - - - - - - - - - - - - - - - - - 名师精心整理 - - - - - - - 第 8 页，共 10 页 - - - - - - - - - MINI=0 MAXI=0 FOR I=0 TO 5 IF (6) THEN MINI=I ELSEIF A(I)A(MAXI) THEN MAXI=I END IF NEXT I T=A(MAXI) (7) A(MINI)=T FOR I=0 TO 5 PRINT A(I); (8) EN

22、D END 3将C盘根目录下的一个文本文件OLD.DAT 复制到新文件NEW.DAT 中。PRIVATE SUB COMMAND1_CLICK () DIM STR1$ OPEN “ C:OLD.DAT ”For input (9) AS #1 OPEN “ C:NEW.DAT ”(10) DO WHILE (11) (12) PRINT #2, STR1 LOOP CLOSE #1, #2 END SUB 4下列函数过程的功能是：求变量s（s=a+aa+aaa+aaaa+ , ）的值。其中，a是一个 09的数字，总共累加a项。例如：当a=3时， s=3+33+333 (共累加 3项) 、当a

23、=5H寸， s=5+55+555+5555+55555 (共累加 5项)。请完善程序：PUBLIC FUNCTION CALC(A As INTEGER) S=A T=A FOR I=2 TO (13) T= (14) S=S+T NEXT I (15) END FUNCTION 名师资料总结 - - -精品资料欢迎下载 - - - - - - - - - - - - - - - - - - 名师精心整理 - - - - - - - 第 9 页，共 10 页 - - - - - - - - - 【参考答案】 ：名师资料总结 - - -精品资料欢迎下载 - - - - - - - - - - - - - - - - - - 名师精心整理 - - - - - - - 第 10 页，共 10 页 - - - - - - - - -