2021年Vb程序设计期末考试题库(附答案).docx

2023年Vb程序设计期末考试题库（附答案）目录习题一21、选择题22、判断题33、程序设计题3习题二41、单选题42 .判断题53 .程序设计题5习题三61选择题62 .程序阅读题（写出下列程序的运行结果）63 .程序填空题84 .程序设计题9习题四91选择题95 .程序阅读题（写出下列程序的运行结果）106 .程序填空题117 .程序设计题12习题五131选择题132 .程序阅读题（写出下列程序的运行结果）133 .程序填空题144 .程序设计题15习题六151选择题152 .程序填空题173 .程序设计题18习题七201选择题202 .程序填空题213 .程序设计题21习题八221判断题222 .单选题223 .填空题244 .程序填空24五、程序设计题26习题九261选择题:262 .填空题273 .程序阅读题283.编程题:29习题十291选择题292.程序设计题31习题参考答案33习题一1、选择题1.工程文件的扩展名为。A、.frxB、,basCnvbpD、,frm2.A、下列不属于对象的基本特征是属性B、方法C、事件D、函数3.A、在设计模式双击窗体将显示的窗口是一工程窗口B、工具箱C、代码窗口D、属性窗口4.A、VB中运行程序的快捷键是F2B、F5C、A1t+F3D、F85.A、改变控件在窗体中的上下位置应修改该控件的属性。TopB、1eftC、WidthD、RightA、,exeBn.basCnefrxD、frm7.A、设置窗体的字体用属性。FontNameB、FontSizeC、FontBo1dD、FontIta1icA、属性。FontNameB、FontSizeC、FontBo1dD、FontIta1ic9.A、下列选项中不属于事件的是ODb1c1ickB、1oadCnShowD、KeyUp10.VB编制的程序保存在磁盘上，至少会产生何种文件OA、B、C、D、2、判断题1 .ViSUa1BaSiC是以结构化的BaSiC语言为基础、以事件驱动作为运行机制的可视化程序设计语言。2 .面向对象的程序设计是一种以对象为基础，由事件驱动对象的编程技术。3 .事件是由ViSUa1BaSiC预先定义的对象能够识别的动作。4 .新建工程时系统会自动将窗体标题设置为Fonn1。5 .控件的属性值不可以在程序运行时动态地修改。6 .决定对象是否可见的属性为Visib1e属性，决定对象可用性的属性是Enab1ed属性。7 .保存Visua1Basic文件时，若一个工程包含多个窗体或模块，则系统先保存工程文件，再分别保存窗体或模块文件。8 .单击“启动”菜单项将窗体装入内存时，一定触发窗体的1Oad事件。9 .“事件过程”是用来完成事件发生后所要执行的程序代码。10 .在打开某窗体时，初始化该窗体中的各控件，应选用1oad事件。3、程序设计题1 .新建一个工程，单击窗体时，在窗体上显示“欢迎使用ViSUa1BaSiC程序:生成可执行文件，保存到D盘根目录下。2 .建立一个工程，界面如图1-28所示。它由一个窗体、两个文本框和两个命令按钮组成。单击“拷贝”按钮，可以将第一个文本框中显示的内容复制到第二个文本框中；单击“退出”按钮退出应用程序。图I-28题2界面图129题3界面3 .在窗体上添加一个标签和两个命令按钮，并把两个命令按钮的标题分别设置为“隐藏标签”和“显示标签二当单击第一个命令按钮时，标签消失；而当单击第二个命令按钮时，标签重新出现，并且标签中显示“VB程序设计二界面如图1-29所示。习题二1、单选题以下合法的Visua1Basic标识符是。A、For1oopB、ConstC、9abcD、A#x下列可作为ViSUa1BaSiC变量名的是。A、a#aB、4aC、?xyD、Consta表达式6*7/8Mod9的值是oA、4B、5C、6D、7将数学表达式cos2(a+b)+5e2写成Visua1Basic表达式，其正确的形式是A、cos(a+b)*2+5*Exp(2)B、cos*2(a+b)+5*Exp(2)C、cos(a+b)*2+5*1n(2)D、cos*2(a+b)+5*1n(2)数学关系3x<10表示成正确的VB表达式为oA、3<=x<10B、3<=xandx<10C、x>3orx<10D、3<=xand<10设x=4,y=8,z=7,表达式x<yand(noty>z)orz<x的值是。A、1B、-1C、TrueD>Fa1se已知变量a、b、C中C最小，下列判别a、b、c能否构成三角形的逻辑表达式为CA、a>=bandb>=candc>0B、a+c>bandb+c>aandc>0C、(a+b>=cora-b<=c)andc>0D、a+b>canda-b<candc>0下面进行算术运算符号的是oA、ImpB、ModC、NotD、1ike可以同时删除字符串前导和尾部空白的函数是oA、1trimB、RtrimC、TrimD、MidRnd函数不可能为下列值。A、OB、1C、D、Int(*100+)/100的值是oA、198B、C、D、200如果X是一个正实数，对X的第3位小数四舍五人的表达式是oA、*Int(x+)B、*Int(100*(x+)C.、*Int(100*(x+)D.、*Int(x+)执行语句S=Ien(Mid("Visua1BaSiC”，1,6)后，S的值为。A、Visua1B、BasicC、6D、11描述x、y中有一个小于z的逻辑表达式是o<zandy<z<zory<z<znoty<z<y<zInt(Rnd*100)表示的是范围内的数。A、0,100B、1,99C、0,99D、1,100输入对话框inputbox的返回值的类型是oA、字符串B、整数C、浮点数D、长整数在一行内写多个语句时，每个语句之间要用符号分隔。A、，B、；C、：D、一个语句要在下一行中继续书写，可以用符号作为续行符。A、+B、-C、_D、下列声明语句中错误的是二OA、Constvar1=123B、Dimvar2='abc,C、dima,basstringD、dimvar3asintegerPrintNot10>15And8<5+2的输出结果为。A、8B、7C、trueD、fa1se2 .判断题1用DIM定义数值变量时，该数值变量自动赋初值为0。2,整型数值常量有整数，长整数两种。3在逻辑运算符Not、Or、And中，运算优先级由高到低依次为NOt、Or、Ando4关系表达式是用来比较两个数据的大小关系的，结果为逻辑值。5一个表达式中若有多种运算，同一层括号内，计算机按逻辑运算一关系运算一算术运算的顺序对表达式求值。6赋值语句的功能是计算机表达式并转换为相同类型数据后为变量或控件属性赋值。3 .程序设计题1 .编写窗体的单击事件代码，求一任意三角形的面积，三角形的三条边a、b、C通过IrIPUtbOX函数输入，计算的结果存入S变量中，并以消息框的形式输出。提示：任意三角形的面积公式s1JfQ7)(力)七),t1(6f6/;(jC)/22 .编写一段代码，求给定的一个圆的周长和面积。要求：(1)圆的半径r利用Inputbox函数从键盘任意输入(r>0)。(2)圆周率定义为符号常量。(3)利用赋值语句将求出的周长和面积赋给变量1和S。(4)用Print方法输出详细结果。习题三1选择题1 .执行以下语句后的结果为ODimXAsIntegerIfXThenPrintxE1sePrintx-1A、1B、OC>-1D、不确定2 .下列关于SeIeCtCaSe测试表达式的叙述中，错误的是。A、只能是变量名B、可以是整型C、可以是字符型D、可以是浮点类型3 .,Y列关于Se1eCtCaSe的叙述中，错误的是。A、CaseIOToIOO表示判断Is是否介于10与IOO之间B、Case,'abc,'ABC,表示判断Is是否和“abc“、"ABC1两个字符串中的一个相同C、CasenX,表示判断IS是否为大写字母XD、Case-7,0,100表示判断IS是否等于字符串”7,O,Io(T4 .由aFori=1To16Step3”决定的循环结构被执行次。A、4B、5C、6D、75 .若i的初值为8,则下列循环语句的循环次数为次。DoWhi1ei<=17i=i+21oopA、3次B、4次C、5次D、6次6 .由“Fori=ITO9Step-3”决定的循环结构被执行次。A、4B、5C、6D、02.程序阅读题(写出下列程序的运行结果)程序1.请写出单击窗体后，窗体上的显示结果。PrivateSubForni_C1ick()DimxAsInteger,yAsIntegerx=5y=-20IfNotx>0Thenx=y-3E1sey=x+3Printx-y;y-xEndSub程序2.请写出单击窗体后，窗体上的显示结果。PrivateSubForm_C1ick()DimaAsString,bAsStringa=nabcdnb=,cdefne=Right(a,3)f=Mid(b,2,3)Ife<fThenPrinte+fE1sePrintf+eEndSub程序3.请写出单击窗体后，窗体上的显示结果。PrivateSubForm_C1ick()DimiAsInteger,jAsIntegerDimnAsIntegern=OFori=1To3Forj=5To1Step-1n=n+1Nextj,iPrintn;j;iEndSub程序4.请写出单击窗体后，窗体上的显示结果。PrivateSubForm_C1ick()DimiAsIntegerStaticSumAsIntegerFori=1To10Sum=Sum+iNextiPrintSumEndSub程序5.请写出单击命令按钮后，窗体上的显示结果。PrivateSubCommand1_C1ick()DimSAsInteger,iAsIntegers=1i=1DoWhi1ei<=4s=s*ii=i+11oopPrint,s=',5sEndSub程序6.请写出单击命令按钮后，窗体上的显示结果。PrivateSubCommand1_C1ick()DimiAsIntegerDoUnti1i>=3PrintTab(4*i+1);mAhi=i+11oopEndSub3.程序填空题÷-÷.÷(-1),+'-2!3!4!v7n1.【程序说明】下面是一段计算数学表达式的程序。PrivateSubForm_C1ick()DimnAsInteger,pAsInteger,sAsSig1e,qAsInteger,