[计算机类试卷]VB笔试模拟试卷21及答案与解析.doc
《[计算机类试卷]VB笔试模拟试卷21及答案与解析.doc》由会员分享,可在线阅读,更多相关《[计算机类试卷]VB笔试模拟试卷21及答案与解析.doc(25页珍藏版)》请在麦多课文档分享上搜索。
1、VB 笔试模拟试卷 21 及答案与解析 1 栈和队列的共同特点是 ( A)都是先进先出 ( B)都是先进后出 ( C)只允许在端点处插入和删除元素 ( D)没有共同点 2 已知二叉树后序遍历序列是 dabec,中序遍历序列是 debac,它的前序遍历序列是 ( A) acbed ( B) decab ( C) deabc ( D) cedba 3 链表不具有的特点是 ( A)不必事先估计存储空间 ( B)可随机访问任一元素 ( C)插入删除不需要移动元素 ( D)所需空间与线性表长度成正比 4 结构化程序设计 的 3种结构是 ( A)顺序结构、选择结构、转移结构 ( B)分支结构、等价结构、循
2、环结构 ( C)多分支结构、赋值结构、等价结构 ( D)顺序结构、选择结构、循环结构 5 为了提高测试的效率,应该 ( A)随机选取测试数据 ( B)取一切可能的输人数据作为测试数据 ( C)在完成编码以后制定软件的测试计划 ( D)集中对付那些错误群集的程序 6 算法的时间复杂度是指 ( A)执行算法程序所需要的时间 ( B)算法程序的长度 ( C)算法执行过程中所需要的基本运算次数 ( D)算法程序中的指令条数 7 软件生命周期中所花费用最多的阶段是 ( A)详细设计 ( B)软件编码 ( C)软件测试 ( D)软件维护 8 数据库管理系统 DBMS中用来定义模式、内模式和外模式的语言为
3、( A) C ( B) Basic ( C) DDL ( D) DML 9 下列有关数据库的描述,正确的是 ( A)数据库是一个 DBF文件 ( B)数据库是一个关系 ( C)数据库是一个结构化的数据集合 ( D)数据库是一组文件 10 下列有关数据库的描述,正确的是 ( A)数据处理是将信息转化为数据的过程 ( B)数据的物理 独立性是指当数据的逻辑结构改变时,数据的存储结构不变 ( C)关系中的每一列称为元组,一个元组就是一个字段 ( D)如果一个关系中的属性或属性组并非该关系的关键字,但它是另一个关系的关键字,则称其为本关系的外关键字 11 以下能正确定义数据类型 TelBook的代码是
4、 ( A) TypeTelBook Name As String*10 TelNum As Integer EndType ( B) Type TelBook Name As String*10 TelNum As Integer End TelBook ( C) Type TelBook Name String*10 TelNum Integer EndTypeTelBook ( D) Typedef TelBook Name String*10 TelNum Integer End Type 12 以下声明语句中错误的是 ( A) Const varl 123 ( B) Dim var2
5、ABC ( C) Defint a 2 ( D) Static var3 As Integer 13 设窗体上有 列表框控件 List1,且其中含有若干列表项。则以下能表示当前被选中的列表项内容的是 ( A) List1.List ( B) List1.List1ndex ( C) List1.Index ( D) List1.Text 14 程序运行后,在窗体上单击鼠标,此时窗体不会接收到的事件是 ( A) MouseDown ( B) MouseUp ( C) Load ( D) Click 15 设 a=10, b=5, c=1,执行语句 Printa b c后,窗体上显示的是 ( A)
6、 Tree ( B) False ( C) 1 ( D)出错信息 16 如果要改变窗体的标题,则需要设置的属性是 ( A) Caption ( B) Name ( C) BackColor ( D) BorderStyle 17 以下能判断是否到达文件尾的函数是 ( A) BOF ( B) LOC ( C) LOF ( D) EOF 18 如果一个工程含有多个窗体及标准模块,则以下叙 述中错误的是 ( A)如果工程中含有 SubMain过程,则程序一定首先执行该过程 ( B)不能把标准模块设置为启动模块 ( C)用 Hide方法只是隐藏一个窗体,不能从内存中清除该窗体 ( D)任何时刻最多只有
7、上个窗体是活动窗体 19 窗体的 MouseDown事件过程 Form MouseDown(Button As Integer,Shift As Integer, X As SinSle, Y As Single) 有 4个参数,关于这些参数,正确的描述是 ( A)通过 Button参数 判定当前按下的是哪一个鼠标键 ( B) Shift参数只能用来确定是否按下 Shift键 ( C) Shift参数只能用来确定是否按下 Alt和 Ctrl键 ( D)参数 x, y用来设置鼠标当前位置的坐标 20 设组合框 Combol中有 3个项目,则以下能删除最后一项的语句是 ( A) Combo1.Re
8、moveltem Text ( B) Combo1.Removehem 2 ( C) Combo1.Removeltem 3 ( D) Combo1.Removeltem Combo1.Listcount 21 以下关于 焦点的叙述中,错误的是 ( A)如果文本框的 TabStop属性为 False,则不能接收从键盘上输入的数据 ( B)当文本框失去焦点时,触发 LostFocus 事件 ( C)当文本框的 Enabled属性为 False时,其 Tab顺序不起作用 ( D)可以用 Tablndex属性改变 Tab顺序 22 如果要在菜单中添加一个分隔线,则应将其 Caption属性设置为 (
9、 A) ( B) * ( C) & ( D) - 23 执行语句 Open“Tel.dat“For Random As #1 Len=50后,对文件 Tel.dat中的数据能够执行的操作是 ( A)只能写,不能读 ( B)只能读,不能写 ( C)既可以读,也可以写 ( D)不能读,不能写 24 在窗体上画一个名称为 Command1的命令按钮和两个名称分别为 Text1、 Text2的文本框,然后编写如下事件过程: Private Sub Commandl_Click( ) n=Text1.Text Select Case n Case 1 T0 20 x=10 Case 2, 4, 6 x=
10、20 Case ls10 x=30 Case 10 x=40 End Select TextText=x End Sub 程序运行后,如果在文本框 Text1中输入 10,然后单击命令按钮,则在 Text2中显示的内容是 ( A) 10 ( B) 20 ( C) 30 ( D) 40 25 设有以下循环结构 Do 循环体 Loop While条件 则以下叙述中错误的是 ( A)若 “条件 ”是一个为 0的常数,则一次也不执行循环体 ( B) “条件 ”可以是关系表达式、逻辑表达式或常数 ( C)循环体中可以使用 Exit Do语句 ( D)如果 “条件 ”总是为 True,则不停地执行循环体
11、26 在窗体上画一个名称为 Command1的命令按钮,然后编写如下事件过程: Private Sub Command1_Click( ) Dim num As Integer num=1 DO Until num 6 Print num; num=num+4 Loop End Sub 程序运行后,单击命令按钮,则窗体上显示的内容是 ( A) 1 3.4 5.8 ( B) 1 3 5 ( C) 1 4 7 ( D)无数据输出 27 在窗体上画一个名称为 Command1的命令按钮,然后编写如 下事件过程: Private Sub Command1 Click( ) Dim a As Integ
12、er, s As Integer a 8 s 1 Do S=s+a a=a-1 Loop While a=0 Prim s, a End Sub 程序运行后,单击命令按钮,则窗体上显示的内容是 ( A) 7 9 ( B) 34 0 ( C) 9 7 ( D)死循环 28 设有如下通用过程: Public Function f(x As Integer) Dim y As Integer x=20 y=2 f=x*y End Function 在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程: Private Sub Command1_Click( ) Static x As
13、 Integer x=10 y=5 y=f(x) Print x; y End Sub 程序运行后,如果单击命令按钮,则在窗体上显示的内容是 ( A) 10 5 ( B) 20 5 ( C) 20 40 ( D) 10 40 29 设有如下通用过程: Public Sub Fun(a( ), ByVal x As Integer) For i=1 To 5 x=x+a(i) Next End Sub 在窗体上画一个名称为 Text1的文本框和一个名称为 Command1的命令按钮,然后编写如下的事件过程: Private Sub Command1_Click( ) Dimsn(5)As Var
14、iant For i=1 To 5 arc(i)=i Next n=10 Call Fun(arr( ), n) Textl.Text=n End Sub 程序运行后,单击命令按钮,则在文本框中显示的内容是 ( A) 10 ( B) 15 ( C) 25 ( D) 24 30 在窗体上画一个名称为 Command1的命令按钮,然后编写如下代码: OPtion Base l Private Sub Commandl_Click( ) d=0 c=10 x=Array(10, 12, 21, 32, 24) For i=1 To 5 If x(i) c Then d=d+x(i) C=x(i) E
15、lse d=d-c End lf Next i Print d End Sub 程序运行后,如果单击命令按钮,则在窗体上输出的内容为 ( A) 89 ( B) 99 ( C) 23 ( D) 77 31 在窗体上画两个滚动条,名称分别为 Hscroll1、 Hscroll2;六个标签,名称分别为 Label1、 Label2、 Label3, La- bel4、 Label5、 Label6,其中标签 Label4 Label6分别显示 “A”; “B”、 “A*B”等文字信息,标签 Label1、 La- bel2分别显示其右侧的滚动条的数值, LabeB显示 A*B的计算结果。如图所示。当
16、移动滚动框时,在相应的标签中显示滚动条的值。当单击命令按钮 “计算 ”时,对标签 Label1、 Label2中显示的两个值求积,并将结果显示在 Label3中。以下不能实现上述功能的事件过程是 ( A) Private Sub Command1_Click( ) Labe3.Caption=Str(Vs1(Label1.Caption)*Val(Label2.Caption) End Sub ( B) Private Sub Command1_Click( ) Labe3.Caption=Hscroll1.Value*HscrolValue End Sub ( C) Private Sub
17、Command1_Click( ) Labe3.Caption=Hscrol11*Hscrol12 End Sub ( D) Private Sub Command1 Chek( ) Labe13.Caption=HscrolText*HscrolText End Sub 32 在窗体上画一个名称为 Command1的命令按钮,然后编写如下事件过程: Private Sub Command1_Click( ) For n=1 T0 20 If n Mod 3 0 Then m=m+n3 Next n Print n End Sub 程序运行后,如果单击命令按钮,则窗体上显示的内容是 ( A)
18、15 ( B) 18 ( C) 21 ( D) 24 33 在窗体上画一个名称为 Text1的文本框,并编写如下程序: Private Sub Form Load( ) Show Text1.Text=“ Text1.SetFocus End Sub Pfivate Sub Form_MouseUp(BuHon As Integer, Shift As Integer, X As Single, Y As Single) Print“程序设计 ” End Sub Private Sub Text1_KeyDown(KeyCode As Integer, shift As Integer) Pr
19、int“Visua1 Basic“; End Sub 程序运行后,如果按 “A”键,然后单击窗体,则在窗体上显示的内容是 ( A) VisualBasic ( B)程序设计 ( C) A程序设计 ( D) Visual Basic程序设计 34 设有如下程序: Private Sub Command1_Click( ) Dim sum As Double, x As Double sum 0 n 0 For i 1 To 5 x n/i n n+1 sum=sum+x Next End Sub 该程序通过 For循环计算一个表达式的值,这个表达式是 ( A) 1+1/2+2/3+3/4+4/5
20、 ( B) 1+1/2+2/3 3/4 ( C) 1/2+2/3+3/4+4/5 ( D) 1+1/2+1/3+1/4+1/5 35 以下有关数组定义的语句序列中,错误的是 ( A) Static arr1(3) Arr1l(1)=100 Arr1(2)=“Hello” Arr1(3)=123.45 ( B) Dim art2( )As Integer Dim size As Integer Private Sub Command2_Click( ) size=Input Box(“输入: ”) ReDinl.arr2(size) End Sub ( C) Option Base 1 Priv
21、ate Sub Command3_Click( ) Dim arr3(3) As Integer End Sub ( D) Dim n As Integer Private Sub Command4_Click( ) Dim arr(n) As Integer End Sub 36 测试的目的是暴露错误,评价程序的可靠性;而【 】的目的是发现错误的位置并改正错误。 37 在最坏情况下,堆排序需要比较的次数为【 】。 38 若串 s=“Program“,则其子串的数目是【 】。 39 一个项目具有一个项目主管,一个项目主管可管理多个项目,则实体 “项目主管 ”与实体 “项目 ”的联系属于【 】的
22、联系。 40 数据库管理系统常见的数据模型有层次模型、网状模型和【 】三种。 41 下列表达式有错误,正确的写法应该是【 】。 (a+B)+c/80-5(d+e) 42 在窗体上画两个文本框,其名称分别为 Text1和 Text2,然后编写如下事件过程: Private Sub Form_Load() Show Text1.Text=“ TextText=“ TextSetFocus End Sub Private Sub Text2 KeyDown(KeyCode As Integer,Shift As Integer) Text1.Text=Text.Text+Chr(KeyCode-4)
23、 End Sub 程序运行后,如果在 Text2文本框中输入 “efghi”,则 Text1文本框中的内容为【 】。 43 当用【 】方式打开文件时,如果对文件进行与操作,则写入的数据附加到原来文件的后面。 44 在窗体上画 个命令按钮,其名称为 Command1,然后编写如下程序: Function M(x As Integer,y As Integer) M=IIf(x y,x, y) End FUNction Private Sub Command1 Click() Dim a As Integer,b As Integer a=100 b=200 Print M(a,B0 End Su
24、b 程序运行后,单击命令按钮,输出结果为【 】。 45 以下程序的功能是:从键盘上输入若干个学生的考试分数 ,当输入负数时结束输入,然后输出其中的最高分数和最低分数。请在【 】和【 】处填入适当的内容,将程序补充完整。 Private Sub Form_Click( ) Dim x As Single, amax As Single, amin As Single x=Input Box(“Enter a score“) amax=X amin=x Do While【 】 If x ama x Then Ama x=x End lf If【 】 Then amin=X End lf x=Inp
- 1.请仔细阅读文档,确保文档完整性,对于不预览、不比对内容而直接下载带来的问题本站不予受理。
- 2.下载的文档,不会出现我们的网址水印。
- 3、该文档所得收入(下载+内容+预览)归上传者、原创作者;如果您是本文档原作者,请点此认领!既往收益都归您。
下载文档到电脑,查找使用更方便
2000 积分 0人已下载
下载 | 加入VIP,交流精品资源 |
- 配套讲稿:
如PPT文件的首页显示word图标,表示该PPT已包含配套word讲稿。双击word图标可打开word文档。
- 特殊限制:
部分文档作品中含有的国旗、国徽等图片,仅作为作品整体效果示例展示,禁止商用。设计者仅对作品中独创性部分享有著作权。
- 关 键 词:
- 计算机 试卷 VB 笔试 模拟 21 答案 解析 DOC
