2012vb笔试外A带参考答案-共享

1、得分评阅人、填空题(共10个空，每空2分，共20分)1 .弹出名称为“Mend的菜单的语句为PopUpMenuMain。2 .在VB中，声明静态变量的关键字是Static。3 .在VisualBasic中，所有控件都应具有的属性是Name_04 .显示打开文件对话框的方法是：ShowOpen。5 .以下程序的功能是：找出数组a中的第一次出现的最小值。要求在任何情况下都能正确运行，请完善之。Dima%(),Mini%,i%,n%n=Val(InputBox("请输入整数个数")'假设输入的n值一定大于零ReDima(1Ton)Fori=1Tona(i)=Rnd*100

2、NextiMini=1Fori=2TonIfa>a(Mini)ThenMini=iNextiPrint"最小值首次出现在下标为"&Mini&"的数组元素中，值为"&a(Mini)6 .以下程序的功能是循环产生a”到Z”之间的小写英文字母，并以每行显示10个字符的形式在窗体上显示出来，当出现字母"y"时退出循环。请完善程序。(小写英文字母a的ASCII码值为97)PrivateSubForm_Click()Dimaasstring*1,iasintegerDoa=_chr(int(rnd()*26+97)_

3、i=i+1Printa;If_imod10=0_thenPrintLoopUntil_a="y"_EndSub得分评阅人二、单选题(共30小题，每小题1.5分，共45分)1 .VB是一种面向对象的可视化程序设计语言，它采用了A的编程机制A)事件驱动B)从主程序开始执行C)按过程顺序执行D)按模块顺序执行2 .函数Format(9876.567,"00000.00")B返回值是B。A)"9876.57"B)09876.57C)9876.567D)"09876.57"3 .数学表达式20&x<87在VB中

4、的逻辑表达式为B。A)20<=x<87B)20<=xANDx<87C)x>=20ORx<87D)20<=xAND<874 .在VB中，常量3.1415926#勺数据类型是DA)整型B)长整型5. A是合法的变量名。A)XyzB)123abe6. Timer控件可用于后台进程中，可在事件，可设置A来实现。A)Enabled=False或Interval=0C)Enabled=False或Visible=FalseC)单精度型D)双精度型C) integerD)X-YTimer事件内编程，要停止触发TimerB)Visible=False或Inter

5、val=0D) Enabled=False且Interval=07.设整型变量n已经赋值，能正确声明动态数组并指出数组大小的语句是A) Dima()AsIntegerReDima(n)C)Dima()Dima%(n)B) Dima()asIntegerReDima(n)AsStringD)Dima(10)AsIntegerReDima(n+1)8.以下关于ListBox控件的说法，不正确的是AA)ListBox控件显示项目列表，每次只能从中选择一项B)如果未选定项目，则ListIndex属性值是-1。C)列表的第一项是ListIndex为0。D)ListCount属性值总是比最大的ListIn

6、dex值大1。9 .以下关于数组的说法，不正确的是CA)静态数组在声明时上下界必须用常量确定。B)动态数组在声明时上下界不可以确定。C)运行时可改变动态数组或静态数组的上下界。D)默认情况下数组的下界为0010 .如果列表框List1中已有5项数据，应使用语句C将数据"Mydata"插入到列表框的第3项。A)Listl.AddItem"Mydata”,3B)Listl.AddItemMydata,3C)Listl.AddItem"Mydata",2D)Listl.AddItemMydata,211 .下面的过程定义语句中B是不合法的。A)Fun

7、ctionSubl(Subll)B)SubSub1(n)AsIntegerC)SubSubl(Subl)D)FunctionSub1(ByValn)12 .关于过程描述错误的是C。A)过程分为函数过程和子过程。B)子过程名在过程体内不能赋值。C)函数过程至少有一个形式参数。D)使用过程可以减少书写重复的程序语句。13 .下面对语句OpenText.DatForOutputAs#1的功能说明中错误的是CA)以顺序输出模式打开文件Text.Dat。B)如果文件Text.Dat不存在，则建立一个新文件。C)如果文件Text.Dat已存在，则打开该文件，新写入的数据将追加到该文件末尾。D)如果文件Te

8、xt.Dat已存在，则打开该文件，新写入的数据将覆盖原有的数据。14 .如果一个变量未经声明就直接使用，则该变量的类型为D0A)IntegerB)BooleanC)ByteD)Variant15 .运行程序时，系统会自动执行窗体的A事件过程A)LoadB)ClickC)UnLoadD)LostFocus16 .B是一条错误的赋值语句。A)x=x+1B)x+y=x-yC)x=x+yD)x=4>617 .A表达式可用于判断列表框控件List1的第一个项目是否被选中。A)List1.ListIndex=0B)List1.ListIndex=1C)List1.ListCount=0D)List1

