2010年9月计算机二级VB笔试试题

2010年9月计算机二级VB笔试试题：文字版一、选择题（每小题2分，共70分）下列各题A）、B）、C）、D）四个选项中，只有一个选项是正确的。请将正确选项填涂在答题卡相应位置上，答在试卷上不得分。（1）下列叙述中正确的是A）线性表的链式存储结构与顺序存储结构所需要的存储空间是相同的B）线性表的链式存储结构所需要的存储空间一般要多于顺序存储结构C）线性表的链式存储结构所需要的存储空间一般要少于顺序存储结构D）上述三种说法都不对（2）下列叙述中正确的是A）在栈中，栈中元素随栈底指针与栈顶指针的变化而动态变化B）在栈中，栈顶指针不变，栈中元素随栈底指针的变化而动态变化C）在栈中，栈底指针不变，栈中元素随栈顶指针的变化而动态变化D）上述三种说法都不对（3）软件测试的目的是A）评估软件可靠性B）发现并改正程序中的错误C）改正程序中的错误D）发现程序中的错误（4）下面描述中，不属于软件危机表现的是A）软件过程不规范B）软件开发生产率低C）软件质量难以控制D）软件成本不断提高（5）软件生命周期是指A）软件产品从提出、实现、使用维护到停止使用退役的过程B）软件从需求分析、设计、实现到测试完成的过程C）软件的开发过程D）软件的运行维护过程（6）面向对象方法中，继承是指A）一组对象所具有的相似性质B）一个对象具有另一个对象的性质C）各对象之间的共同性质D）类之间共享属性和操作的机制（7）层次型、网状型和关系型数据库划分原则是A）记录长度B）文件的大小C）联系的复杂程度D）数据之间的联系方式（8）一个工作人员可以使用多台计算机，而一台计算机可被多个人使用，则实体工作人员、与实体计算机之间的联系是A）一对一B）一对多C）多对多D）多对一（9）数据库设计中反映用户对数据要求的模式是A）内模式B）概念模式C）外模式D）设计模式（10）有三个关系R、S和T如下：则由关系R和S得到关系T的操作是A）自然连接B）交C）投影D）并（11）在VisualBasic集成环境中，要添加一个窗体，可以单击工具栏上的一个按钮，这个按钮是A）B）C）D）（12）在VisualBasic集成环境的设计模式下，用鼠标双击窗体上的某个控件打开的窗口是A）工程资源管理器窗口B）属性窗口C）工具箱窗口D）代码窗口（13）下列叙述中错误的是A）列表框与组合框都有List属性B）列表框有Selected属性，而组合框没有C）列表框和组合框都有Style属性D）组合框有Text属性、而列表框没有（14）设窗体上有一个命令按钮数组，能够区分数组中各个按钮的属性是A）NameB）IndexC）CaptionD）Left（15）滚动条可以响应的事件是A）LoadB）ScrollC）ClickD）MouseDown（16）设a=5,b=6,c=7,d=8，执行语句X=Ilf（（a＞b）And（c＞d）,10,20）后，x的值是A）10B）20C）30D）200（17）语句PrintSgn（-6^2）+Abs（-6^2）+Int（-6^2）的输出结果是A）-36B）1C）-1D）-72（18）在窗体上画一个图片框，在图片框中画一个命令按钮，位置如图所示。则命令按钮的Top属性值是A）200B）300C）500D）700（19）在窗体上画一个名称为Commandl的命令按钮。单击命令按钮时执行如下事件过程：PrivateSubCommand1_Click（）a$=”softwareandhardwareb$=Right（a$，8）c$=Mid（a$,1，8）MsgBoxa$,，b$，c$,1EndSub则在弹出的信息框标题栏中显示的标题是A）softwareandhardwareB）hardwareC）softwareD）1（20）在窗体上画一个文本框（名称为Text1）和一个标签（名称为Label1），程序运行后，如果在文本框中输入文本，则标签中立即显示相同的内容。以下可以实现上述操作的事件过程是A）PrivateSubText1_Change（）Label1.Caption=Text1.TextEndSubB）PrivateSubLabel1_Change（）Label1.Caption=Text1.TextEndSubC）PrivateSubText1_Click（）Label1.Caption=Text1.TextEndSubD）PrivateSubLabel1_Click（）Label1.Caption=Text1.TextEndSub（21）以下说法中错误的是A）如果把一个命令按钮的Default属性设置为True，则按回车键与单击该命令按钮的作用相同B）可以用多个命令按钮组成命令按钮数组C）命令按钮只能识别单击（Click）事件D）通过设置命令按钮的Enabled属性，可以使该命令按钮有效或禁用（22）以下关于局部变量的叙述中错误的是A）在过程中用Dim语句或Static语句声明的变量是局部变量B）局部变量的作用域是它所在的过程C）在过程中用Static语句声明的变量是静态局部变量D）过程执行完毕，该过程中用Dim或Static语句声明的变量即被释放（23）以下程序段的输出结果是x=Iy=4DoUntily＞4x=x*yY=y＋ILoopPrintxA）1B）4C）8D）20（24）如果执行一个语句后弹出如图所示的窗口，则这个语句是A）InputBox（输入框”，”请输入VB数据”）B）x=InputBox（输入框”，”请输入VB数据”）C）InputBox（请输入VB数据”，”输入框”）D）x=InputBox（请输入VB数据”，”输入框”）（25）有如下事件过程：PrivateSubFormClick（）DimnAsIntegerx=0n=InputBox（请输入一个整数”）Fori=1TonForj=1Toix=x＋INextjNextiPrintxEndSub程序运行后，单击窗体，女口果在输入对话框中输入：，则在窗体上显示的内容是A）13B）14C）15D）16（26）请阅读程序：SubsubP（b（）AsInteger）Fori=1To4b（i）=2＊iNextiEndSubPrivateSubCommand1_Click（）Dima（lTo4）AsIntegerA（l）=5：a（2）=6：a（3）=7：a（4）=8subPa（）Fori=1To4Printa（i）NextiEndSub运行上面的程序，单击命令按钮，则输出结果是A）2B）5C）10D）出错461267148816（27）Fibonacci数列的规律是：前2个数为1，从第3个数开始，每个数是它前2个数之和，即：1，1，2,3,5,8,13,21，34,55,89,…。某人编写了下面的函数，判断大于1的整数x是否是Fibonacci数列中的某个数，若是，则返回True,否则返回False。FunctionIsfab（xAsInteger）AsBooleanDimaAsInteger,bAsInteger,cAsInteger,flagAsBooleanflag=Falsea=1：b=IDoWhilex＜bc=a＋ba=bb=cIfx=bThenflag=TrueLoopIsfab=flagEndFunction测试时发现对于所有正整数x,函数都返回False,程序需要修改。下面的修改方案中正确的是A）把a=b与b=c的位置互换B）把c=a+b移到b=c之后C）把DoWhilex＜b改为DoWhilex＞bD）把ifx=bThenflag=True改为Ifx=aThenflag=True（28）在窗体上画一个命令按钮，其名称为Commandl，然后编写如下事件过程：PrivateSubCommand1_Click（）Dima$,b$，c$,k%a=ABCD”b=”123456”c=k=1DoWhilek＜=Len（a）Ork＜=Len（b）Ifk＜=Len（a）Thenc=c＆Mid（a,k,1）EndIfIfk＜=Len（b）Thenc=c＆Mid（b,k,1）EndIfk=k＋1LoopPrintcEndSub运行程序，单击命令按钮，输出结果是A）123456ABCDB）ABCD123456C）D6C5B4A321D）AlB2C3D456（29）请阅读程序：PrivateSubForm_Click（）m=1Fori=4To1Step-1PrintStr（m）；m=m＋1Forj=1ToiPrint”＊”；NextjPrintNextiEndSub程序运行后，单击窗体，则输出结果是A）1****B）4****C）****D）*2***3********3**2*******4*1******（30）在窗体上画一个命令按钮（其名称为Commandl），然后编写如下代码：PrivateSubCommandl_Click（）Dimaa=Array（1,2,3,4）I=3：j=1DoWhilei＞=0s=s＋a（i）*ji=i-1j=j*10。LoopPrintsEndSub运行上面的程序，单击命令按钮，则输出结果是A）4321B）123C）234D）1234（31）下列可以打开随机文件的语句是A）Openfilel.datForlnpu'tAs＃1B）Open”filel.datForAppendAs＃1C）Open”file1.datForOutputAs＃1D）Open”file1.datForRandomAs＃1Len=20（32）有弹出式菜单的结构如下表，程序运行时，单击窗体则弹出如下图所示的菜单。下面的事件过程中能正确实现这一功能的是A）PrivateSubForm_Click（）PopupMenucutEndSubB）PrivateSubCommandlClick（）PopupMenueditEndSubC）PrivateSubForm_Click（）PopupMenueditEndSubEndSubD）PrivateSubForm_lick（）PopupMenucutPopupMenupaste（33）请阅读程序：OptionBaseIPrivateSubForm_Click（）DimArr（4,4）AsIntegerFori=1To4Forj=ITo4Arr（i,j）=（i-1）*2＋jNextjNextiFori=3To4Forj=3To4PrintArr（j,i）;NextjPrintNextiEndSub程序运行后，单击窗体，则输出结果是A）57B）68C）79D）8106879810811（34）一下面函数的功能应该是：删除字符串str中所有与变量ch相同的字符，并返回删除后的结果。例如：若str=ABCDABCD,ch=B,则函数的返回值为：ACDACDFunctiondelchar（strAsString,chAsString）AsStringDimkAsInteger,tempAsString,retAsStringret=Fork=1ToLen（str）temp=Mid（str,k,1）Iftemp=chThenret=ret＆tempEndIfNextkdelchar=retEndFunction但实际上函数有错误，需要修改。下面的修改方案中正确的是A）把ret=ret＆temp改为ret=tempB）把Iftemp=chThen改为Iftemp＜＞chThenC）把delchar=ret改为delchar=tempD）把ret=改为temp=（35）在窗体上画一个命令按钮和两个文本框，其名称分别为Command1、TextI和Text2,在属性窗口中把窗体的KeyPreview属性设置为True，然后编写如下程序：DimSIAsString,S2AsStringPrivateSubFormLoad（）Text1.Text=Text2.Text=Text1．Enabled=FalseText2．Enabled=FalseEndSubPrivateSubForm_KeyD