2011年9月全国计算机等级考试二级笔试试卷VB语言程序设计一、选择题1、下列叙述中正确的是A、算法就是程序B、设计算法时只需要考虑数据结构的设计C、设计算法时只需要考虑结果的可靠性D、以上三种说法都不对2、下列关于线性链表的叙述中，正确的是A、各数据结点存储空间可以不连续，但它们的存储顺序与逻辑顺序必须一致B、各数据结点的存储顺序可以不一致，但它们的存储空间必须连续C、进行插入与删除时，不需要移动表中的元素D、以上三种说法都不对3、下列关于二叉树的叙述中，正确的是A、叶子结点总是比度为2的结点少一个B、叶子结点总是比度为2的结点多一个C、叶子结点数是度为2的结点数的两倍D、度为2的结点数是度为1的结点数的两倍4、软件按功能可以分为应用软件、系统软件和支撑软件(或工具软件)。
下面属于应用软件的是( )。
A、学生成绩管理系统B、C语言编译程序C、UNIX操作系统D5该系统总体结构图的深度是A、7B、6C、3D、26、程序调试的任务是A、设计测试用例B、验证程序的正确性C、发现程序中的错误D、诊断和改正程序的错误7、下列关于数据库设计的叙述中，正确的是A、在需求分析阶段建立数据字典B、在概念设计阶段建立数据字典C、在逻辑设计阶段建立数据字典D、在物理设计阶段建立数据字典8、数据库系统的三级模式不包括A、概念模式B、内模式C、外模式D、数据模式9、有三个关系R、S和T如下：R S则由关系R和S得到关系T的操作是A、自然连接B、差C、交D、并10、下列选项中属于面向对象设计方法主要特征的是A、继承B、自顶向下C、模块化D、逐步求精11、以下描述中错误的是A、窗体的标题通过其Caption属性设置B、窗体的名称（Name属性）可以在运行期间修改C、窗体的背景图形通过其Picture属性设置D、窗体最小化时的图标通过其Icon属性设置12、在设计阶段，当按Ctrl+R键时，所打开的窗口是A、代码窗口B、工具箱窗口C、工程资源管理器窗口D、属性窗口13、设有如下变量声明语句：Dim a，b as Boolean则下列叙述中正确的是（）。
A、a和b都是布尔型变量B、a是变体型变量，b是布尔型变量C、a是整型变量，b是布尔型变量D、a 和b都是变体型变量14、下列可作为Visual Basic变量名的是（）。
A、A#AB、4ABCC、?xyD、Print_Text15、假定一个滚动条的LargeChange属性值为100，则100表示（）。
A、单击滚动条箭头和滚动框之间某位置时滚动框位置的变化量B、滚动框位置的最大值C、拖动滚动框时滚动框位置的变化量D、单击滚动条箭头时滚动框位置的变化量16、在窗体上画一个命令按钮，然后编写如下事件过程：Pricate Sub Command1_Click( )MsgBox Str（123+321）End Sub程序运行后，单击命令按钮，则在信息框中显示的提示信息为（）。
A、字符串“123+321”B、字符串“444”C、数值“444”D、空白17、假定有以下程序Pricate Sub Form_Click( )a=1：b=aDo Until a>=5x=a*bPrint b;xa=a+bb=b+aLoopEnd Sub程序运行后，单击窗体，输出结果是（）。
A、1 1B、1 1C、1 1D、1 12 3 2 4 3 8 3 618、在窗体上画一个名称为List1的列表框，列表框中显示若干城市的名称。
当单击列表框中的某个城市名时，该城市名消失。
下列在List1_Click事件过程中能正确实现上述功能的语句是（）。
A、List1.RemoveItem List1.TextB、List1.RemoveItem List1.ClearC、List1.RemoveItem List1.ListCountD、List1.RemoveItem List1.ListIndex19、列表框中的项目保存在一个数组中，这个数组的名字是（）。
A、ColumnB、StyleC、ListD、MultiSelect20、有人编写了如下程序：Private Sub Form_Click( )Dim s As Integer,x As Integers=0x=0Do While s=10000x=x+1s=s+x^2LoopPrint sEnd Sub上述程序的功能是：计算s=1+22+32…+n2+…，直到s>10000为止。
程序运行后，发现得不到正确的结果，必须进行修改。
下列修改中正确的是（）。
A、把x=0改为x=1B、把Do While s=10000改为Do While s<=10000C、把Do While s=10000改为Do While s>10000D、交换x=x+1和s=s+x^2的位置21、设有如下程序：Private Sub Form_Click( )Dim s As Long,f As LongDim n As Integer,i As Integerf=1n=4For i=1 To nf=f*is=s+fNext iPrint sEnd Sub程序运行后，单击窗体，输出结果是A、32B、33C、34D、3522、阅读下面的程序段：a=0For i=1 To 3For j=1 To iFor k=j To 3a=a+1Next kNext jNext i执行上面的程序段后，a的值为（）。
A、3B、9C、14D、2123、设有如下程序：Private Sub Form_Click( )Clsa$=”123456”For i=1 To 6Print Tab(12-i);________Next iEnd Sub程序运行后，单击窗体，要求结果如图所示，则在_________处应填入的内容为（）。
A、Left(a$,i)B、Mid(a$,8-I,i)C、Right(a$,i)D、Mid(a$,7,i)24、设有如下程序：Private Sub Form_Click( )Dim i As Integer,x As String,y As Stringx=”ABCDEFG”For i=4 To 1 Steo -1y=Mid(x,i,i)+yNext iPrint yEnd Sub程序运行后，单击窗体，输出结果为（）。
A、ABCCDEDEFGB、AABBCDEFGC、ABCDEFGD、AABBCCDDEEFFGG25、设有如下程序：Private Sub Form_Click( )Dim ary(1 To 5) As IntegerDim i As IntegerDim sum As IntegerFor i=1 To 5ary(i)=i+1sum=sum+ary(i)Next iPrint sumEnd Sub程序运行后，单击窗体，输出结果为（）。
A、15B、16C、20D、2526、有一个数列，它的前3个数为0，1，1，此后的每个数都是其前面3个数之和，即0，1，1，2，4，7，13，24，……要求编写程序输出该数列中所有不超过1000的数。
Private Sub Form_Click( )Dim i As Integer,aAs Integer ,b As IntegerDim c As Integer,d As Integera=0:b=1:c=1d=a+b+ci=5While d<=1000Print d;a=b:b=c:c=dd=a+b+di=i+1WendEnd Sub运行上面的程序，发现输出的数列不完整，应进行修改。
以下正确的修改是A、把While d<=1000改为While d>1000B、把i=5改为i=4C、把i=i+1移到While d<=1000的下面D、在i=5的上面增加一个语句：Print a;b;c27、下面的语句用Array函数为数组变量a的各元素赋整数值：a=Array(1,2,3,4,5,6,7,8,9)针对a的声明语句应该是（）。
A、Dim aB、Dim a As IntegerC、Dim a(9) As IntegerD、Dim a() As Integer28、下列描述中正确的是（）。
A、Visual Basic只能通过过程调用执行通用过程B、可以在Sub过程的代码中包含另一个Sub过程的代码C、可以像通用过程一样指定事件过程的名字D、Sub过程和Function过程都有返回值28、阅读程序：Function fac(ByVal n As Integer)As IntegerDim temp As Integertemp=1For i%=1 To ntemp=temp*i%Next i%fac=tempEnd FunctionPrivate Sub Form_Click( )Dim nsum As Integernsum=1For i%=2 To 4nsum=nsum+fac(i%)Next i%Print nsumEnd Sub程序运行后，单击窗体，输出结果是（）。
A、35B、31C、33D、3730、在窗体上画一个命令按钮和一个标签，其名称分别为Command1和Label1，然后编写如下代码：Sub S(x As Integer,y As Integer)Static z As Integery=x*x+zz=yEnd SubPrivate Sub Command1_Click( )Dim i As Integer,z As Integerm=0z=0For i=1 To 3S i,zm=m+zNext iLabel1.Caption=Str(m)End Sub程序运行后，单击命令按钮，在标签中显示的内容是（）。
A、50B、20C、14D、731、以下说法中正确的是（）。
A、MouseUp事件是鼠标向上移动时触发的事件B、MouseUp事件过程中的x，y参数用于修改鼠标位置C、在MouseUp事件过程中可以判断用户是否使用了组合键D、在MouseUp事件过程中不能判断鼠标的位置32、假定已经在菜单编辑器中建立了窗体的弹出式菜单，其顶级菜单项的名称为a1，其“可见”属性为False。
程序运行后，单击鼠标左键或右键都能弹出菜单的事件过程是（）。
A、Private Sub Form_MouseDown(Button As Integer,Shift As Integer,X As Single,Y As Single)If Button =1 And Button =2 ThenPopupMenu a1End IfEnd SubB、Private Sub Form_MouseDown(Button As Integer,Shift As Integer,X As Single,Y As Single)PopupMenu a1End SubC、Private Sub Form_MouseDown(Button As Integer,Shift As Integer,X As Single,Y As Single)If Button =1 ThenPopupMenu a1End IfEnd SubD、Private Sub Form_MouseDown(Button As Integer,Shift As Integer,X As Single,Y As Single)If Button =2 ThenPopupMenu a1End IfEnd Sub33、在窗体上画一个名称为CD1的通用对话框，并有如下程序：Private Sub Form_Load( )CD1.DefaultExt=”doc”CD1.FileName=”c:\file1.txt”CD1.Filter=”应用程序(*.exe)|*.exe”End Sub程序运行时，如果显示了“打开”对话框，在“文件类型”下拉列表中的默认文件类型是（）。