一、基础填空题(15%,每空1分)1.VB集成发环境包括了数个独立的窗口。除必须的主窗口外,常用的还有窗体窗口、代码窗口、()窗口、工具箱窗口、对象浏览窗口、工程资源管理等窗口。2.VB有三种工作模式,它们分别是设计模式、中断模式和()模式。3.要使标签框的大小随着Caption属性的值进行扩展或缩小时,应将该控件的()属性设置为True。4.在VB中,为了方便阅读、调试和维护程序,常使用注释,注释使用的符号是()。5.表达式100+“100”&100的运算结果是()。6.表达式Len(“VB程序设计”)的值是()。7.将大写字母转换成小写字母,需使用的函数是()。8.工程文件文件的后缀是VBP、窗体文件的后缀是()。9.参与运算的两个量都是False,结果才会是False的逻辑运算符是()。10.要清除列表框中所有项,应使用的方法是()。11.单选按钮的Value属性是单选按钮的默认属性,该属性的数据类型是()。12.要使时钟(定时器)产生Timer事件的两个前提条件是:InterVal属性值大于0;Enabled属性值为()。13.窗体上已建立了一个通用对话框,对话框的名称(Name)属性为“CDC”,要显示“颜色”对话框的方法是()。14.VB控件的大部分属性即可通过属性窗口设置,又可通过()设置。15.在VB中,用OptionBase1说明后,DimA(5,5)声明的数组有()个元素。二、基础选择题(40%,每题1分)1.窗体有三个文本框(Text1、Text2、Text3),若Text1中输入456,Text2中输入78,程序执行了语句Text3=Text1+Text2后,则Text3显示()。A.534B.45678C.溢出D.语法错误2.窗体上有命令按钮“确定”,在代码窗口有与之相对应的OK_Click()事件过程,则命令按钮控件的名称属性和Caption属性分别为()。A.“OK”和“确定”B.“确定”和“OK”C.“Command1”和“确定”D.“Command1”和“OK”3.在VB中,能使Form1窗体隐藏的代码是()。A.Form1.HideB.Form1.ClsC.Form1.ShowD.Me.Cls4.表达式6.5*5Mod28\8的值是()。A.0B.1C.2D.35.下列叙述中错误的是()。A.VB是事件驱动型可视化编程工具B.VB工具箱中每个控件都有若干个属性C.VB语言编程不能和数据库结合起来D.VB中控件的某些属性只能在运行时设置6.在窗体上有一个名为Text1的文本框,可以改变Text1文本框高度的属性是()。A.TabIndexB.WidthC.HeightD.Text7.下列CaseX语句中,错误的是()。A.Case1To10B.CaseIs50C.CaseX50D.Case“Xie”8.设a=4.b=3,c=5,d=2,则表达式“abAndc=dOr2*ac”的值是()。A.TrueB.FalseC.-1D.09.工具箱中的BomboBox控件是指()。A.图象控件B.列表框控件C.文本控件D.组合框控件10.在窗体上发生Dblclick事件时,不可能伴随发生的事件是()。A.MouseUpB.MouseDownC.ClickD.Load11.语句“Print5*5\5/5”的输出结果是()。A.5B.25C.0D.112.下列关于变量的作用域的叙述中,不正确的是()。A.局部变量只能在定义它的过程中有效,超出此过程就无效B.全局变量只能用Public来定义C.可以用Private定义窗体/模块级变量D.全局变量可以先使用后定义13.下列关系表达式中,其值为False的是()。A.abcABCB.reade=readeC.Len(Visual)=6D.integerint14.在面向对象的方法中,类的实例称为()。A.集合B.方法C.对象D.模板15.InputBox函数返回值的类型为()。A.数值B.字符串C.变体D.数值或字符(视输入的数据而定)16.决定窗体标题栏显示内容的属性是()。A.TextB.NameC.CaptionD.BackStyle17.要使时钟控件Timer1的Timer事件不起作用,以下正确的语句是()。A.Timer1.Visible=FalseB.Timer1.Enabled=FalseC.Timer1.Interval=1000D.Timer1.Index=018.正确声明长度为25个字符的定长字符串变量S1的语句是()。A.DimS1AsStringB.DimS1AsString(25)C.DimS1AsString[25]D.DimS1AsString*2519.Var1%,Var1!,Var1$,Var1#分别声明Var1是()变量。A.整型、单精度、字符串、双精度B.整型、整型、字符串、双精度C.单精度、双精度、字符串、双精度D.整型、单精度、单精度、双精度20.使文本框获得焦点的方法是()。A.ChangeB.GotFocusC.SetFocusD.LostFocus21.列表框控件List1有若干列表项。能表示当前被选中的列表项内容的是()。A.List1.ListB.List1.ListIndexC.List1.IndexD.List1.Text22.VB中,可以同时删除字符串两端空格的函数是()A.Ltrim()B.Rtrim()C.Trim()D.Mid()23.在VB中,Print方法可以在下列对象中的()对象上输出数据。A.标签框B.列表框C.图形框D.文本框24.下列选项中,是VB事件的是()。A.ClsB.ClickC.CaptionD.Top25.在VB中,用语句DimA(-3To5)所声明的数组的元素有()个。A.6B.7C.8D.926.在VB中,要将一个窗体加载到内存但是不显示窗体,应使用的语句是()。A.HideB.UnLoadC.LoadD.Show27.窗体的下列属性属于逻辑类型的是()。A.CaptionB.BorderStyleC.EnabledD.BackColor28.在窗体上建立第一个文本框,则该文本框的默认名称是()。A.Lable0B.TextC.Text0D.Text129.在VB中,工程文件的扩展名为()。A..vbpB..frmC..dsD..bas30.在属性窗口中设置对象的属性时,通常采用的方式有()。A.直接键入属性值B.选择输入C.利用对话框D.以上方法都是31.VB中,组成对象的三要素是()。A.属性、方法、事件B.控件、窗体、代码C.窗体、模块、过程D.可视化、面向对象、事件驱动32.下列可作为VB中所允许数值型数据形式的是()。A.±25.74B.D32C.2.5ED.12E333.VB集成开发环境的主窗口不包括()。A.菜单栏B.状态栏C.标题栏D.工具栏34.一个变量未定义就使用,则该变量的类型为()。A.IntegerB.ByteC.BooleanD.Variant35.用于获取字符串MyStr变量中最右端3个字符的函数是()。A.Right(MyStr,3)B.RightTrim(MyStr,3)C.Rtrim(MyStr,3)D.RightStr(MyStr,3)36.以下VB程序段的输出结果是()。a=Sqr(3):b=Sqr(2):c=ab:PrintcA.-1B.0C.TrueD.False37.下列运算结果中,值最小的是()。A.6/3B.6\3C.6Mod3D.3Mod638.下列表达式能产生[2,50]之间的随机整数的是()。A.Int(Rnd(50)-2)B.2+Rnd(48)C.Rnd(50-2)D.Int(49*Rnd+2)39.能正确表示学习成绩(score)在75分和90分之间的表达式是()。A.score=75andscore=90B.score=75orscore=90C.score=75andscore=90D.score=75orscore=9040.VB程序设计采用的是()编程机制。A.结构化B.面向对象C.可视化D.事件驱动三、阅读程序选择题(20%,每题2分)1.程序运行后,单击命令按钮,则输出结果为()。PrivateSubCommand1_Click()PrintLabel1.Caption+Label2.CaptionEndSubPrivateSubForm_Load()Label1.Caption=111Label2.Caption=222EndSubA.111B.222C.333D.1112222.程序运行后,单击命令按钮,则输出结果为()。PrivateSubCommand1_Click()A=0:B=1A=A+B:B=B+APrintA;BA=A+B:B=B+APrintA;BEndSubA.12B.11C.13D.12353534343.程序运行后,单击命令按钮,则输出结果为()。PrivateSubCommand1_Click()ForK=0To18Step4X=X+4NextKPrintXEndSubA.24B.20C.16D.124.程序运行后,单击命令按钮,输出结果为()。PrivateSubCommand1_Click()x=5y=6IfNotx0Thenx=y-3Elsey=x+3EndIfPrintx;yEndSubA.56B.26C.59D.585.程序运行后,单击命令按钮,输出结果为()。PrivateSubCommand1_Click()S=0ForK=1To3ForJ=1To5S=S+1NextJNextKPrintSEndSubA.3B.5C.8D.156.程序运行后,单击命令按钮,输出结果为()。PrivateSubCommand1_Click()m1=1m2=3DoWhilem2=5m1=m1*m2m2=m2+2LoopPrintm1EndSubA.5B.10C.15D.207.程序运行后,输出结果为()。i=21:n=3DoWhileini=i-nLoopPrintIA.0B.3C.21D.248.程序运行后,单击命令按钮,输出结果为()。PrivateSubCommand1_Click()Dimxx=Int(Rnd)+5SelectCasexCase5Print“优秀”Case4Print“良好”Case3Print“及格”CaseElsePrint“不及格”EndSelectEndSubA.不及格B.及格C.良好D.优秀9.程序运行后,单击命令按钮,在对话框中输入6,输出的结果为()。PrivateSubCommand1_Click()Dimm%m=Val(InputBox(输入一个数))x=YY(m)PrintxEndSubFunctionYY(n)T=0ForK=1TonT=T+KMod2NextKYY=TEndFunctionA.2B.3C.4D.510.程序运行后,单击命令按钮,在窗体上显示是()。PrivateSubSS(X,ByValY,ByValZ)X=X+2Y=Y*3Z=X*YEndSubPrivateSubCommand1_Click()A=1B=2C=3CallSS(A,B,C)PrintA;B;CEndSubA.3618B.323C.1218D.363四、程序填空题(12%,每空2分)1.列表框List1中有若干列表项目,双击列表框List1中某个项目时,移去(删除)该项目。PrivateSubList1_DblClick()List1.(1)EndSub2.下列程序是单击窗体,输入一个整数,判定该数的奇偶性,在窗体上输出判定结果。PrivateSub(2)DimxAsIntegerx=InputBox(输入数字)If(3)ThenPrint偶数Else(4)EndIfEndSub3.下面程序的功能是:用Array函数建立一个含有8个元素的数组,在窗体上输出该数组中的最小值。OptionBase1Pri