9、.ListCount=118 .B循环结构，循环体语句一次都不执行。A)DoLoopUntil1=1B)DoUntil1=1LoopC)DoLoopWhile1=1D)DoWhile1=1Loop19 .在默认设置下，数组A(-2to1,3)的元素个数为D。20.21.22.23.24.25.26.A)6B)9C)112D)16在过程声明中，不指明参数传递方式时，默认的传递方式为A）按值传递C）通过过程名反馈传递B)D)给出传递出错信息框按址传递以下关于文件写操作的叙述中，正确的是A)WriteB)PrintC)PrintD)Write写入数据时保留数据的原有格式并区分数据类型。写入数据时保留

10、数据的原有格式但不区分数据类型。写入数据时固定以逗号作为分隔符写入数据时固定以分号作为分隔符文本框对象可以通过B事件获得输入键值的ASCH。A)ChangeB)KeyPress选中列表框List1的某一选项时，其A)List1.List(List1.ListCount-1)C)List1.List(List1.SelCount)复选框（CheckBoR被选中时，其A)TrueB)False卜列语句的运行结果是C)LostFocusIText属性值等于BD)GotFocusB)List1.List(List1.ListIndex)D)List1.List(0)Value属性值是D。C)0D)1D

11、imiAsIntegerFori=4To1Step-1PrintTab(10-i);String(2*i-1,"*")NextiA)*B)*C)*D)*卜列语句的运行结果是Dm=64:n=28DoUntilm=nIfm>nThenm=m-nElsen=n-mEndIfLoopPrintmA)18B)12C)6D)427.在窗体上添加一个名称为Commandl的命令按钮，然后编写如下事件过程PrivateSubCommand1_Click()x=InputBox("Input")SelectCasexCase1,3Print"分支1&quo

12、t;CaseIs>4Print"分支2"CaseElsePrint"Else分支"EndSelectEndSub程序运行后，如果在卒&入对话框中输入5,则窗体上显示的是B。A)分支1B)分支2C)日se分支D)程序出错28 .在窗体上添加一个名称为Command1的命令按钮，然后编写如下事件过程PrivateSubCommand1_Click()StaticxAsIntegerClsFori=2To4y=y+xx=x+2NextiPrintx,yEndSub程序运行后，连续三次单击Command1按钮后，窗体上显示的是CA)68B)1224

13、C)1842D)246429 .执行下列程序段，窗体上显示的是A。PrivateSubCommand1_Click()Dima(5)AsInteger,b(5)AsIntegerForj=1to4a(j)=3*jb(j)=a(j)*3NextjPrintb(j2)EndSubA)18B)36C)25D)3530 .有下列语句：PrivateSubCommand1_Click()Dimx%,y%x=48:y=36Callf1(x,y)Printx,yEndSubPublicSubf1(n%,ByValm%)n=nMod10m=m10EndSub单击命令按扭后运行结果为C。A)86B)68C)83

14、6D)648得分评阅人1.什么是控件对象的属性、对象的事件和对象的方法?控件对象的属性描述对象的名称、大小、位置和其它各种对象的形状特征。控件对象的事件是指由系统事先设定的、能被控件对象识别和响应的外部刺激。控件对象的方法是指由系统事先设定的、能被控件对象直接执行的操作。属性、事件、方法描述了对象的三个方面，属性说明对象自身的特征，事件表明对象对外界的感知能力，方法体现对象的行为能力。2.阅读表格中程序，回答下列问题PrivateSubForm_Click()Dimm%,n%,z%m=30n=20z=min(m,n)printm,n,zEndSubPublicFunctionmin(ByRef

15、x%,ByValy%)Ifx>ythenx=x+yy=xyx=x-yendifmin=xEndFunction上述程序中，哪些是形参、哪些是实参？上述程序中，关键字ByRef和ByVal的作用？上述程序中，min=x的作用？执行Form_Click()事件过程，窗体上显示的内容是什么？上述程序中，x,y是形参、m,n是实参。上述程序中，关键字ByRef说明实参m和形参x之间采用传址的方式进行参数传递；关键字ByVal说明实参n和形参y之间采用传值的方式进行参数传递。上述程序中，min=x的作用是给函数赋返回值。执行Form_Click（）事件过程，窗体上显示的内容是202020。3. 根

16、据运算符的类型，表达式可分为哪些类型？举例说明。算术运算表达式，23+45字符运算表达式，"23"&"45"关系运算表达式，23>45逻辑运算表达式，trueandfalse4. VB中用于接收输入数据的控件有哪些（至少说明二种）？简述其特点。文本框：由text属性接收数据，数据类型为字符型。但通过类型转换，文本框可用于输入字符串、数值、日期等各类数据。滚动条（垂直滚动条、水平滚动条）：由Value属性接收数据，数据类型为整型，事先设定输入数据的最大值和最小值。组合框：由text属性接收数据，数据类型为字符型。它是文本框和列表框的组合，主要体现为文本框，用于输入字符型数据。得分评阅人四、程序分析题(共1小题，每小题15分，共15分)1 .阅读表格中程序，回答下列问题PrivateSubForm_Click()Dimi%,s%,tAsString,m%Fori=1To8t=t&Str(i)s=s+im=m+sPrinttNextiPrintmEndSub上述程序中，i,s,t,m分别是哪种类型的变量？上述