2011四川省WORD全国计算机等级考试二级VB最新考试试题库(完整版)
全国计算机二级《VB》练习题及答案
全国计算机二级《VB》练习题及答案全国计算机二级《VB》练习题及答案9月计算机等级考试将于9月23日-26日举行，目前处于紧张的备考阶段，以下是店铺搜索整理的一份全国计算机二级《VB》练习题及答案，供参考练习，预祝考生们考出自己理想的成绩!想了解更多相关信息请持续关注我们店铺!1.双击窗体中的对象后，VB将显示的窗口是(C)(单)A.工具箱B.项目(工程)窗口C.代码窗口D.属性窗口2.下述选项中，VB的程序设计方法是(B)(单)A.面向对象、顺序驱动B.面向对象、事件驱动C.面向过程、事件驱动D.面向过程、顺序驱动3.在VB中，要将一个窗体装载到内存进行变量初始化等预处理，但没有显示该窗体，应使用的方法或语句是(C)(单)A.ShowB.UnloadC.LoadD.Hide4.文本框的默认属性是(B)(单)A.CaptionB.TextD.Top5.标签默认属性是(A)(单)A.CaptionD.Top6.执行以下程序段：a$="abbacddcba"For I=6 To 2 Step -2X=Mid(a,I,I)Y=Left(a,I)z=Right(a,I)z=Ucase(X&Y&z)Next IPrint z输出结果为(B)(单)A.ABAB.BBABBAC.ABBABAD.AABAAB7.在窗体上画一个名称为Command1的命令按钮，然后编写如下程序：Option Base 1Private Sub Command1_Click( )Dim a As Varianta=Array(1,2,3,4,5)Sum=0For I=1 To 5Sum = sum+a(I)Next Ix=Sum/5For I =1 To 5If a(I)>x Then Print a(I);End Sub程序运行后，单击命令按钮，在窗体上显示的内容是(D)(单)A.1 2B.1 2 3C.3 4 5D.4 58.假定一个工程由一个窗体文件Form1和两个标准模块文件Model1及Model2组成。
2011年3月全国计算机等级考试二级VB笔试试卷及答案
2011年3月全国计算机等级考试二级vb笔试试卷（考试时间 90分钟，满分100分）一、选择题（每小题2分，共70分）下列各题A）、B）、C）、D）四个选项中，只有一个选项是正确的，请将正确选项填涂在答题卡相应位置上，答在试卷上不得分。
（1）下列关于栈叙述正确的是A）栈顶元素最先能被删除 B）栈顶元素最后才能被删除C）栈底元素永远不能被删除 D）以上三种说法都不对答案：A解析：栈的特点是“先进后出，后进先出”的线性结构，进栈又称为入栈最先进入栈的数据元素会被压入栈底，最后进入栈的元素所在位置称为栈顶，出栈又称为退栈即将元素从栈中删除，将元素退栈是先将栈顶的元素退栈，对于栈的运行原理可参考快动网公共基础知识视频教程。
所以上边选项正确的是A。
（2）下列叙述中正确的是A）有一个以上根结点的数据结构不一定是非线性结构B）只有一个根结点的数据结构不一定是线性结构C）循环链表是非线性结构D）双向链表是非线性结构B）【解析】在数据结构中，树这类的的数据结构只有一个根结点，但它不是线性结构。
解析：A错误，符合线性结构的特点是：（1）有且只有一个根结点（2）每一个结点最多只有一个前件，也最多只有一个后件，根据题意不一定是非线性结构即指的是线性结构，那么根据线性结构的特点只有一个根结点，所以选项A叙述错误。
B正确，比如二叉树是一个非线性结构，二叉树就是一个根结点，所以该选数正确。
C和D叙述错误，循环链表和双向链表都是线性结构。
（3）某二叉树共有7个结点，其中叶子结点只有1个，则该二叉树的深度为（假设根结点在第1层）A）3 B）4 C）6 D）7D）【解析】根据二叉树的性质，度为0的结点（即叶子结点）总是比度为2的结点多一个。
题目中的二叉树的叶子结点为1，因此度为2的结点的数目为0，因而这个二叉树的深度为7。
解析：根据二叉树的性质，叶子结点即度为0的结点个数总比度为2的结点个数多1，根据题目内容可知度为2的结点个数为0，因为叶子结点只有1个，由于二叉树的结点类型有三种：度为0，度为1，度为2，根据题目内容可知二叉树共有7个结点所以度为1的结点个数是6，度为1表示结点只有一个分支，这个分支可以是左子树或右子树，我们画一下该二叉树的图为：（4）在软件开发中，需求分析阶段产生的主要文档是A）软件集成测试计划 B）软件详细设计说明书C）用户手册 D）软件需求规格说明书D）【解析】在软件开发过程中，需求分析阶段产生的主要文档是软件需求规格说明书。
(完整word版)计算机二级VB编程题目含答案
Private Sub Command1_Click()Dim n As Integer, i As Integer, s As Double n = Val(Text1.Text)s = 0For i = 1 To ns = s + i ^ 2Next iText2.Text = sEnd SubPrivate Sub Command1_Click()''' 不得删除本行注释Dim i As IntegerOpen App.Path & "\" & "yssj.txt" For Input As #1For i = 1 To 10Input #1, a(i)Next iClose #1End SubPrivate Sub Command2_Click()''' 不得删除本行注释Dim i As IntegerText1.Text = ""For i = 1 To 10If a(i) Mod 3 = 2 ThenText1.Text = Text1.Text & Str(a(i)) End IfNext iEnd SubPrivate Sub command1_Click()'''不得删除本行注释Dim a As Integer, b As Double, i As Integer, n As Integer n = Val(Text1.Text)a = 0b = 0For i = 1 To na = a + ib = b + aNext iText2.Text = bEnd SubPrivate Sub Command1_Click()'''不得删除本行注释Dim i%, xh$, xm$Open App.Path & "\" & "Xhxm.txt" For Output As #1For i = 1 To 3xh = InputBox("请输入学号")xm = InputBox("请输入姓名")Write #1, xh, xmNext iClose #1End Sub Private Sub Command2_Click()'''不得删除本行注释Dim s as stringOpen App.Path & "\" & "Xhxm.txt" For Input As #2Do While Not EOF(2)Line Input #2, sText1.Text = Text1.Text & s & vbCrLf LoopClose #2End SubPrivate Sub Command1_Click()‘”读取文件”按钮代码'''不得删除本行注释Dim st As StringText1.Text = ""Open App.Path & "\" & “jmwb.txt" For Input As #1While Not EOF(1)Input #1, stText1.Text = Text1.Text + st + vbCrLf WendClose #1End Sub Private Sub Command2_Click()Dim s As String, co As String, c As String, Dim n As Integer, i As Integer, p As Integer s = Trim(Text1.Text)n = Len(s)co = ""For i = 1 To nc = Mid(s, i, 1)p = Asc(c) + 5co = co + Chr(p)Next iText2.Text = coEnd SubPrivate Sub command1_click()'''不得删除本行注释For N = 1 To 15x(N) = Int(Rnd * 91 + 10)Text1.Text = Text1.Text + Str(x(N)) Next NEnd Sub Private Sub Command2_Click()'''不得删除本行注释Dim m As Integer, K As IntegerFor N = 1 To 15For m = N + 1 To 15If x(m) > x(N) ThenK = x(N)x(N) = x(m)x(m) = KEnd IfNext mText2.Text = Text2.Text + Str(x(N)) Next NEnd SubPrivate Sub Command1_Click()Dim char As String * 1char = Trim(Text1.Text)If Not IsNumeric(char) ThenIf (Asc(char) >= 65 And Asc(char) <= 90) Or _(Asc(char) >= 97 And Asc(char) <= 120) ThenLabel1.Caption = "输入的是字母"Else: Label1.Caption = "输入的是其它符号"End IfElse: Label1.Caption = "输入的是数字"End IfEnd SubPrivate Sub Command1_Click()Text1.Text = UCase(Text1.Tag)End SubPrivate Sub Command2_Click()Text1.Text = LCase(Text1.Tag)End SubPrivate Sub Command3_Click()Text1.Text = Text1.TagEnd SubPrivate Sub Text1_KeyUp(KeyCode As Integer, Shift As Integer)'对于文本框控件中输入的每次键盘按键弹起事件做一次文本内容保存Text1.Tag = Text1.Text '用Text1.Tag属性作为保存textbox控件文本内容的临时存储区End SubPrivate Sub command1_Click()''' 不得删除本行注释Dim a As Integer, b As Integer, c As Integer Dim max As Integer, min As Integera = Val(Text1.Text)b = Val(Text2.Text)c = Val(Text3.Text)max = a + b + Abs(a - b)max = max / 2min = a + b - Abs(a - b)min = min / 2max = max + c + Abs(max - c)max = max / 2min = min + c - Abs(min - c)min = min / 2Text4.Text = maxText5.Text = minEnd SubPrivate Sub Command1_Click()Dim a As IntegerIf Not IsNumeric(Text1.Text) ThenMsgBox "请输入数字！", 48, "输入的不是数字"Else a = Val(Text1.Text)If (a Mod 4 = 0 And a Mod 100 <> 0) Or a Mod 400 = 0 ThenText2.Text = "闰年"Else: Text2.Text = "非闰年"End IfEnd ifText1.SetFocusText1.SelStart = 0Text1.SelLength = Len(Text1.Text)End SubPrivate Sub Command1_Click()''' 不得删除本行注释Dim n As Integer, i As Integern = Val(Text1.Text)If n < 0 Or (Not IsNumeric(Text1.Text)) Then MsgBox "请输入正整数", 48, "输入的不是正整数" Open App.Path & "\" & "jfwj.txt" For Output As #1For i = 1 To nPrint #1, String(i, "*")Next iClose #1End SubPrivate Sub Command1_Click()''' 不得删除本行注释Dim i As IntegerFor i = 1 To 200If i Mod 3 = 0 And i Mod 7 = 0 ThenText1.Text = Text1.Text + Str(i)End IfNextEnd SubPrivate Sub Command1_Click()''' 不得删除本行注释Dim sum As Single, i As IntegerOpen App.Path & "\" & "Jsdata.txt" For Input As #1 For i = 1 To 15Input #1, Arr(i)Next iClose #1If Op1 ThenT1.Text = AaaEnd IfIf Op2 ThenT1.Text = BbbEnd IfEnd SubPrivate Sub Command1_Click()''' 不得删除本行注释Dim i As Integer, n As Integer, s As Integern = Val(Text1.Text)If n < 0 Or (Not IsNumeric(Text1.Text)) Then MsgBox "请输入正整数", 48, "输入的不是正整数" s = 0For i = 1 To nIf i Mod 3 = 0 Thens = s + iEnd IfNext iText2.Text = sEnd SubPrivate Sub Command1_Click()''' 不得删除本行注释Dim a As Integera = Val(Text1.Text)Text2.Text = zh(a)‘ zh过程在原本的程序代码中已经有了～直接可用End SubPrivate Sub Command1_Click() ''' 不得删除本行注释Dim x As DoubleDim y As Doublex = Val(Text1.Text)If x < 10 Theny = x - 1ElseIf x < 20 Theny = 2 * x - 1Else: y = 3 * x - 1End IfText2.Text = yEnd SubPrivate Sub Command1_Click()''' 不得删除本行注释Text1.Text = ""Open App.Path & "\" & "zfwj.txt" For Input As #1For i = 1 To 10Input #1, a(i)Text1.Text = Text1.Text & " " & a(i)Next iClose #1End Sub Private Sub Command2_Click()''' 不得删除本行注释Dim t As StringText2.Text = ""For i = 1 To 10t = a(i)a(i) = a(10 - i + 1)a(10 - i + 1) = tText2.Text = Text2.Text & " " & a(i) Next iEnd SubPrivate Sub Command1_Click()Dim a As IntegerDim b As Integera = Val(Text1.Text)b = Val(Text2.Text)Label1.Caption = Int(Rnd() * (b - a + 1) + a) Label2.Caption = Int(Rnd() * (b - a + 1) + a) Label3.Caption = Int(Rnd() * (b - a + 1) + a)End SubPrivate Sub Command1_Click()Dim s as stringOpen App.Path & "\" & "Bdata.txt" For Input As #1 Do While Not EOF(1)Line Input #1, sText1.Text = Text1.Text + s + Chr(13) + Chr(10) LoopClose #1End SubPrivate Sub Command1_Click()'''不得删改本行注释Dim n As Integern = Val(Text1.Text)If n < 100 Or n > 999 ThenMsgBox "请输入三位正整数", , "输入出错" Else: Text2.Text = Int(n Mod 10)Text3.Text = Int((n Mod 100) / 10)Text4.Text = Int(n / 100)End IfEnd SubPrivate Sub Command1_Click()'产生按钮的代码i = List1.ListIndexFor i = 0 To 9List1.AddItem Int(90 * Rnd + 10)Next iEnd SubPrivate Sub Command3_Click() ’清除按钮的代码List1.ClearList2.ClearEnd Sub Private Sub Command2_Click()'''不得删改本行注释Dim n As Double, j As Integeri = List1.ListIndexFor i = List1.ListCount - 1 To 0 Step -1 n = Val(List1.List(i))If n Mod 2 = 1 ThenList2.AddItem nList1.RemoveItem iEnd IfNext iEnd SubPrivate Sub Command1_Click()‘”读入数据”按钮代码'''不得删除本行注释Dim st As StringText1.Text = ""Open App.Path & "\" & "yy.txt" For Input As #1While Not EOF(1)Input #1, stText1.Text = Text1.Text + st + vbCrLf WendClose #1End Sub Private Sub Command2_Click()'''不得删除本行注释Dim x As String, y As String * 1, n As Integer, i As Integer, p As Integerx = Trim(Text1.Text)n = Len(x)p = 0For i = 1 To ny = UCase(Mid(x, i, 1))If y >= "A" And y <= "Z" Thenp = p + 1End IfNext iLabel1.Caption = "共" & p & "个字母"End SubPrivate Sub Command1_Click()'''不得删除本行注释Dim n As Integer, k As Integer, i As IntegerFor n = 200 To 300k = Int(Sqr(n))For i = 2 To kIf n Mod i = 0 Then Exit ForNext iIf i > k Then List1.AddItem nNext nEnd Sub。
计算机二级《VB》考试试题及答案合集一篇
计算机二级《VB》考试试题及答案合集一篇计算机二级《VB》考试试题及答案 11SUBSTR(″ABCDEF″，3，2)结果是()A.ABB.CDC.FED.CB参__：B2数据库的故障恢复一般是由()A.数据流图完成的B.数据字典完成的C.DBA完成的D.PAD图完成的参__：C3不能脱离控件(包括客体)而独立存在的过程是A.事件过程B.通用过程C.Sub过程D.函数过程参__：A4当前目录下有两个表文件，MEN.DBF和WOM.DBF，分别记录男生成绩档案和女生成绩档案，但男生中部分物理缺考，若要统计物理成绩而将所有参加物理考试的档案合并，正确操作是()E WOM IN 0E WOM IN 0USE MEN IN 0 APPEND FROM MEN FOR 性别=′男′APPEND FROM WOM FOR 性别=′男′C.COPY FILES TO WOM FOR 性别=′男′E MENCOPY TO WOM FOR 性别=′男′参__：B5下列叙述中正确的是()A.线性表是线性结构B.栈与队列是非线性结构C.线性链表是非线性结构D.二叉树是线性结构参__：A6不属于循环结构的语句是()A.SCAN.__B.IF...ENDIFC.FOR...__.DO While...ENDDO参__：B7以下属于Visual Basic合法的数组元素是A.x8B.xC.s(0.D.v参__：C8在Visual FoxPro系统中，内存变量只定义了数组MK(12)，它具有12个下标变量。
用LIST MEMORY LIKE MK*命令显示已定义的内存变量数是()A.12B.1C.0D.有时是1，有时是12参__：B9依据PEO.DBF中的字段名NAME制作一个单一关键字索引文件NAME1.IDX，下列程序段所缺的内容是()CLOSE ALLUSE PEOLIST_____LISTE INDEX ON NAME FOR NAME1E INDEX ONNAME1C.INDEX ON NAME WITH NAME1D.INDEX ON NAME TO NAME1 参__：D10在“报表设计器”中，任何时候都可以使用“预览”功能查看报表的打印效果，以下4种操作中不能实现预览功能的是()A.直接单击常用工具栏上的“打印预览”按钮B.在“打表设计器”中单击鼠标右键，从弹出的快捷菜单中选择“预览”C.打开“显示”菜单，选择“预览”选项D.打开“报表”菜单，选择“运行报表”选项参__：D11在Visual FoxPro报表设计中，“学生成绩表”的报表布局类型是()A.列表B.行表C.标签D.多列表参__：A12以下叙述中，错误的是()A.工作区的系统别名和用户定义的数据表别名可以交替使用B.在某个工作区打开的数据表原名和工作区别名可以交替使用C.在某个工作区打开的数据表原名和数据表别名可以交替使用D.在选择工作区时，可以用工作区号、系统别名或打开的数据表别名参__：C13软件工程的理论和技术性研究的内容主要包括软件开发技术和()A.消除软件危机B.软件工程管理C.程序设计自动化D.实现软件可重用参__：B14编写如下两个事件过程：Private Sub Form_KeyDown (KeyCode As Integer, Shift As Integer) Print Chr(KeyCode.End SubPrivate Sub Form_KeyPress(KeyAscii As Integer)Print Chr(KeyAscii)End Sub在一般情况下(即不按住Shift键和锁定大写键时)运行程序，如果按“A"键，则程序输出的结果是A.A aB.a AC.A AD.a a参__：C15顺序执行下面两条命令：N=__.789@ 10,6 SAY N __ ″$ $ 999,999.9″屏幕显示的结果是()A.$ 123,456.7B.$$ 123,456.7C.$ 123,456.8D.$$ 123,456.8参__：A16在命令文件与被调用过程之间的参数传递要求()A.参数名相同B.参数个数相同C.参数类型相同D.B与C参__：B17单个用户使用的数据视图的描述称为()A.外模式B.概念模式C.内模式D.存储模式参__：A18下列各控件不包含滚动条的控件是A.ListBoxboBoxC.TextBoxbelBox参__：D19Visual FoxPro中，执行了SET DATE __N后，不能显示4位年份的命令是()A.?YEAR(DATE())B.?LEFT(DTOC(DATE())，4)C.?LEFT(DTOC(DATE()，1)，4)D.?SUBSTR(DTOC(DATE()，1)，1，4)参__：B20关于创建工具栏的说法，正确的是()A.只能定制Visual FoxPro系统工具栏，不能自定义工具栏B.不能定制Visual FoxPro系统工具栏，但可以自定义工具栏C.既能定制Visual FoxPro系统工具栏，也可自定义工具栏D.只能使用系统工具栏，不能自定义工具栏。
全国计算机二级VB模拟试题及答案
全国计算机二级VB模拟试题及答案全国计算机二级VB模拟试题及答案计算机二级考试是全国计算机等级考试（National Computer Rank Examination，简称NCRE）四个等级中的一个等级，考核计算机基础知识和使用一种高级计算机语言编写程序以及上机调试的基本技能。
那么全国计算机二级VB考试怎么考？以下仅供参考！1.在待排序的元素序列基本有序的前提下，效率最高的排序方法是(C)A)冒泡排序B)选择排序C)快速排序D)归并排序2.非空的循环单链表head的尾结点(由p所指向)，满足(A)A)p->next==NULLB)p==NULLC)p->next=headD)p=head3.线性表的顺序存储结构和线性表的链式存储结构分别是(C)A)顺序存取的存储结构、顺序存取的存储结构B)随机存取的存储结构、顺序存取的存储结构C)随机存取的存储结构、随机存取的存储结构D)任意存取的存储结构、任意存取的存储结构4.结构化程序设计所规定的三种基本控制结构是(D)A)输入、处理、输出B)树形、网形、环形C)顺序、选择、循环D)主程序、子程序、函数5.下列不属于软件调试技术的是(D)A)强行排错法B)集成测试法C)回溯法D)原因排除法6.软件生命周期中花费时间最多的阶段是(B)A)详细设计B)软件编码C)软件测试D)软件维护7.软件设计中，有利于提高模块独立性的一个准则是(A)A)低内聚低耦合B)低内聚高耦合C)高内聚低耦合D)高内聚高耦合8.数据库的故障恢复一般是由(D)A)数据流图完成的B)数据字典完成的C)DBA完成的D)PAD图完成的9.下列关系运算的叙述中，正确的是(B)A)投影、选择、连接是从二维表行的方向进行的运算B)并、交、差是从二维表的列的方向来进行运算C)投影、选择、连接是从二维表列的方向进行的运算D)以上3种说法都不对10.在关系数据库中，对一个关系做投影操作后，新关系的元组个数将(A)A)等于原来关系中的'元组个数B)大于原来关系中的元组个数C)小于原来关系中的元组个数D)不能确定元组个数11.以下不具有Picture属性的对象是(B)A)窗体B)图片框C)图像框D)文本框12.双击窗体中的对象后，Visual Basic将显示的窗口是(D)A)项目(工程)窗口B)工具箱C)代码窗口D)属性窗口13.若要将窗体从内存中卸载，其实现的方法是(A)A)ShowB)UnLoadC)LoadD)Hide14.要使目录列表框(名称为Dirl)中的目录随着驱动器列表框(名称为Drivel)中所选择的当前驱动器的不同而同时发生变化，则应：(A)A)在Dirl中的Change事件中，书写语句 Dirl.Drive=Drivel.DriveB)在Dirl中的Change事件中，书写语句 Dirl.Path=Drivel.DriveC)在Drivel中的Change事件中，书写语句Dirl.Path=Drivel.DriveD)在Drivel中的Change事件中，书写语句Dirl.Drive=Drivel.Drive15.设有如下声明：Dim x As Integer如果Sgn(x)的值为-1，则表示x的值是(A)A)整数B)大于0的整数C)等于0的整数D)小于0的数16.下述说法不正确的是(B)A)变量名的长度不能超过255个字符B)变量名可以包含小数点或者内嵌的类型声明字符C)变量名不能使用关键字D)变量名的第一个字符必须是字母17.下列可作为Visual Basic变量名的是(A)A)FilenameB)A(A+B)C)A%DD)Print18.语句Print Sgn(-6^2)+Abs(-6^2)+Int(-6^2)的输出结果是(BD)A)-36B)1C)-1D)-7219.下面说法中，不正确的是(D)A)Cls清除由Print方法显示的文本或在图片框中显示的图形，并把光标移到对象的左上角(0,0)B)当前窗体是用Picture属性装入的图形时，也可以用Cls方法清除C)Move方法用来移动窗体和控件，并改变其大小D)Cls方法中的对象，可以是窗体或图片框，如果省略则清除当前窗体中显示的内容20.假定在图片框Picturel中装入了一个图形，为了清除该图形(注意，清除图形，而不是删除图片框)，应采用的正确方法是(D)A)选择图片框，然后按Del键B)执行语句 Picturel.picture=LoadPicture("")C)执行语句 Picturel.picture=""D)选择图片框，在属性窗口中选择Picture属性条，然后按回车键21.线性表L=(a1,a2,a3,…ai,…an)，下列说法正确的是(D)A)每个元素都有一个直接前件和直接后件B)线性表中至少要有一个元素C)表中诸元素的排列顺序必须是由小到大或由大到小D)除第一个元素和最后一个元素外，其余每个元素都有一个且只有一个直接前件和直接后件22.设树T的度为4，其中度为1,2，3,4的结点个数分别为4,2，1,1。
2011年全国计算机等级考试二级VB模拟试卷（四）参考答案
2011年全国计算机等级考试二级VB模拟试卷（四）参考答案2011年全国计算机等级考试二级VB模拟试卷(四)参考答案一、选择题：35题，2分/题，共70分下列各题A)、B)、C)、D)四个选项中，只有一个选项是正确的，请将正确选项涂写在答题卡相应位置上，答在试卷上不得分。
1.执行以下程序段后,变量c的值为( )a = " Visual Basic Programing"b = "Quick"c =b & UCase (Mid(a,7,6) & Right(a,11)A)Visual BASIC ProgramingB)Quick Basic ProgramingC)QUICK Basic ProgramingD)Quick BASIC Programing分析:2.不能正确表示条件“两个整型变量A和B之一为0，但不能同时为0”的布尔表达式是（）A)A*B=0 and A+B<>0B)(A=0 or B=0)and (A<>0 OrB<>0)C)not(A=0 And B=0) and (A=0 or B=0)D)A*B=0 and (A=0 or B=0)分析:3. 下面子过程语句说明合法的是（）A)Function fl(ByVal n%)B)Sub fl (n%)As IntegerC)Function fl%(fl%)D)Sub fl(ByVal n%())分析:4.对窗体编写如下代码：Option Base 1Private Sub Form _KeyPress(KeyAscii As Integer) a=Array (237,126,587,48,498)ml=a(1)m2=1If KeyAscii=13ThenFor i=2 To 5If a (i)>ml Thenml=a (i)m2=iEnd IfNext iEnd IfPrint ml;print m2End Sub程序运行后，按回车键，输出结果为（）A)48 4B)237 1C)587 3D)498 4分析:5.Visual Basic 中没有提供下列（）事件A)MouseDownB)MouseUpC)MouseMoveD)MouseExit分析:6.执行下面对面的程序后，X的值为（）x=50Fox i=1 To 20 Step 2Next iA)66B)67C)68D)69分析:7.为了防止用户随意将光标置于控件之上，需做的工作是（）A)将控件的Enabled属性设置为FalseB)将控件的TabStop属性设置为FalseC)将控件的TabStop属性设置为TrueD)将控件的TabIndex属性设置为0分析:8.表达式String(2,"Shanghai")的值是（）A) ShB) ShanghaiC) ShanghaiShanghaiD) SS分析:9.为了在按回车键时执行某个命令按钮的事件过程，需要把该命令按钮的一个属性设置为True,这个属性是（）A) valueB) DefaulC) CancelD) Enabed分析:10.visual Basic 提供的缺省窗体包含（）A) 标题栏B)菜单栏C)工具条分析:11.假定有一个菜单项，名为MenuItem,为了在运行时该菜单项失效（变灰），应使用的语句为（）A)MenuItem.Enabled=FalseB)MenuItem.Enabled=TrueC)MenuItem.Visible=TrueD)MenuItem.Visible=False分析:12.下列不能打开菜单编辑器的操作是（）A)按Ctrl+EB)单击工具栏中的“菜单编辑器”按钮C)执行“工具”菜单中的“菜单编辑器”命令D)按Shift+Alt+M分析:13.列表框（如图2-6所示）经过下列操作后，剩余的项目是（）Listl.RemoveItem lListl.RemoveItem 2Listl.RemoveItem lA)aaB)bbC)ccD)dd分析:14.要暂时关闭计时器，应把计时器的某个属性设置为False，这个属性是（）A)VisibleB)TimerC)EnabledD)Interval分析:15.InputBox函数返回值的类型为（）A)数值B)字符串C)变体D)数值或字符串（视输入的数据而定）分析:16.当窗体的AutoRedraw属性采用默认值时，若在窗体装入时使用绘图方法绘制图形，则应将程序放在（）A)Paint事件B)Load事件C)Initilize事件D)Click事件分析:17.下列可以打开立即窗口的操作是（）A)Ctrl+DB)Ctrl+EC)Ctrl+FD)Ctrl+G分析:18.如是要向工具箱中加入控件和部件，可以利用“工程”的菜单中的（）命令A)引用B)部件C)工程属性D)添加窗体分析:19.若要清除列表框的所有内容，可用来实现的方法是（）A)RemoveitemB)ClsC)ClearD)以上均不可以分析:20.假定有下面的过程：Function Func(a As Integer,b As Integer)As IntegerStatic m As Integer, i As Integerm = 0i = 2i = i + m +1m = i + a + bFunc = mEnd Function在窗体上画一个命令按钮，然后编写如下事件过程：Private Sub Commandl_Click()Dim k As Integer, m As IntegerDim p As Integerk=4m=1p=Func(k,m)Print p;p=Func(k,m)Print pEnd Sub程序运行后，单击命令按钮，输出结果为（）。
2011年9月计算机等级考试二级VB笔试试题及答(word)-推荐下载
11、以下描述中错误的是 A)窗体的标题通过其 Caption 属性设置 B)窗体的名称（Name 属性）可以在运行期间修改 C)窗体的背景图形通过其 Picture 属性设置 D)窗体最小化时的图标通过其 Icon 属性设置
13、设有如下变量声明语句： Dim a,b As Boolean 则下面叙述中正确的是 A)a 和 b 都是布尔型变量 B)a 是变体型变量，b 是布尔型变量 C)a 是整型变量，b 是布尔型变量 D)a 和 b 都是变体型变量
14、下列可作为 Visual Basic 变量名的是 A)A#A B)4ABC C)?xy D)Print_Text
7、下列关于数据库设计的叙述中，正确的是 A)在需求分析阶段建立数据字典 B)在概念设计阶段建立数据字典 C)在逻辑设计阶段建立数据字典 D)在物理设计阶段建立数据字典
8、数据库系统的三级模式不包括 A)概念模式 B)内模式 C)外模式 D)数据模式
9、有三个关系 R、S 和 T 如下
则由关系 R 和 S 得到关系 T 的操作是 A)自然连接 B)差 C)交 D)并
5、某系统总体结构图如下图所示：
该系统总体结构图的深度是 A)7 B)6 C)3 D)2
6、程序调试的任务是 A)设计测试用例 B)验证程序的正确性 C)发现程序中的错误 D)诊断和改正程序中的错误
对全部高中资料试卷电气设备，在安装过程中以及安装结束后进行高中资料试卷调整试验；通电检查所有设备高中资料电试力卷保相护互装作置用调与试相技互术通关，1系电过，力管根保线据护敷生高设产中技工资术艺料0不高试仅中卷可资配以料置解试技决卷术吊要是顶求指层，机配对组置电在不气进规设行范备继高进电中行保资空护料载高试与中卷带资问负料题荷试2下卷2，高总而中体且资配可料置保试时障卷，各调需类控要管试在路验最习；大题对限到设度位备内。进来在行确管调保路整机敷使组设其高过在中程正资1常料中工试，况卷要下安加与全强过，看度并22工且22作尽22下可22都能22可地护以缩1关正小于常故管工障路作高高；中中对资资于料料继试试电卷卷保破连护坏接进范管行围口整，处核或理对者高定对中值某资，些料审异试核常卷与高弯校中扁对资度图料固纸试定，卷盒编工位写况置复进.杂行保设自护备动层与处防装理腐置，跨高尤接中其地资要线料避弯试免曲卷错半调误径试高标方中高案资等，料，编试要5写、卷求重电保技要气护术设设装交备备置底4高调、动。中试电作管资高气，线料中课并敷3试资件且、设卷料中拒管技试试调绝路术验卷试动敷中方技作设包案术，技含以来术线及避槽系免、统不管启必架动要等方高多案中项；资方对料式整试，套卷为启突解动然决过停高程机中中。语高因文中此电资，气料电课试力件卷高中电中管气资壁设料薄备试、进卷接行保口调护不试装严工置等作调问并试题且技，进术合行，理过要利关求用运电管行力线高保敷中护设资装技料置术试做。卷到线技准缆术确敷指灵设导活原。。则对对：于于在调差分试动线过保盒程护处中装，高置当中高不资中同料资电试料压卷试回技卷路术调交问试叉题技时，术，作是应为指采调发用试电金人机属员一隔，变板需压进要器行在组隔事在开前发处掌生理握内；图部同纸故一资障线料时槽、，内设需，备要强制进电造行回厂外路家部须出电同具源时高高切中中断资资习料料题试试电卷卷源试切，验除线报从缆告而敷与采设相用完关高毕技中，术资要资料进料试行，卷检并主查且要和了保检解护测现装处场置理设。备高中资料试卷布置情况与有关高中资料试卷电气系统接线等情况，然后根据规范与规程规定，制定设备调试高中资料试卷方案。
计算机等级考试(二级VB)模拟试题七
二级Visual Basic 模拟考试题七一．选择题1．设一张软盘已染上病毒，能清除病毒的措施是1 。
A. 删除该软盘上的所有文件B. 删除该软盘上的所有可执行文件C. 格式化该软盘D. 删除该软盘上的所有批处理文件2．I/O接口位于2 。
A. 总线和I/O设备之间B. CPU和I/O设备之间C. 主机和总线之间D. CPU和主存储器之间3．在Windows 95的“资源管理器”窗口中，如果想一次选定多个分散的文件或文件夹，正确的操作是 3 。
A. 按住Ctrl键，用鼠标右键逐个选取B. 按住Ctrl键，用鼠标左键逐个选取C. 按住Shift键，用鼠标右键逐个选取D. 按住Shift键，用鼠标左键逐个选取4．中文Windows 95中，实现全角与半角状态之间的切换，应按的键是4 。
A. Shift+空格B. Ctrl十空格C. Shift十CtrlD. Ctrl十F95．Windows 95中，在删硬盘上的文件时，如果不打算将删除的文件放入“回收站”，应在选定文件后5 。
A.直接按键盘上的Deltree键B.将选定文件拖到回收站中C.按Ctrl键的同时将选定文件拖到回收站中D.按Shift键的同时将选定文件拖到回收站中6.下列设备中，既能向主机输入数据，又能接收主机输出数据的设备是6 。
A. CD－ROMB. 显示器C. 软磁盘驱动器D. 光笔、扫描仪7．下列四个不同数制表示的数中，数值最大的7 。
A.二进制数11011101B.八进制数334C.十进制数219D.十六进制数DA8．下列与两个二进制数运算1011011.101+1100.101结果不等的是8 。
A. 1101000.01BB. 68.4HC. 104.2DD. 150.2Q9．在WINDOW95中，若在某一文档中连续进行了多次剪切操作，当关闭该文档后，"剪贴板"中存放的是9。
A.空白B. 所有剪切过的内容C. 最后一次剪切的内容D. 第一次剪切的内容10．在WINDOW95的资源管理器窗口中，为了将选定的硬盘上的文件或文件夹复制到软盘，应进行的操作是10 。
- 1、下载文档前请自行甄别文档内容的完整性，平台不提供额外的编辑、内容补充、找答案等附加服务。
- 2、"仅部分预览"的文档,不可在线预览部分如存在完整性等问题,可反馈申请退款(可完整预览的文档不适用该条件!)。
- 3、如文档侵犯您的权益，请联系客服反馈,我们会尽快为您处理(人工客服工作时间：9:00-18:30)。
1、数据库概念设计的过程中，视图设计一般有三种设计次序，以下各项中不对的是(D)
A. 自顶向下
B. 由底向上
C. 由内向外
D. 由整体到局部
2、用树形结构来表示实体之间联系的模型称为(B)
A. 关系模型
B. 层次模型
C. 网状模型
D. 数据模型
3、希尔排序法属于哪一种类型的排序法(B)
A.交换类排序法
B.插入类排序法
C.选择类排序法
D.建堆排序法
4、用树形结构来表示实体之间联系的模型称为(B)
A. 关系模型
B. 层次模型
C. 网状模型
D. 数据模型
5、索引属于(B)
A. 模式
B. 内模式
C. 外模式
D. 概念模式
6、下面对对象概念描述错误的是(A)
A. 任何对象都必须有继承性
B. 对象是属性和方法的封装体
C. 对象间的通讯靠消息传递
D. 操作是对象的动态性属性
7、下面描述中，符合结构化程序设计风格的是(A)
A. 使用顺序、选择和重复（循环）三种基本控制结构表示程序的控制逻辑
B. 模块只有一个入口，可以有多个出口
C. 注重提高程序的执行效率
D. 不使用goto语句
8、下面概念中，不属于面向对象方法的是 (D)
A. 对象
B. 继承
C. 类
D. 过程调用
9、在关系数据库中，用来表示实体之间联系的是(D)
A. 树结构
B. 网结构
C. 线性表
D. 二维表
10、关系表中的每一横行称为一个(A)
A. 元组
B. 字段
C. 属性
D. 码
11、检查软件产品是否符合需求定义的过程称为(A)
A. 确认测试
B. 集成测试
C. 验证测试
D. 验收测试
12、在下列选项中，哪个不是一个算法一般应该具有的基本特征(C)
A. 确定性
B. 可行性
C. 无穷性
D. 拥有足够的情报
13、数据库概念设计的过程中，视图设计一般有三种设计次序，以下各项中不对的是(D)
A. 自顶向下
B. 由底向上
C. 由内向外
D. 由整体到局部
14、数据库系统的核心是(B)
A. 数据模型
B. 数据库管理系统
C. 软件工具
D. 数据库
15、算法的时间复杂度是指(C)
A. 执行算法程序所需要的时间
B. 算法程序的长度
C. 算法执行过程中所需要的基本运算次数
D. 算法程序中的指令条数
16、设有下列二叉树：图见书P46
对此二叉树中序遍历的结果为(B)
A. ABCDEF
B. DBEAFC
C. ABDECF
D. DEBFCA
17、用树形结构来表示实体之间联系的模型称为(B)
A. 关系模型
B. 层次模型
C. 网状模型
D. 数据模型
18、数据流图用于抽象描述一个软件的逻辑模型，数据流图由一些特定的图符构成。
下列图符名标识的图符不属于数据流图合法图符的是(A)
A. 控制流
B. 加工
C. 数据存储
D. 源和潭
19、对长度为N的线性表进行顺序查找，在最坏情况下所需要的比较次数为(B) 注：要牢记
A. N+1
B. N
C. (N+1)/2
D. N/2
20、在结构化方法中，软件功能分解属于下列软件开发中的阶段是(C) 注：总体设计也就是概要设计
A. 详细设计
B. 需求分析
C. 总体设计
D. 编程调试
21、程序流程图（PFD）中的箭头代表的是(B)
A. 数据流
B. 控制流
C. 调用关系
D. 组成关系
22、算法的时间复杂度是指(C)
A. 执行算法程序所需要的时间
B. 算法程序的长度
C. 算法执行过程中所需要的基本运算次数
D. 算法程序中的指令条数
23、结构化程序设计主要强调的是(B)
A.程序的规模
B.程序的易读性
C.程序的执行效率
D.程序的可移植性
24、在下列选项中，哪个不是一个算法一般应该具有的基本特征(C)
A. 确定性
B. 可行性
C. 无穷性
D. 拥有足够的情报
25、设一棵完全二叉树共有699个结点，则在该二叉树中的叶子结点数为(B) 注：利用公式n=n0+n1+n2、n0=n2+1和完全二叉数的特点可求出
A. 349
B. 350
C. 255
D. 351
26、下面描述中，符合结构化程序设计风格的是(A)
A. 使用顺序、选择和重复（循环）三种基本控制结构表示程序的控制逻辑
B. 模块只有一个入口，可以有多个出口
C. 注重提高程序的执行效率
D. 不使用goto语句
27、下面不属于软件工程的3个要素的是(D)
A. 工具
B. 过程
C. 方法
D. 环境
28、下列叙述中正确的是(C)
A.数据库是一个独立的系统，不需要操作系统的支持
B.数据库设计是指设计数据库管理系统
C.数据库技术的根本目标是要解决数据共享的问题
D.数据库系统中，数据的物理结构必须与逻辑结构一致
29、信息隐蔽的概念与下述哪一种概念直接相关(B)
A.软件结构定义
B. 模块独立性
C. 模块类型划分
D. 模拟耦合度
30、在数据管理技术的发展过程中，经历了人工管理阶段、文件系统阶段和数据库系统阶段。
其中数据独立性最高的阶段是(A)
A. 数据库系统
B. 文件系统
C. 人工管理
D. 数据项管理。