2011年3月份二级VB笔试试卷

2011年3月份二级VB笔试试卷一、选择题（每小题2分，共70分）下列各题A）、B）、C）、D）四个选项中，只有一个选项是正确的。

请将正确选项填涂在答题卡响应位置上，答在试卷上的不得分。

（1）下列关于栈叙述正确的是A)栈顶元素最先被删除B）栈顶元素最后才能被删除C)栈底元素永远不能被删除D）以上三种说法都不对(2) 下列叙说中正确的是A）有一个以上根节点的数据结构不一定是非线性结构B）只有一个根节点的数据结构不一定是线性结构C）循环链表是非线性结构D）双向链表是非线性结构（3）某二叉树共有7个节点，其中叶子节点只有1个，则该二叉树的深度为（假设根节点在第1层）A）3 B）4 C）6 D）7（4）在软件开发中，需求分析阶段产生的主要文档是A）软件集成测试计划B）软件详细设计说明书C）用户手册D）软件需求规格说明书（5）结构化程序所要求的基本结构不包括A）顺序结构B）GOTO跳转C）选择（分支）结构D）重复（循环）结构（6）下面描述中错误的是A）系统总体结构图支持软件系统的详细设计B）软件设计是将软件需求转换为软件表示的过程C）数据结构与数据库设计是软件设计的任务之一D）PAD图是软件详细设计的表示工具（7）负责数据库中查询操作的数据库语言是A）数据定义语言B）数据管理语言C）数据操纵语言D）数据控制语言（8）一个教师可讲授多门课程，一门课程可由多个教师讲授。

