计算机vb历年笔试真题.ppt

单击此处编辑母版标题样式,单击此处编辑母版文本样式,第二级,第三级,第四级,第五级,*,历年笔试真题,单元,顺序,D,码的,10,TRUE,a=a+1,n,num,a(j,)=temp,i+1,*.txt,For Input,Not Eof(1),2010.9,（,1,）下列叙述中正确的是,A,）线性表的链式存储结构与顺序存储结构所需要的存储空间是相同的,B,）线性表的链式存储结构所需要的存储空间一般要多于顺序存储结构,C,）线性表的链式存储结构所需要的存储空间一般要少于顺序存储结构,D,）上述三种说法都不对,（,2,）下列叙述中正确的是,A,）在栈中，栈中元素随栈底指针与栈顶指针的变化而动态变化,B,）在栈中，栈顶指针不变，栈中元素随栈底指针的变化而动态变化,C,）在栈中，栈底指针不变，栈中元素随栈顶指针的变化而动态变化,D,）上述三种说法都不对,（,3,）软件测试的目的是,A,）评估软件可靠性,B,）发现并改正程序中的错误,C,）改正程序中的错误,D,）发现程序中的错误,2010.9,（,4,）下面描述中，不属于软件危机表现的是,A,）软件过程不规范,B,）软件开发生产率低,C,）软件质量难以控制,D,）软件成本不断提高,（,5,）软件生命周期是指,A,）软件产品从提出、实现、使用维护到停止使用退役的过程,B,）软件从需求分析、设计、实现到测试完成的过程,C,）软件的开发过程,D,）软件的运行维护过程,（,6,）面向对象方法中，继承是指,A,）一组对象所具有的相似性质,B,）一个对象具有另一个对象的性质,C,）各对象之间的共同性质,D,）类之间共享属性和操作的机制,2010.9,（,7,）层次型、网状型和关系型数据库划分原则是,A,）记录长度,B,）文件的大小,C,）联系的复杂程度,D,）数据之间的联系方式,（,8,）一个工作人员可以使用多台计算机，而一台计算机可被多个人使用，则实体工作人员、与实体计算机之间的联系是,A,）一对一,B,）一对多,C,）多对多,D,）多对一,（,9,）数据库设计中反映用户对数据要求的模式是,A,）内模式,B,）概念模式,C,）外模式,D,）设计模式,2010.9,（,10,）有三个关系,R,、,S,和,T,如下：,则由关系,R,和,S,得到关系,T,的操作是,A,）自然连接,B,）交,C,）投影,D,）并,（,11,）在,Visual Basic,集成环境中，要添加一个窗体，可以单击工具栏上的一个按钮，这个按钮是,A,）,B,）,C,）,D,）,（,12,）在,Visual Basic,集成环境的设计模式下，用鼠标双击窗体上的某个控件打开的窗口是,A,）工程资源管理器窗口,B,）属性窗口,C,）工具箱窗口,D,）代码窗口,2010.9,（,13,）下列叙述中错误的是,A,）列表框与组合框都有,List,属性,B,）列表框有Selected,属性，而组合框没有,C,）列表框和组合框都有,Style,属性,D,）组合框有,Text,属性、而列表框没有,（,14,）设窗体上有一个命令按钮数组，能够区分数组中各个按钮的属性是,A,）,Name,B,）,Index,C,）,Caption D,）,Left,（,15,）滚动条可以响应的事件是,A,）,Load,B,）,Scroll,C,）,Click D,）,MouseDown,（,16,）设,a=5,b=6,c=7,d=8,，执行语句,X=,Ilf,（,a,b,）,And,（,c,d,）,10,20,）后，,x,的值是,A,）,10,B,）,20,C,）,30 D,）200,（,17,）语句,Print,Sgn,（,-62,）,+Abs,（,-62,）,+,Int,（,-62,）的输出结果是,A,）,-36 B,）,1,C,）,-1,D,）,-72,2010.9,（,18,）在窗体上画一个图片框，在图片框中画一个命令按钮，位置如图所示。,则命令按钮的,Top,属性值是,A,）,200,B,）,300 C,）,500 D,）,700,（,19,）在窗体上画一个名称为,Command l,的命令按钮。单击命令按钮时执行如下事件过程：,Private Sub Command 1_Click,（）,a$=,”,software and hardware,b$=Right,（,a$,，,8,）,c$=Mid,（,a$,1,，,8,）,MsgBox,a$,，,b$,，,c$,1,End Sub,则在弹出的信息框标题栏中显示的标题是,A,）,software and hardware,B,）,hardware,C,）,software,D,）,1,2010.9,（,20,）在窗体上画一个文本框（名称为,Text 1,）和一个标签（名称为,Label 1,），程序运行后，如果在文本框中输入文本，则标签中立即显示相同的内容。以下可以实现上述操作的事件过程是,A,）,Private Sub Text1_Change,（）,Label1.Caption=Text1Text,End Sub,B,）,Private Sub Label1_Change,（）,Label1.Caption=Text1.Text,End Sub,C,）,Private Sub Text1_Click,（）,Label1.Caption=Text1.Text,End Sub,D,）,Private Sub Label1_Click,（）,Label1.Caption=Text1.Text,End Sub,（,21,）以下说法中错误的是,A,）如果把一个命令按钮的,Default,属性设置为,True,，则按回车键与单击该命令按钮的作用相同,B,）可以用多个命令按钮组成命令按钮数组,C,）命令按钮只能识别单击（,Click,）事件,D,）通过设置命令按钮的,Enabled,属性，可以使该命令按钮有效或禁用,（,22,）以下关于局部变量的叙述中错误的是,A,）在过程中用,Dim,语句或,Static,语句声明的变量是局部变量,B,）局部变量的作用域是它所在的过程,C,）在过程中用,Static,语句声明的变量是静态局部变量,D,）过程执行完毕，该过程中用,Dim,或,Static,语句声明的变量即被释放,（,23,）以下程序段的输出结果是,x=I,y=4,Do Until y,4,x=x*y,Y=y,I,Loop,Print x,A,）,1,B,）,4,C,）,8 D,20,（,24,）如果执行一个语句后弹出如图所示的窗口，则这个语句是,A,）,InputBox,（,输入框,”,，,”,请输入,VB,数据,”,）,B,）,x=,InputBox,（,输入框,”,，,”,请输入,VB,数据,”,）,C,）,InputB,ox,（,请输入,VB,数据,”,，,”,输入框,”,）,D,）,x=,InputBox,（,请输入,VB,数据,”,，,”,输入框,”,）,（,25,）有如下事件过程：,Private Sub Form Click,（）,Dim n A s Integer,x=0,n=,InputBox,（,请输入一个整数,”,）,For i=1 TonFor j=1 To i,x=x,I,Next j,Next i,Print x,End Sub,程序运行后，单击窗体，女口果在输入对话框中输入：，则在窗体上显示的内容是,A,）,13 B,）,14,C,）,15,D,）,16,（,26,）请阅读程序：,Sub,subP,（,b,（）,As Integer,）,For i=1 To 4,b,（,i,）,=2,i,Next i,End Sub,Private Sub Command 1_Click,（）,Dim a,（,l To 4,）,As Integer,A,（,l,）,=5,：,a,（,2,）,=6,：,a,（,3,）,=7,：,a,（,4,）,=8,subP,a,（）,For i=1 To 4,Print a,（,i,）,Next i,End Sub,运行上面的程序，单击命令按钮，则输出结果是,A,）,2 B,）,5 C,）,10 D,）出错,4 6 12,6 7 14,8 8 16,（,27,）,Fibonacci,数列的规律是：前,2,个数为,1,，从第,3,个数开始，每个数是它前,2,个数之和，即：,1,，,1,，,2,3,5,8,13,21,，,34,55,89,。某人编写了下面的函数，判断大于,1,的整数,x,是否是,Fibonacci,数列中的某个数，若是，则返回,True,否则返回,False,。,Function,Isfab,（,x As Integer,）,As Boolean,Dim a As Integer,b As Integer,c As Integer,flag As Boolean,flag=False,a=1,：,b=I,Do While x,b,c=a,b,a=b,b=c,If x=b Then flag=True,Loop,Isfab,=flag,End Function,测试时发现对于所有正整数,x,函数都返回,False,程序需要修改。下面的修改方案中正确的是,A,）把,a=b,与,b=c,的位置互换,B,）把,c=,a+b,移到,b=c,之后,C,）把,Do While x,b,改为,Do While x,b,D,）把,if x=b Then flag=True,改为,If x=a Then flag=True,（,28,）在窗体上画一个命令按钮，其名称为,Commandl,，然后编写如下事件过程：,Private Sub Command1_Click,（）,Dim a$,b$,，,c$,k%,a=ABCD,”,b=,”,123456,”,c=,k=1,Do While k,=Len,（,a,）,Or k,=Len,（,b,）,If k,=Len,（,a,）,Then,c=c,Mid,（,a,k,1,）,End If,If k,=Len,（,b,）,Then,c=c,Mid,（,b,k,1,）,End If,k=k,1,Loop,Print c,End Sub,运行程序，单击命令按钮，输出结果是,A,）,123456ABCD B,）,ABCD123456 C,）,D6C5B4A321,D,）,AlB2C3D456,（,29,）请阅读程序：,Private Sub Form_ Click,（）,m=1,For i=4 To 1 Step-1,Print,Str,（,m,）；,m=m,1,For j=1 To i,Print,”,”,；,Next j,Print,Next i,End Sub,程序运行后，单击窗体，则输出结果是,A,）,1*B,）,4*C,）*,D,）*,2*3*,3*2*,4*1*,（,30,）在窗体上画一个命令按钮（其名称为,Commandl,），然后编写如下代码：,Private Sub Command,l_Click,（）,Dim a,a=Array,（,1,2,3,4,）,I=3,：,j=1,Do While i,=0,s=s,a,（,i,）*,j,i=i-1,j=j*10,。,Loop,Print s,End Sub,运行上面的程序，单击命令按钮，则输出结果是,A,）,4321 B,）,123 C,）,234,D,）,1234,（,31,）下列可以打开随机文件的语句是,A,）,Open file l.,dat,For,lnput,As,1,B,）,Open,”,file,l.,dat,For Append As,1,C,）,Open,”,file1.dat For Output As,1,D,）,Open,”,file1.dat For Random As,1 Len=20,（,32,）有弹出式菜单的结构如下表，程序运行时，单击窗体则弹出如下图所示的菜单。下面的事件过程中能正确实现这一功能的是,A,）,Private Sub Form _Click,（）,PopupMenu,cut,End Sub,B,）,Private Sub Command l Click,（）,PopupMenu,edit,End Sub,C,）,Private Sub Form_ Click,（）,PopupMenu,edit,End Sub,D,）,Private Sub,Form_lick,（）,PopupMenu,cut,PopupMenu,paste,End Sub,（,33,）请阅读程序：,Option Base I,Private Sub Form_ Click,（）,Dim,Arr,（,4,4,）,As Integer,For i=1 To 4,For j=I To 4,Arr,（,i,j,）,=,（,i-1,）*,2,j,Next j,Next i,For i=3To4,For j=3 To 4,Print,Arr,（,j,i,）,;,Next j,Print,Next i,End Sub,程序运行后，单击窗体，则输出结果是,A,）,5 7 B,）,6 8,C,）,7 9 D,）,8 10,6 8 7 9 8 10 8 11,（,34,）一下面函数的功能应该是：删除字符串,str,中所有与变量,ch,相同的字符，并返回删除后的结果。例如：若,str,=ABCDABCD,ch,=B,则函数的返回值为：,ACDACD,Function,delchar,（,str,As String,ch,As String,）,As String,Dim k As Integer,temp As String,ret As String,ret=,For k=1 To Len,（,str,）,temp=Mid,（,str,k,1,）,If temp=,ch,Then,ret=,ret,temp,End If,Next k,delchar,=ret,End Function,但实际上函数有错误，需要修改。下面的修改方案中正确的是,A,）把,ret=,ret,temp,改为,ret=temp,B,）把,If temp=,ch,Then,改为,If temp,ch,Then,C,）把,delchar,=ret,改为,delchar,=temp,D,）把,ret=,改为,temp=,（,35,）在窗体上画一个命令按钮和两个文本框，其名称分别为,Command1,、,Text I,和,Text2,在属性窗口中把窗体的,KeyPreview,属性设置为,True,，然后编写如下程序：,Dim S I As String,S2 As String,Private Sub Form Load,（）,Text 1.Text=,Text2.Text=,Text 1,Enabled=False,Text2,Enabled=False,End Sub,Private Sub Form_,KeyDown,（,KeyCode,As Integer,Shift As Integer,）,S2=,S2,Chr,（,KeyCode,）,End Sub,Private Sub,Forin,_,KeyPress,（,KeyAscii,As Integer,）,S1=,S1,Chr,（,KeyAscii,）,End Sub,Private Sub Command l Click,Text l.Text=,Sl,Text2.Text=S2,S1=,S2=,End Sub,程序运行后，先后按,“,a,”,、,“,b,”,、,“,c,”,键，然后单击命令按钮，在文本框,Textl,和,Text2,中显示的内容分别为,A,）,abc,和,ABC,B,）空白,C,）,ABC,和,abc,D,）出错,二、填空题（每空,2,分，共,30,分）,请将每空的正确答案写在答题卡,【1】,至,【15】,序号的横线上，答在试卷上不得分。,（,1,）一个栈的初始状态为空。首先将元素,5,，,4,，,3,，,2,，,1,依次入栈，然后退栈一次，再将元素,A,B,C,D,依次入栈，之后将所有元素全部退栈，则所有元素退栈（包括中间退栈的元素）的顺序为,1DCBA2345,【1】_,。,（,2,）在长度为,n,的线性表中，寻找最大项至少需要比较,Log,2,n,【2】,次。,（,3,）一棵二叉树有,10,个度为,1,的结点，,7,个度为,2,的结点，则该二叉树共有,_【3】,25,个结点。,（,4,）仅由顺序、选择（分支）和重复（循环）结构构成的程序是,结构化程序设计,【4】,程序。,（,5,）数据库设计的四个阶段是：需求分析，概念设计，逻辑设计和,物理设计,【5】_,。,（,6,）窗体上有一个名称为,Combo1,的组合框，其初始内容为空，有一个名称为,Command1,、标题为,“,添加项目,”,的命令按钮。程序运行后，如果单击命令按钮，会将给定数组中的项目添加到组合框中，如图所示。请填空。,Option Base 1,Private Sub Command 1_ Click,（,Dim city As Variant,city=,city(i),【6】,（,北京,，,天津,，,上海,，,武汉,，,重庆,，,西宁,）For i=,1,【7】_To,UBound,（,citv,）,Combo 1.Addltem_【8】_,Next,End Sub,（,7,）窗体上有一个名称为,Text 1,的文本框和一个名称为,Command l,、标题为,“,计算,”,的命令按钮，如图所示。函数,fun,及命令按钮的单击事件过程如下，请填空。,Private Sub Command 1 _Click,（）,Dim x As Integer,x=Val,（,InputBOX,（,输入数据,）,Text 1=,Str,（,fun,（,x,）,+fun,（,x,）,+fun,（,x,）,End Sub,Private Function fun,（,ByRef,n As Integer,）,If n Mod 3=0 Then,n=,n+n,Else,n=n*n,End If,fun,【9】=n,End Function,当单击命令按钮，在输入对话框中输入,2,时，文本框中显示的是,276,【10】_,（,8,）窗体上有一个名称为,List1,的列表框，一个名称为,Picture 1,的图片框。,Form_ Load,事件过程的作用是，把,Datal.txt,文件中的物品名称添加到列表框中。运行程序，当双击列表框中的物品名称时，可以把该物品对应的图片显示在图片框中如图所示。以下是类型定义及程序，请填空。,Private Type,Pic,gName,As String*10,物品名称,picFile,As String*20,物品图片的图片文件名,End Type,Dim p,（,4,）,As,Pic,，,pRec,As,Pic,Private Sub Form Load,（）,Open,”,Datal.txt,For Random As,1,Len,【11】_=Len,（,pRec,）,For i=0 To 4,Get,1,，,i+l,，,P,（,i,）,LIStI.AddItem,p,（,i,）,.,gNaine,Next i,Close,1,End Sub,Private Sub List I-,DbICIickO,For i=OTo4,If,RTrim,（,List,一,List,（,i,）,=,RTrim,（,p,（,i,）,.gName,【12】,）,Then,Picture l.,，,Picture=,LoadPicture,（,p,（,i,）,.,picFile,【13】,）,Exit For,End If,Next,End Sub,（,9,）窗体上有一个名称为,CD1,的通用对话框。通过菜单编辑器建立如图,1,所示的菜单。程序运行时，如果单击,“,打开,”,菜单项，则执行打开文件的操作，当选定了文件（例如：,G:VB2010-9in.txt,）并打开后，该文件的文件名会被添加到菜单中，如图,2,所示。各菜单项的名称和标题等定义如下表。,以下是单击,“,打开,”,菜单项的事件过程，请填空。,Dim,mnuCounter,As Integer,Private Sub,tnnuOpen,_ Click,（）,CD1,Show0pen,If CD1,FileName,Then,Open,CD1.FileName,【14】For Input As,1,mnuCounter,=mnuCounter+1,Load,FName,（,mnuCounter,）,FName,（,mnuCounter,）,.Caption=CD1.FileName,FName,（,mnuCounter,Visible,【15】_=True,Close,1,End If,End Sub,2010.3,一、选择题,(,每小题,2,分，共,70,分,),下列各题,A),、,B),、,C),、,D),四个选项中，只有一个选项是正确的。请将正确选项填涂在答题卡相应位置上，答在试卷上不得分。,(1),下列叙述中正确的是,A),对长度为,n,的有序链表进行查找，最坏情况下需要的比较次数为,n,B),对长度为,n,的有序链表进行对分查找，最坏情况下需要的比较次数为,(n/2),C),对长度为,n,的有序链表进行对分查找，最坏情况下需要的比较次数为,(log2n),D),对长度为,n,的有序链表进行对分查找，最坏情况下需要的比较次数为,(n log2n),(2),算法的时间复杂度是指,A),算法的执行时间,B),算法所处理的数据量,C),算法程序中的语句或指令条数,D),算法在执行过程中所需要的基本运算次数,2010.3,(3),软件按功能可以分为：应用软件、系统软件和支撑软件,(,或工具软件,),。下面属于系统软件的是,A),编辑软件,B),操作系统,C),教务管理系统,D),浏览器,(4),软件,(,程序,),调试的任务是,A),诊断和改正程序中的错误,B),尽可能多地发现程序中的错误,C),发现并改正程序中的所有错误,D),确定程序中错误的性质,(5),数据流程图,(DFD,图,),是,A),软件概要设计的工具,B),软件详细设计的工具,C),结构化方法的需求分析工具,D),面向对象方法的需求分析工具,2010.3,(6),软件生命周期可分为定义阶段，开发阶段和维护阶段。详细设计属于,A),定义阶段,B),开发阶段,C),维护阶段,D),上述三个阶段,(7),数据库管理系统中负责数据模式定义的语言是,A),数据定义语言,B),数据管理语言,C),数据操纵语言,D),数据控制语言,(8),在学生管理的关系数据库中，存取一个学生信息的数据单位是,A),文件,B),数据库,C),字段,D),记录,(9),数据库设计中，用,E-R,图来描述信息结构但不涉及信息在计算机中的表示，它属于数据库设计的,A),需求分析阶段,B),逻辑设计阶段,C),概念设计阶段,D),物理设计阶段,2010.3,(10),有两个关系,R,和,T,如下：则由关系,R,得到关系,T,的操作是,A),选择,B),投影,C),交,D),并,(11),在,VB,集成环境中要结束一个正在运行的工程，可单击工具栏上的一个按钮，这个按钮是,2010.3,(12),设,x,是整型变量，与函数,f(x,0,-x,x),有相同结果的代数式是,A)|x,|,B)-|x|,C)x,D)-x,(13),设窗体文件中有下面的事件过程：,Private Sub Command1_Click(),Dim s,a%=100,Print a,End Sub,其中变量,a,和,s,的数据类型分别是,A),整型，整型,B),变体型，变体型,C),整型，变体型,D),变体型，整型,2010.3,(14),下面哪个属性肯定不是框架控件的属性,A)Text,B)Caption,C)Left,D)Enabled,(15),下面不能在信息框中输出,“,VB,”,的是,A)MsgBox,“,VB,”,B)x,=,MsgBox(VB,),C)MsgBox(,“,VB,”,),D)Call,MsgBox,VB,(16),窗体上有一个名称为,Option1,的单选按钮数组，程序运行时，当单击某个单选按钮时，会调用下面的事件过程,Private Sub Option1_C1ick(Index As Integer),End Sub,下面关于此过程的参数,Index,的叙述中正确的是,A)Index,为,1,表示单选按钮被选中，为,O,表示未选中,B)Index,的值可正可负,C)Index,的值用来区分哪个单选按钮被选中,D)Index,表示数组中单选按钮的数量,2010.3,(16),窗体上有一个名称为,Option1,的单选按钮数组，程序运行时，当单击某个单选按钮时，会调用下面的事件过程,Private Sub Option1_C1ick(Index As Integer),End Sub,下面关于此过程的参数,Index,的叙述中正确的是,A)Index,为,1,表示单选按钮被选中，为,O,表示未选中,B)Index,的值可正可负,C)Index,的值用来区分哪个单选按钮被选中,D)Index,表示数组中单选按钮的数量,(17),设窗体中有一个文本框,Text1,，若在程序中执行了,Text1.SetFocus,，则触发,A)Text1,的,SetFocus,事件,B)Text1,的,GotFocus,事件,C)Text1,的,LostFocus,事件,D),窗体的,GotFocus,事件,2010.3,(18)VB,中有,3,个键盘事件：,KeyPress,、,KeyDown,、,KeyUp,，若光标在,Text1,文本框中，则每输入一个字母,A),这,3,个事件都会触发,B),只触发,KeyPress,事件,C),只触发,KeyDown,、,KeyUp,事件,D),不触发其中任何一个事件,(19),下面关于标准模块的叙述中错误的是,A),标准模块中可以声明全局变量,B),标准模块中可以包含一个,Sub Main,过程，但此过程不能被设置为启动过程,C),标准模块中可以包含一些,Public,过程,D),一个工程中可以含有多个标准模块,(20),设窗体的名称为,Form1,，标题为,Win,，则窗体的,MouseDown,事件过程的过程名是,A)Form1_MouseDown,B)Win_MouseDown,C)Form_MouseDown,D)MouseDown_Form1,2010.3,(21),下面正确使用动态数组的是,A)Dim arr()As Integer,ReDim arr(3,5),B)Dim arr()As Integer,ReDim arr(50)As String,C)Dim arr(),ReDim arr(50)As Integer,D)Dim arr(50)As Integer,ReDim,arr(20),2010.3,(22),下面是求最大公约数的函数的首部,Function,gcd(ByVal,x As Integer,ByVal,y As Integer)As Integer,若要输出,8,、,12,、,16,这,3,个数的最大公约数，下面正确的语句是,A)Print,gcd(8,12),，,gcd(12,16),，,gcd(16,8),B)Print,gcd(8,12,16),C)Print,gcd(8),，,gcd(12),，,gcd(16),D)Print,gcd(8,gcd(12,16),2010.3,(23),有下面的程序段，其功能是按图,1,所示的规律输出数据,Dim a(3,5)As Integer,For i=1 To 3,For j=1 To 5,A(i,j,)=,i+j,Print,a(i,j,);,Next,Print,Next,若要按图,2,所示的规律继续输出数据，则接在上述程序段后面的程序段应该是,A)For,i=1 To 5,For j=1 To 3,Print,a(j,i,);,Next,Print,Next,B)For,i=1 To 3,For j=1 To 5,Print,a(j,i,);,Next,Print,Next,C)For,j=1 To 5,For i=1 To 3,Print,a(j,i,);,Next,Print,Next,D)For i=1 To 5,For j=1 To 3,Print,a(i,j,);,Next,Print,Next,2010.3,(24),窗体上有一个,Text1,文本框，一个,Command1,命令按钮，并有以下程序,Private Sub,Commandl_Click,(),Dim n,If Text1.Text23456 Then,n=n+1,Print,口令输入错误,&n&,次,End If,End Sub,希望程序运行时得到左图所示的效果，即：输入口令，单击,“,确认口令,”,命令按钮，若输入的口令不是,“,123456,”,，则在窗体上显示输入错误口令的次数。但上面的程序实际显示的是右图所示的效果，程序需要修改。下面修改方案中正确的是,A),在,Dim n,语句的下面添加一句：,n=O,B),把,Print,口令输入错误,&n&,次,改为,Print,口令输入错误,+n+,次,C),把,Print,口令输入错误,&n&,次,改为,Print,口令输入错误,&,Str(n,)&,次,D),把,Dim n,改为,Static n,2010.3,(25),要求当鼠标在图片框,P1,中移动时，立即在图片框中显示鼠标的位置坐标。下面能正确实现上述功能的事件过程是,A)Private,Sub P1_MouseMove(Button AS,Integer,Shift,As,Integer,X,As Single,Y As Single),Print X,Y,End Sub,B)Private,Sub P1_MouseDown(Button AS,Integer,Shift,As,Integer,X,As Single,Y As Single),Picture.Print,X,Y,End Sub,C)Private Sub P1_MouseMove(Button AS,Integer,Shift,As,Integer,X,As Single,Y As Single),P1.Print X,Y,End Sub,D)Private,Sub,Form_MouseMove(Button,AS,Integer,Shift,As,Integer,X,As Single,Y As Single),P1.Print X,Y,End Sub,(26),计算二的近似值的一个公式是。某人编写下面的程序用此公式计算并输出,的近似值：,Private Sub Comand1_Click(),PI=1,Sign=1,n=20000,For k=3 To n,Sign=-Sign/k,PI=,PI+Sign/k,Next k,Print PI*4,End Sub,运行后发现结果为,3.22751,，显然，程序需要修改。下面修改方案中正确的是,A),把,For k=3 To n,改为,For k=1 To n,B),把,n=20000,改为,n=20000000,C),把,For k=3 To n,改为,For k=3 To n Step 2,D)把,PI=1,改为,PI=0,2010.3,(27),下面程序计算并输出的是,Private Sub Comand1_Click(),a=10,s=0,Do,s=s+a*a*a,a=a-1,Loop Until a=0 Then,Count(n,)=,Count(n,)+1,End If,Next k,m=count(0),For k=1 To 25,If m,m=,count(k,),End If,Next k,Print m,End Sub,A)0,B)1,C)2,D)3,2010.3,二、填空题,(1),一个队列的初始状态为空。现将元素,A,B,C,D,E,F,5,4,3,2,1,依次入,队，然后再依次退队，则元素退队的顺序为,【1】,。,(2),设某循环队列的容量为,50,，如果头指针,front=45(,指向队头元素的前,一位置,),，尾指针,rear=10(,指向队尾元素,),，则该循环队列中共有,【2】,个元素。,(3),设二叉树如下：,对该二叉树进行后序遍历的结果为,【3】,。,(4),软件是,【4】,、数据和文档的集合。,(5),有一个学生选课的关系，其中学生的关系模式为：学生,(,学号，姓名，班级，年龄,),，课程的关系模式为：课程,(,课号，课程名，学时,),，其中两个关系模式的键分别是学号和课号，则关系模式选课可定义为：选课,(,学号，,【5】,，成绩,)6),为了使复选框禁用,(,即呈现灰色,),，应把它的,Value,属性设置为,2,【6】,。,(7),在窗体上画一个标签、一个计时器和一个命令按钮，其名称分别为,Labl1,、,Timer1,和,Command1,，如图,1,所示。程序运行后，如果单击命令按钮，则标签开始闪烁，每秒钟,“,欢迎,”,二字显示、消失各一次，如图,2,所示。以下是实现上述功能的程序，请填空。,Private Sub,Form_Load,(),Label1.Caption=,欢迎,Timer1.Enabled=False,Timer1.Interval=,500,【7】,End Sub,Private Sub Timer1_Timer(),Label1.Visible=,False,【8】,End Sub,Private Sub command1_Click(),【9】,Timer1.Enabled=True,End Sub,(8),有如下程序：,Private Sub,Form_Click,(),n=10,i=0,Do,i=i+n,n=n-2,Loop While n2,Print i,End Sub,程序运行后，单击窗体，输出结果为,28,【10】,。,(9),在窗体上画一个名称为,Command1,的命令按钮。然后编写如下程序：,Option Base 1,Private Sub Command1_Click(),Dim a(10)As Integer,For i=1 To 10,a(i)=i,Next,Call swap(,a(),【11】),For i=1 To 10,Print,a(i,);,Next,End Sub,Sub,swap(b,()As Integer),n=,Ubound(b,),For i=1 To n/2,t=,b(i,),b(i,)=,b(n,),b(n,)=t,n=n-1,【12】,Next,End Sub,上述程序的功能是，通过调用过程,swap,，调换数组中数值的存放位置，即,a(1),与,a(10),的值互换，,a(2),与,a(9),的值互换请填空。,(10),在窗体上画一个文本框，其名称为,Text1,，在属性窗口中把该文本框的,MultiLine,属性设置为,True,，然后编写如下的事件过程：,Private Sub,Form_Click,(),Open d:testsmtext1.Txt For Input As#1,Do While Not【,13】EOf(1),Line Input#1,aspect$,Whole$=whole$+aspect$+Chr$(13)+Chr$(10),Loop,Text1.Text=whole$,【14】,Close#1,Open d:testsmtext2.Txt For Outp