vb试题及答案

一、选择题（1-30题每小题1分，共30分，31-45题每小题2分,共30分，总计60分）1、()要使窗体Form1的标题栏中显示“正在复制文件…”，正确的语句是：aA．Form1.Caption=“正在复制文件…”B．Form1.Title=“正在复制文件…”C．Form1.Text=“正在复制文件…”D．Form1.名称=“正在复制文件…”2、()如果要求设置定时器时间间隔为1秒钟，那么它的Interval属性值应该等于：aA．1000B．100C．10D．13、下列关于控件的基本操作中，错误的是A)当控件处于活动状态时，可以对控件进行缩放B)在设计阶段不能移动控件C)VisualBasic6.0允许对画好的控件进行复制和删除D)可以通过属性窗口改变控件的位置和大小4、用VisualBasic开发应用程序的一般步骤有：①设置窗体和控件的属性、②编写代码、③建立用户界面，其中正确的顺序是：A)①②③B)①③②C)③②①D)③①②5、为使文本框只能显示不能输入，即只读，应设置文本框的属性是：cA．MaxLength设置为0B．Cancel设置为TrueC．Locked设置为TrueD．Read设置为True6、InputBox函数返回值的类型为。BA．数值B．字符串C．变体D．数值或字符串（视输入的数据而定）7、为了把焦点移到某个指定的控件，所使用的方法是：AA．SetFocusB．VisibleC．ReFreshD．GetFocus8、函数String(3,”str”)的功能是：bA．把数值型数据转换成字符串B．返回有3个字符串组成的字符串C．从字符串中第3个字符D．从字符串中第3个字符的位置开始取字符串9、双击窗体中的对象后，VisualBasic将显示的窗口是：cA．项目（工程）窗口B．工具箱C．代码窗口D．属性窗口10、用于获得字符串s最左边4个字符的函数是：aA．Left(s,4)B．Left(1,4)C．LeftStr(s)D．LeftStr(3,4)11、以下程序段的输出结果是：da=Sqr(3)b=Sqr(2)c=abPrintcA．-1B．0C．FalseD．True12、用下面语句定义的数组的元素个数是：cDimA(-4to6)AsIntegerA．6B．7C．11D．913、若x=-5，执行IfxThenx=0Elsex=1的结果为：dA．实时错误B．编译错误C．x=1D．x=014、列程序段的循环结构执行后，i的输出值是：cFori=1To10Step2y=y+iNextiPrintiA．25B．10C．11D．因为y的初值不知道，所以不确定15、可以用作其他控件容器的控件有：cA．窗体、列表框、图像框B．窗体、文本框、框架C．窗体、框架、图片框D．窗体、标签、图片框16、以下不属于VisualBasic支持的循环结构的是：dA．For…NextB．ForEach…NextC．Do…LoopD．While…End17、下列可以打开立即窗口的操作是：DA．Ctrl+DB．Ctrl+EC．Ctrl+FD．Ctrl+G18、下列可作为VisualBasic变量名的是A）A_3B）4AC）?xyD）Integer19、设a=8，b=5，执行语句Printab后，窗体上显示的是A）TrueB）FalseC）1D）出错信息20、以下能够触发文本框Change事件的操作是A)文本框失去焦点B)文本框获得焦点C)设置文本框的焦点D)改变文本框的内容21、列表框图标的英文名称是A)ListBoxB)ComboBoxC)FrameD)CommonDialog22、下列类型说明符中表示整型的是A)%B)!C)$D)&23、执行下列语句a$=abcdefg:PrintLen(a$)后，在窗体上输出的结果是A)1B)2C)7D)1424、文本框不具有的属性是A)CaptionB)textC)leftD)font25、设a=6，则执行x=IIf(a5,1,2)后，x的值为：A)1B)2C)5D)026、语句Print5/4*6\5Mod2的输出结果是A)0B)1C)2D)327、滚动条控件的largeChange属性所设置的是A）滚动条所能表示的最小值B）滚动条所能表示的最大值C）单击滚动条中滚动框前面或后面的部位时，Value属性增加或减小的增量值D）单击滚动条两端的箭头时，Value属性增加或减小的增量值28、按钮控件数组元素是：cA．共享一个事件过程的B．只共享一个Click事件过程的C．共享该控件的所有事件过程D．各自有自己的部分事件过程29、有如下的记录类型TypestudentidAsStringnameAsStringageAsIntegerEndType则正确引用该记录类型变量的代码是：BA．student.name=”Sias”B．DimsAsstudents.mane=”Sias”C．DimsAstypestudents.name=”Sias”D．DimsAstypes.name=”Sias”30、有如下语句：dstr1=InputBox(“输入”,””,”联系”)从键盘上输入字符串“学生”后，str1的值为：A．“输入”B．“”C．“联系”D．“学生”31、在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程：CPrivateSubCommand1_Click()s=2Forn=1To6IfnMod30Thens=s+1NextnPrintsEndSub程序运行后，如果单击命令按钮，则窗体上显示的内容是A）2B）5C）7D）632、在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程：BPrivateSubCommand1_Click()DimnumAsIntegernum=1DoUntilnum6num=num+2LoopPrintnumEndSub程序运行后，单击命令按钮，则窗体上显示的内容是A）6B）7C）8D）933、在窗体上画一个命令按钮，名称为Command1，然后编写如下事件过程：OptionBase0PrivateSubCommand1_Click()DimkmAsVariantkm=Array(音乐,体育,化学,物理)Printkm(2)EndSub程序运行后，如果单击命令按钮，则在窗体上显示的内容是A）音乐B）体育C）化学D）物理34、以下程序代码正确的是：A)Ifa=1Thenb=0Elsec=0EndIfB)Ifa=1Then:b=0:ElseIfc=0EndIfC)Ifa=1Thenb=0Elsec=0EndIfD)Ifa=1Thenb=0ElseIfc=0d=0EndIf35、在窗体中添加一个命令按钮Command1，并编写如下程序：PrivateSubCommand1_Click()dimxasintegerx=InputBox(x)Ifx^2=9Theny=xIfx^29Theny=1/xIfx^29Theny=x^2+1PrintyEndSub程序运行后，在输入对话框中输入3，单击命令按钮，程序的运行结果是A．3B．0.33C．17D．0.2536、以下关于过程及过程参数的描述中，错误的是A）过程的参数可以是控件名称B）用数组作为过程的参数时，使用的是“传地址”方式C）只有函数过程能够将过程中处理的信息传回到调用的程序中D）窗体可以作为过程的参数37、在窗体上添加一个命令按钮，名为command1，事件过程为：PrivateSubcommand1_Click()x=0DoUntilc=-1a=val(InputBox(“输入a的值”))b=val(InputBox(“输入b的值”))c=val(InputBox(“输入c的值”))LoopPrintaEndSub程序运行后，单击命令按钮，依次在输入对话框中输入5，4，3，2，1，-1后，输出的结果是aA．2B．3C．4D．538、窗体有一个名为text1的文本框，执行如下语句后，文本框中的内容为：CForj=1To3x=3Fork=1To2x=x+3NextkNextjtext1.Text=Str(x)A．3B．6C．9D．1239、以下定义数组或给数组元素赋值的语句中，正确的是A)DimaAsVarianta=Array(1,2,3,4,5)B)Dima(10)AsIntegera=Array(1,2,3,4,5)C)Dima%(10)a(1)=ABCDED)Dima(3),b(3)AsIntegera(0)=0a(1)=1a(2)=2b=a40、在窗体上画一个命令按钮，名称为Command1，单击命令按钮时，执行如下事件过程：PrivateSubCommand1_Click()a$=MicrosoftVisualBasicb$=Mid(a$,1,9)c$=Right(a$,5)MsgBoxa$,,b$,c$,1EndSub则在弹出的信息框的标题栏中显示的信息是A）VisualB）MicrosoftC）BasicD）141、在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮，然后编写如下事件过程：DOptionBase1PrivateSubCommand1_Click()DimsAsIntegerDimaa(3,2)AsIntegerFori=1To3Forj=1To2aa(i,j)=i+jNextjNextis=aa(1,2)+aa(2,1)PrintsEndSub程序运行后，单击命令按钮，窗体上显示的值是A)4B)5C)6D)742、以下叙述中错误的是dA）双击鼠标可以触发DblClick事件B）控件的名称可以由编程人员设定C）文本框可以获得焦点D）窗体或控件的事件过程的名称可以由编程人员确定43、设窗体上有一个列表框控件List1，且其中含有若干列表项。则以下能表示当前被选中的列表项内容的是A）List1.ListB）List1.ListIndexC）List1.TextD）List1.Index44、PrivateSubCommand1_Click()dimIasintegerdimxasintegerx=0ForI=1to5x=x+2Ifx4ThenexitfornextIprintxEndSub程序运行后，单击命令按钮，窗体上显示的是A)1B)6C)5D)745、有如下定义Subtest(a(),b())…EndSub下列调用语句中正确的是：A)calltest(a(),b())B)calltesta(),b()C)calltesta()D)test(a(),b())二、填空题（每空2分，共40分）（1）假定一个文本框的Name属性为Text1，为了在该文本框中显示“Hello!”，应使用什么语句【1】。（Text1.Text=Hello!）（2）哪两个属性确定一个控件的大小【2】(widthheight)（3）在窗体上画两个文本框和一个命令按钮，然后在代码窗口中编写如下事件过程：PrivateSubCommand1_Click()Text1.Text=siasText2.Text=Text1.TextText1.Text=universityEndSub程序运行后，单击命令按钮，在文本框1中显示【3】（university），在文本框2中显示【4】（sias）。（4）将此数学式子2a2(4+b)写成VisualBasic表达式【5】。(2*a^2*(4+b))（5）设a=2，b=3，c=4，d=5，表达式a=cAndbcOrcd的值【6】。（False）（6）写出下列语句的输出结果Printst;u,d【8】。（stud）（7）为了在运行时把c:\ucdos文件夹下的图形文件arrow.ico装入图片框Picture1，所使用的语句为【9】。Picture1.Picture=LoadPicture(c:\ucdos\arrow.ico)或Picture1=LoadPicture(c:\ucdos\arrow.ic