[计算机类试卷]国家二级(VB)机试模拟试卷162及答案与解析.doc
《[计算机类试卷]国家二级(VB)机试模拟试卷162及答案与解析.doc》由会员分享,可在线阅读,更多相关《[计算机类试卷]国家二级(VB)机试模拟试卷162及答案与解析.doc(30页珍藏版)》请在麦多课文档分享上搜索。
1、国家二级( VB)机试模拟试卷 162及答案与解析 一、选择题 1 下列关于栈和队列的描述中,正确的是 ( )。 ( A)栈是先进先出 ( B)队列是先进后出 ( C)队列允许在队头删除元素 ( D)栈在栈顶删除元素 2 已知二叉树后序遍历序列是 CDABE,中序遍历序列是 CADEB,它的前序遍历序列是 ( )。 ( A) ABCDE ( B) ECABD ( C) EACDB ( D) CDEAB 3 在数据流图中,带有箭头的线段表示的是 ( )。 ( A)控制流 ( B)数据流 ( C)模块 调用 ( D)事件驱动 4 结构化程序设计的 3种结构是 ( )。 ( A)顺序结构,分支结构,
2、跳转结构 ( B)顺序结构,选择结构,循环结构 ( C)分支结构,选择结构,循环结构 ( D)分支结构,跳转结构,循环结构 5 下列方法中,不属于软件调试方法的是 ( )。 ( A)回溯法 ( B)强行排错法 ( C)集成测试法 ( D)原因排除法 6 下列选项中,不属于模块间耦合的是 ( )。 ( A)内容耦合 ( B)异构耦合 ( C)控制耦合 ( D)数据耦合 7 下列特征中不是面 向对象方法的主要特征的是 ( )。 ( A)多态性 ( B)标识惟一性 ( C)封装性 ( D)耦合性 8 在数据库设计中,将 E-R图转换成关系数据模型的过程属于 ( )。 ( A)需求分析阶段 ( B)概
3、念设计阶段 ( C)逻辑设计阶段 ( D)物理设计阶段 9 在一棵二叉树上,第 5层的结点数最多是 ( )。 ( A) 8 ( B) 9 ( C) 15 ( D) 16 10 下列有关数据库的描述,正确的是 ( )。 ( A)数据库设计是指设计数据库管理系统 ( B)数据库技术的根本目标 是要解决数据共享的问题 ( C)数据库是一个独立的系统,不需要操作系统的支持 ( D)数据库系统中,数据的物理结构必须与逻辑结构一致 11 VissualBasic6 0集成环境的主窗口中不包括 ( )。 ( A)标题栏 ( B)菜单栏 ( C)状态栏 ( D)工具栏 12 在正确安装 Visual Basi
4、c6 0后,可以通过多种方式启动 Visual Basic6 0。以下方式中,不能启动 Visual Basic6 0的是 ( )。 ( A)通过 “我的电脑 ”找到 vb6 exe,双击该文件名 ( B)进入 DOS方式,执行 vb6 exe文件 ( C)通过 “开始 ”菜单中的 “运行 ”命令 ( D)通过 “开始 ”菜单中的 “程序 ”命令 13 下面 4个选项中,不是窗体属性的是 ( )。 ( A) UnLoad ( B) BorderStyle ( C) MinButton ( D) Caption 14 设计窗体时双击窗体的任何位置,将打开 ( )。 ( A)窗口设计器 ( B)代
5、码窗口 ( C)工具箱窗口 ( D)属性窗口 15 下面有关标准模块的叙述中,错误的是 ( )。 ( A)标准模块的 文件扩展名为 bas ( B)标准模块中的 Private过程不能被工程中的其他模块调用 ( C)标准模块不完全由代码组成,还可以有窗体 ( D)标准模块中的全局变量可以被工程中的任何模块引用 16 实现字符的 UniCode编码方式与 ANSI编码方式相互转换的函数是 ( )。 ( A) Str ( B) StrConv ( C) Trim ( D) Mid 17 若将变量 TestDate声明为 Date类型,则下列为变量 TestDate赋值的语句中正确的是 ( )。 (
6、 A) TestDate=date(“1 1 2002“) ( B) TestDate=#“1 1 2002“# ( C) TestDate=#1 1 2002# ( D) TestDate=Format(“m d yy“, “1 1 2002”) 18 窗体 Form1上有一个名称为 Command1的命令按钮,以下对应窗体单击事件的事件过程是 ( )。 ( A) Private Sub Form1_Click() End Sub ( B) Private Sub Form_Click() End Sub ( C) Private Sub Command1_Click() End Sub (
7、 D) Private Sub Command1_Click() End Sub 19 下列程序段的执行结果为 ( )。 Form1 Cls a=“ABBACDDCBA“ For i=6To2Step-2 X=Mid(a, i, i): y=Left(a, i) z=Right(a, i): z=x&y&z Next i Print z ( A) ABC ( B) BBABBA ( C) ABBABA ( D) AABAAB 20 不能正确表示条件 “两个整型变 量 A和 B之一为 0,但不能同时为 0”的布尔表达式是 ( )。 ( A) A*B=0 and A+B 0 ( B) (A=0 o
8、r B=0)and(A 0 Or B 0) ( C) not(A=0 And B=0)and(A=0 or B=0) ( D) A*B=0 and(A=0 or B=0) 21 在窗体 (Name属性为 Form1)上画两个文本框 (Name属性分别为 Text1和 Text2)和一个命令按钮 (Name属性为 Command1),然后编写如下两个事件过程: Private Sub Command1_Click() a=Text1 Text+Text2 Text Print a End Sub Private Sub Form_Load0 Text1 Text=“ “: Text2 Text=
9、“ “ End Sub 程序运行后,在第一个文本框 (Text1)和第二个文本框 (Text2)中分别输入 123和321,然后单击命令按钮,则输出结果为 ( )。 ( A) 444 ( B) 321123 ( C) 123321 ( D) 132231 22 组合框是文本框和 ( )特性的组合。 ( A)复选 框 ( B)标签 ( C)列表框 ( D)目录列表框 23 己知文本框的 ScrollBars属性设置为 3,却看不到任何效果,原因是 ( )。 ( A)文本框中没有内容 ( B)文本框的 Locked属性值为 True ( C)文本框的 MultiLine属性值为 False ( D
10、)文本框的 MultiLine属性值为 True 24 下面哪个属性不是框架控件的属性 ( )。 ( A) Caption ( B) Lett ( C) Text ( D) Enabled 25 复选框是否被选中,取决于复选框的 ( )。 ( A) Enabled属性 ( B) Value属性 ( C) Checked属性 ( D) Visible属性 26 窗体如图所示。要求程序运行时,在文本框 Text1中输入一个姓氏,单击 “删除 ”按钮 (名称为 Command1),则可删除列表框 List1中所有该姓氏的项目。若编写以下程序来实现此功能:Private Sub Command1_Cl
11、ick()Dim n, k n=Len(Text1 Text)For k=0To List1 ListCount-1If Lett(List1 List(k), n)=Text1 Text ThenList1 RemoveItem kEnd IfNext kEnd Sub在调试时发现,如输入 “陈 ”,可以正确删除所有姓 “陈 ”的项目,但输入 “刘 ”,则只删除了 “刘邦 ”、 “刘备 ”2项,结果如图 2所示。这说明程序不能适应所有情况,需要修改。正确的修改方案是把 For k=0To List1 ListCount-1改为 ( )。 ( A) For k=1To List1 ListCo
12、unt-1 ( B) For k=1To List1 ListCount ( C) For k=0To List1 ListCount ( D) For k=List1 ListCount-1To0Step-1 27 窗体上有 1个名为 List1的列表框,其中已经输入了若干个项目 (如图所示 );还有 2个文本框,名称分别为 Text1、 Text2, 1个名称为 Command1的命令按钮,并有以下程序。 Private Sub Command1_Click()Dim str As String, s As String, k As Integers=Text1: str=“ “For k
13、=List1 ListCount-1To0Step-1If InStr(List1 List(k), s) 0Thenstr=str&List1 List(k)&“ “End IfNextkIfstr=“ “ThenText2=“没有匹配项目 “ElseText2=strEnd IfEnd Sub程序运行时,在 Text1中输入 “京 “,单击命令按钮,则在 Text2中显示的内容是 ( )。 ( A)京 ( B)北京 南京 ( C)南京 北京 ( D)没有匹配的项目 28 设置定时器控件的 Interval属性为 2000, Enabled属性为 True,并且有下面的事件过程,程序运行时计
14、算机将发出 ( )次 Beep声。 Sub Timer1 Timer() Beep End Sub ( A) 0 ( B) 2000 ( C) 1 ( D)以上都不对 29 下列程序的输出结果为 ( )。 S1=“1“: S2=“2“: S1=Val(S1)+Val(S2) S2=Val(“12“) If S1 S2 Then Print S1-S2 Else Print S2-S1 ( A) -9 ( B) 9 ( C) -12 ( D) 0 30 在窗体上有一个名称为 Label1的标签和一个名称为 Timer1的计时器,并编写有如下几个事件过程: Private Sub Form_Loa
15、d() Timer1 Enabled=False Timer1 Interval=_ End Sub Private Sub Form_Click() Timer1 Enabled=_ End Sub Private Sub Timer1_Timer() Label1 Caption=_ End Sub 程序运行 后,单击窗体,将在标签中显示当前时间,每隔 1s钟变换一次,在横线处应填写 ( )。 ( A) 1000True Time$() ( B) 100True Time$() ( C) 1000False Time$() ( D) 100False Time$() 31 下列程序段的执行
16、结果为 ( )。 x=Int(Rnd+4) Select Case x Case5: Print“A Class“ Case4: Print“B Class“ Case3: Print“C Class“ CaseElse: Print“D Class“ End Select ( A) A Class ( B) B Class ( C) C Class ( D) D Class 32 有如下程序: Private Sub Form_Click() Dim i As Integer, sum As Integer sum=0 For i=2To10 If i Mod2 0And i Mod3=0T
17、hen sum=sum+i End If Next i Print sum End Sub 程序运行后,单击窗体,输出结果为 ( )。 ( A) 24 ( B) 30 ( C) 12 ( D) 18 33 下列程序段的执行结果为 ( )。 a=0: b=1 Do a=a+b: b=b+l Loop While a 10 Print a: b ( A) 10 30 ( B) a b ( C) 0 1 ( D) 10 5 34 某人编写了下面的程序,希望能把 Text1文本框中的内容写到 Temp txt文件中 Private Sub Command1_Click() Open“Temp txt“
18、For Output As#2 Print“Text1“ Close#2 End Sub 调试时发现没有达到目的,为实现上述目的,应做的修改是 ( )。 ( A)把所有 #2改为 #1 ( B)把 Print“Text1“改为 Print#2 Text1 ( C)把 Print“Text1“改为 Write“Text1“ ( D)把 Print“Text1“改为 Print Text1 35 Fibonacci数列的规律是:前 2个数为 1,从第 3个数开始,每个数是它前 2个数之和,即: 1, 1, 2, 3, 5, 8, 13, 21, 34, 55, 89, 。某人编写了下面的函数,判断
19、大于 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=1 Do、 Whhile x b c=a+b: a=b: b=C If x=b Then flag=True Loop Isfab=flag End Function 测试时发现对于所有正整数 x,函数都返回 False,程序需要修改。下面的修改方案中正
20、确的是 ( )。 ( 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 36 窗体上有一个名称为 Option1的单选按钮数组,程序运行时,当单击某个单选按钮时,会调用下面的事件过程 Private Sub Option1_Click(Index As Integer) End Sub 下面关于此过程的参数 Index的叙述中正确的是 ( )。 ( A) Index的值可正可负 ( B) Index
21、的值用来区分哪个单选按钮被选中 ( C) Index表示数组中单选按钮的数量 ( D) Index为 1表示单选按钮被选中,为 0表示未选中 37 以下叙述中正确的是 ( )。 ( A)一个 Sub过程至少要有一个 Exit Sub语句 ( B)一个 Sub过程必须有一个 End Sub语句 ( C)可以在 Sub过程中定义一个 Function过程,但不能定义 Sub过程 ( D)调用一个 Function过程可以获得多个返回值 38 设有如下过程: Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer) Print Ch
22、r(KeyCode) End Sub Private Sub Form_KeyUp(KeyCode As Integer, Shift As Integer) Print Chr(KeyCode+2) End Sub 若把窗体的 KeyPreview属性设置为 True,程序运行后,如果按 “A”键,则输出结果为 ( )。 ( A) A A ( B) A B ( C) A C ( D) A D 39 在窗体上画 1个命令按钮,名称为 Command1,然后编写如下程序: Dim Flag As Boolean Private Sub Command1_Click() Dim intNum As
23、 Integer intNum=InputBox(“请输入: “) If Flag Then Print f(intNum) End If End Sub Function f(X as Integer)As Integer If X 10Then Y=X Else Y=X+10 End If f=Y End Function Private Sub Form_MouseUp(Button As Integer, Shift As Integer, X as Single, Y As Single) Flag=True End Sub 运行程序,首先单击窗体,然后单击命令按钮,在输入对话框中输
24、入 5,则程序的输出结果为 ( )。 ( A) 0 ( B) 5 ( C) 15 ( D)无任何输出 40 在窗体上画一个驱动器列表框、一个目录列表框和一个文件列表框 ,其名称分别为 Drive1、 Dir1和 File1,为了使它们同步操作,必须触发驱动器的 Change事件和目录的 Change事件,在这两个事件中执行的语句分别为 ( )。 ( A) File1 Path=Drive1 Drive和 File1 Path=Dir1 Path ( B) Dir1 Path=Drive1 Drive和 File1 Path=Dir1 Path ( C) Dir1 Path=Dir1 Path和
- 1.请仔细阅读文档,确保文档完整性,对于不预览、不比对内容而直接下载带来的问题本站不予受理。
- 2.下载的文档,不会出现我们的网址水印。
- 3、该文档所得收入(下载+内容+预览)归上传者、原创作者;如果您是本文档原作者,请点此认领!既往收益都归您。
下载文档到电脑,查找使用更方便
2000 积分 0人已下载
下载 | 加入VIP,交流精品资源 |
- 配套讲稿:
如PPT文件的首页显示word图标,表示该PPT已包含配套word讲稿。双击word图标可打开word文档。
- 特殊限制:
部分文档作品中含有的国旗、国徽等图片,仅作为作品整体效果示例展示,禁止商用。设计者仅对作品中独创性部分享有著作权。
- 关 键 词:
- 计算机 试卷 国家 二级 VB 模拟 162 答案 解析 DOC