则实体教师和课程间的联系是A）1:1联系B）1：m联系C）m：1联系D）m:n联系(9) 有三个关系R、S和T如下S T则由关系R和S得到关系Ｔ的操作是Ａ）自然关系B）交Ｃ）除D）并（10）定义无符号整数类为Uint，下面可以作为类Uint实例化值的是A）-369 Ｂ）369 C）0.369 D）整数集合{1,2,3,4,5} (11) 在Visual Basic集成开发环境中，可以列出工程中所有模块名称的窗口是A）工程资源管理器窗口B）窗体设计窗口C）属性窗口D）代码窗口（12）假定编写了如下4个窗体事件的事件过程，则运行应用程序并显示窗体后，已经执行的事情过程是A）Load B）Click C）LostFocus D）KeyPress（13）为了使标签具有“透明”的显示效果，需要设置的属性是A）Caption B）Alignment C）BackStyle D）AutoSize（14）下面可以产生20~30（含20和30）的随机整数的表达式是A）Int(Rnd*10+20）B）Int(Rnd*11+20）C）Int(Rnd*20+30）D）Int(Rnd*30+20）(15）设窗体上有一个名称为HS1的水平滚动条，如果执行了语句：HS1.Value=(HS1.MAX-HS1.Min）/2+HS1.Min，则：A）滚动块处于最左端B）滚动块处于最右端C）滚动块处于中间位置D）滚动块可能处于任何位置，具体位置取决于Max、Min属性的值（16）窗体上有一个名称为Cb1的组合框，程序运行后，为了输出选中的列表项，应使用的语句是A）Print Cb1.Selected B）Print Cb1.List(Cb1.ListIndex）C）Print Cb1.Selected.Text D）Print Cb1.List(ListIndex）(17）为了在窗体上建立2组单选按钮，并且当程序运行时，每组都可以有一个单选按钮被选中，则以下做法中正确的是A）把这2组单选按钮设置为名称不同的2个控件数组B）使2组单选按钮的Index属性分别相同C）使2组单选按钮的名称分别相同D）把2组单选按钮分别画到2个不同的框架中（18）如果一个直线控件的窗体上呈现为一条垂直线，则可以确定的是A）它的Y1、Y2属性的值相等B）它的X1、X2属性的值相等C）它的X1、Y1属性的值分别与X2、Y2属性的值相等D）它的X1、X2属性的值分别与Y1、Y2属性的值相等(19）设a=2、b=3、c=4、d=5，则下面语句的输出是Print 3>2*b OR a=c And b<>c OR c>dA）False B）1 C）True D）-1(20）窗体Form1上有一个名称为Command1的命令按钮，以下对应窗体单击事件的事件过程是（答案是A）A）Private Sub Form1_Click(）B）Private Sub Form_Click(）…. ….End Sub End SubC）Private Sub Comannd1_Click(）D）Private Sub Command_Click(）…. ….End Sub End Sub(21）默认情况下，Dim a(5,-2 to 2）声明的数据的元素个数是A）20 B）24 C）25 D）30(22）设有如下程序段：Dim a(10）...For Each x In aPrint x;Next x在上面的程序段中，变量x必须是A）整型变量B）变体型变量C）动态数组D）静态数组(23）设有以下函数过程Private Function Fun(a(）As Integer, b As String）As Integer...End Function若已有变量声明：Dim x(5）As Integer, n As Integer, ch As String则下面正确的过程调用语句是A） x(0）=Fun(x,”ch”） B）n=Fun(n,ch）C） Call Fun x,”ch” D）n=Fun(x(5）,ch）(24）假定用下面的语句打开文件：Open “File1.txt” for Input As #1则不能正确读文件的语句是（答案是C）A）Input #1,ch$ B）Line Input #1,ch$C）ch$=Input$(5,#1）D）Read #1 ,ch$(25）下面程序的执行结果是Private Sub Command1_Click(）a = 10For k = 1 To 5 Step -1a = a - kNext kPrint a; kEnd SubA）-5 6 B）-5 -5 C）10 0 D）10 1（26）设窗体上有一个名为Text1的文本框和一个名为Command1的命令按钮，并有以下事件过程：Private Sub Command1_Click(）x! = Val(Text1.Text）Select Case xCase Is < -10, Is >= 20Print "输入错误"Case Is < 0Print 20 - xCase Is < 10Print 20Case Is <= 20Print x + 10End Select程序运行时，如果在文本框输入-5，则单击命令按钮后的输入结果是A）5 Ｂ）20 Ｃ）25 Ｄ）输入错误（27）设有如下程序（注意双重循环）Private Sub Command1_Click(）x = 10: y = 0For i = 1 To 5Dox = x - 2y = y + 2Loop Until y > 5 Or x < -1NextEnd Sub运行程序，其中Do循环执行的次数是Ａ）15 Ｂ）10 Ｃ）7 Ｄ）3(28）阅读程序：Private Sub Command1_Click(）Dim arrDim i As Integerarr = Array(0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10）For i = 0 To 2Print arr(7 - i）NextEnd Sub程序运行后，窗体上显示的是：A)8 7 6 B）7 6 5C) 6 5 4 D）5 4 3(29）在窗体上画一个名为Command1的命令按钮，然后编写以下程序：Private Sub Command1_Click(）Dim a(10） As IntegerFor k = 10 To 1 Step -1a(k） = 20 - 2 * kNext kk = k + 7Print a(k - a(k））End Sub运行程序，单击命令按钮，输出结果是Ａ）18 Ｂ）12 Ｃ）８Ｄ）６(30）窗体上有一个名为Command1的命令按钮，并有如下程序：Private Sub Command1_Click(）Dim a(10）, x%For k = 1 To 10a(k） = Int(Rnd * 90 + 10）x = x + a(k） Mod 2Print xEnd Sub程序运行后，单击命令按钮，输出结果是Ａ）10个数中奇数的个数Ｂ）10个数中偶数的个数Ｃ）10个数中奇数的累加和Ｄ）10个数中偶数的累加和（31）窗体上有一个名为Command1的命令按钮和一个名为Timer1的计时器，并有下面的事件过程：Private Sub Command1_Click(）Timer1.Enabled = TrueEnd SubPrivate Sub Form_Load(）Timer1.Interval = 10Timer1.Enabled = FalseEnd SubPrivate Sub Timer1_Timer(）Command1.Left = Command1.Left + 10End Sub程序运行时，单击命令按钮，则产生的结果是Ａ）命令按钮每10秒向左移动一次Ｂ）命令按钮每10秒向右移动一次C）命令按钮每10毫秒向左移动一次D）命令按钮每10毫秒向右移动一次（32）设窗体上有一个名为List1的列表框，并编写下面的事件过程：Private Sub List1_Click(）Dim ch As Stringch = List1.List(List1.ListIndex）List1.RemoveItem List1.ListIndexList1.AddItem chEnd Sub程序运行时，单击一个列表项，则产生的结果是A）该列表项被移到列表的最前面 B）该列表项被删除C）该列表项被移到列表的最后面 D）该列表项被删除后又在原位置插入（33）窗体上有一个名为Command1的命令按钮，并有如下程序：Private Sub Command1_Click(）Dim a As Integer, b As Integera = 8b = 12Print Fun(a, b）; a; bEnd SubPrivate Function Fun(ByVal a As Integer, b As Integer） As Integera = a Mod 5b = b \ 5Fun = aEnd Function程序运行时，单击命令按钮，则输出结果是A） 3 3 2 B） 3 8 2 C） 8 8 12 D） 3 8 12（34）为了从当前文件夹中读入文件File1.txt，某人编写了下面的程序：Private Sub Command1_Click(）Open "File1.txt" For Output As #20Do While Not EOF(20）Line Input #20, ch$Print chLoopClose #20End Sub程序调试时，发现有错误，下面的修改方案中正确的是A）在Open语句中的文件名前添加路径 B）把程序各处的“20”改为“1”C）把Print ch语句改为Print #20 ,ch D）把Open语句中的Output改为Input （35）以下程序运行后的窗体如图所示。