VB程序设计期末模拟试卷

《VB程序设计》期末模拟试卷一、单项选择（b）1．被对象所识别的动作与对象可执行的动作分别称为对象的___________。A．方法、事件B．事件、方法C．事件、属性D．过程、属性（c）2．下列________是Single型变量。A．Time%B．Name$C．Sheight!D．CXYZ&（a）3．以下四个VB的变量名中，合法的是____________。A．X23B．$ReC．LenD．3xy（d）4．在程序中使用Dimstr1,str2AsLong语句对变量str1、str2进行声明后，下面正确的说法是________。A.str1是整型，str2是长整型B.str1是长整型，str2变体型C.str1、str2都是长整型D.str1是变体型，str2是长整型（b）5．表达式(&O3631)and(“A””B”)的结果是____________。A．TrueB．FalseC．”&O3631AB”D．&O3631（c）6．表达式“100”+100和表达式“100”&100的值分别是____________。A．200、200B．“100100”、“100100”C．200、“100100”D．“100100”、200（b）7．以下语句执行时，从键盘上输入Zhao，并按回车键。执行结果是________。DimaAsStringA=InputBox(Input,,Name)PrintaA．InputB．ZhaoC．NameD．空字符串（b）8．语句Print4+5\6*7/8Mod9的运行结果是________。A．4B．5C．6D．7（d）9．在窗体的通用段声明变量时，不能使用__________关键字。A．DimB．PublicC．PrivateD．Static（c）10．表达式Abs(-9)+Len(Iamastudent)的值是________。A．9IamastudentB．–9IamastudentC．23D．出错（a）11．设a为整型变量，不能正确表达数学关系10a15的VB表达式是_________。A．10a15B．a=11Ora=12Ora=13Ora=14C．a10Anda15D．Not(a=10)AndNot(a=15)（b）12．在窗体的“通用”部分用Private定义的变量，其作用域是_______。A．局部变量B．窗体/模块级变量C．全局变量D．静态变量（b）13．假设A=GoodMorning.，B=Afternoon,Boys.，则下列______表达式的结果等于GoodBoys.。A．Left(A,10)+Right(B,6)B．Left(A,5)+Right(B,5)C．Mid(A,1,5)+Mid(B,1,6)D．Mid(A+B,1,11)（a）14．执行下面的程序段后，X的值为________。X=3ForI=1To10Step–2X=x+I\3NextIA．3B．10C．-1D．4（a）15．在窗体上添加一个名称为Command1的命令按钮，然后编写如下程序：PrivateSubCommand1_Click()DimAAsIntegerStaticBAsIntegerClsB=2B=B+3A=3+APrintA,BEndSub程序运行时，三次单击命令按钮Command1后，窗体上显示的结果为_______。A．35B．66C．95D．33（d）16．下列_______事件不属于文本框的事件。A．ChangeB．KeyPressC．LostFocusD．DropDown（b）17．在程序中可以通过复选框和单选按钮的______属性值来判断它们的当前状态。A．CaptionB．ValueC．CheckedD．Selected（c）18．决定窗体标题条显示内容的属性是______。A．TextB．NameC．CaptionD．BackStyle（c）19．用户在组合框中输入或选择的数据可以通过一个属性获得，这个属性是______。A．ListB．ListIndexC．TextD．ListCount（b）20．在窗体上有两个文本框控件，名称分别为Text1和Text2，以下程序实现的功能是希望在文本框Text1中输入字符时，输入的字符也将出现在Text2文本框中。下划线处应填_______。PrivateSubText1__________()Text2.Text=Text1.TextEndSubA．SetFocusB．ChangeC．GetFocusD．Click（c）21．要把名称为List1的列表框中当前选中的一项删除，应执行______语句。A．List1.ClearB．List1.DeleteList1.ListIndexC．List1.RemoveItemList1.ListIndexD．List1.ClearList1.ListIndex（c）22．要使文本框能显示多行文字，则需设定它的_______属性为True。A．CaptionB．PasswordCharC．MultiLineD．Value（c）23．列表框的_______属性代表着列表框中项目的总数目。A．ListB．ListIndexC．ListCountD．Selected（d）24．用下面语句定义的数组元素个数是__________。DimArr1(-2To6)AsIntegerA．6B．7C．8D．9（d）25．当Form1_Click事件发生时，程序的输出结果是______。PrivateSubForm_Click()DimMAsInteger,kAsInteger,tAsIntegerM=6:k=8SelectCaseMCaseIs0M=M+5Case1To10t=M:M=k:k=tCaseIs10M=kMod3EndSelectPrintM,k,tEndSubA．668B．686C．868D．866（a）26．假定有以下程序段：ForI=1To3Forj=5To1Step–1PrintI*jNextj,I则语句PrintI*j的执行次数是______。A．15B．16C．17D．18（b）27．当拖动某对象A经过对象B时，将会发生对象B的_______事件。A．DragDropB．DragOverC．DragDownD．Drag（a）28．参数传递有按值传递和按地址传递，______关键字表示按值传递。A．ByValB．ByRefC．ValueD．Refrence（a）29．当Form_Click事件发生时，写出在窗体上显示的第二行和第三行是________。PrivateaAsInteger,cAsIntegerPrivateSubForm_Click()DimaAsInteger,bAsIntegera=10:b=10:c=10Printa,b,cCalltest1(a,b)Printa,b,cEndSubPrivateSubtest1(mAsInteger,ByValnAsInteger)DimcAsIntegerm=5:n=5:c=5Printm,n,cEndSubA．55551010B．5555510C．551051010D．555101010（c）30．如果想要名为MenuItem1的菜单项在运行时变灰显示，则应执行________语句。A．MenuItem1.Enabled=TrueB．MenuItem1.Checked=TrueC．MenuItem1.Enabled=FalseD．MenuItem1.Visible=False二、填空题1．设置对象属性的方法有两种，其一是在设计阶段，在____________中直接修改相应属性的值；其二是在应用程序运行时，通过____________来动态设置。2．书写程序时，要在一行内写多个语句，语句间用_______间隔；语句前有一个'(单引号)的语句是_________语句。3．写出数学式的VB表达式________________________。4．当用户增加、删除或修改文本框（TextBox）的内容时，都会触发文本框的____________事件。5．InputBox函数返回值的类型为________。6．可使用列表框的___________方法向列表框中增加一个项目。7．要使文本框Text1中显示的字符为宋体，使用的语句是_________________。8．组合框有三种不同的风格：下拉式组合框、____________和下拉式列表框，可通过它的_________属性进行设置。9．计时器事件之间的时间间隔通过___________属性设置。10．某菜单项显示出来的标题为“文件（F）”，那么在菜单编辑器中输入的标题应为_____________。11．在VB中，有三种文件访问的类型：顺序访问、____________和二进制访问。12．当采用手工拖放模式时，需要使用______方法来实现控件的拖放操作。13．在VisualBasic中，通用过程分为两类，Function和__________。14．VisualBasic的数组下标的下界默认为______，可通过___________语句使数组下标从1开始。15．表达式Abs(-32)+Int(-23.02)的值为_____8__________。16．下列程序执行时，从键盘上依次输入123和456，则程序的输出结果是123456PrivateSubForm_Click()A=InputBox(请输入第一个整数)B=InputBox(请输入第二个整数)Printa+bEndSub三、按要求填空1.下列程序执行时，要求输入一个密码，如果密码不正确则显示出非法用户的对话框。请填空：ConstPassWord=12345678DiminpassAsStringInpass=____________(请输入你的密码，输入密码)Ifinpass=PassWordThenExitSubElsemsgbox对不起！你是非法用户。UnloadMeEndIf2.以下程序的输出结果是______13______。X=12.7X=Int(x+0.5)PrintX3.下面程序的功能是求100~999之间的所有素数，所谓素数是指只能被1和它本身整除的数。PrivateSubForm_Click()DimiAsIntegerDimkAsIntegerFori=100To999Fork=2Toi-1If_____iModk=0______Then______ExitFor____EndIfNextkIf___k=i______ThenPrintiEndIfNextiEndSub4.下列程序的功能是：单击窗体时将随机生成12个三位正整数，分别赋给3*4的数组，找出数组中最大元素，并指出该元素所在的行和列。请填空。OptionBase1PrivateSubForm_Click()Dima(3,4)AsInteger,iAsInteger,jAsIntegerDimmaxAsInteger,max_iAsInteger,max_jAsIntegerRandomizeFori=1To3Forj=1To4a(i,j)=Int((999-100)*Rnd)+100NextjNextimax=_____a(1,1)____:max_i=1:max_j=1Fori=1To3Forj=1To4If______a(i,j)max______Thenmax=a(i,j)max_i=imax_j=jEndIfNextjNextiPrintmax,max_i,max_jEndSub5.编写一个对列表框进行项目添加、修改和删除操作的应用程序，如图1所示。列表框（名为lstBooks）中的选项在Form_load事件中加载。“添加”按钮（cmdAdd）的功能是将文本框（txtItem）中的内容添加到列表框中，“删除”按钮（cmdDelete）的功能是删除列表框中选定的项目。如果要修改列表框中的选项，可先