[计算机类试卷]国家二级(VB)机试模拟试卷6及答案与解析.doc
《[计算机类试卷]国家二级(VB)机试模拟试卷6及答案与解析.doc》由会员分享,可在线阅读,更多相关《[计算机类试卷]国家二级(VB)机试模拟试卷6及答案与解析.doc(28页珍藏版)》请在麦多课文档分享上搜索。
1、国家二级( VB)机试模拟试卷 6及答案与解析 一、选择题 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 Visual Basic6 0集成环境的主窗口中不包括 ( )。 ( A)标题栏 ( B)菜单栏 ( C)状态栏 ( D)工具栏 12 在正确安装 Visual Basic
4、6 0后,可以通过多种方式启动 Visual Basic 6 0。以下方式中,不能启动 VisualBasic 6 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 窗体 Forml上有一个名称为 Commandl的命令按钮,以下对应窗体单击事件的事件过程是 ( )。 ( A) Private Sub Fornl 1 Click( ) End Sub ( B) Privte Sub Form_Click( ) End Sub ( C) Private Sub Commandl_ Click ( ) EndSu
7、b ( D) Private Sub Commandl_Click( ) End Sub 19 下列程序段的执行结果为 ( )。 Forml Cls a=“ABBACDDCBA” For i=6 To 2 Step_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
8、=0 or 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属性为 Forml)上画两个文本框 (Name属性分别为 Textl和 Text2)和一个命令按钮 (Name属 性为 Commandl),然后编写如下两个事件过程。 Private Sub Commandl_Click( ) a=TeXt1 Text+Text2 Text Print a End Sub Private Sub Form_Load( ) Textl Text=“ Text2
9、Text=“ End Sub 程序运行后,在第一个文本框 (Textl)和第二个文本框 (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 (
10、 D)文本框的 MultiLine属性值为 True 24 下面哪个属性不是框架控件的属性 ( )。 ( A) Caption ( B) Left ( C) Text ( D) Enabled 25 复选框是否被选中,取决于复选框的 ( )。 ( A) Enabled属性 ( B) Value属性 ( C) Checked属性 ( D) Visible属性 26 窗体如图 l所示。要求程序运行时,在文本框 Textl中输入一个姓氏,单击 ”删除 ”按钮 (名称为 Commandl),则可删除列表框 Listl中所有该姓氏的项目。若编写以下程序来实现此功能: Private Sub Comman
11、dI_Click( )Dim n, kn=Len(Textl TeXt)For k=0 To Listl ListCount_1IfLeft(Listl List(k),n)=Textl TextThenListl Removeltem kEndIfNextkEnd Sub在调试时发现,如输入 ”陈 ”,可以正确删除所有姓 “陈 ”的项目,但输入 ”刘 ”,则只删除了 ”刘邦 ”、 “刘备 ”2项,结果如图 2所示。这说明程序不能适应所有情况,需要修改。正确的修改方案是把 For k=oTo Listl ListCount-1改为 ( )。 ( A) For k=1 To Listl List
12、Count 1 ( B) For k=1 To Listl LiStCotmt ( C) For k=0 To Listl ListCount ( D) For k=List1 ListCount-1 To 0 Step-1 27 窗体上有 1个名为 Listl的列表框,其中已经输入了若干个项目 (如图 3所示 );还有 2个文本框,名称分别为 Textl、 Text2, 1个名称为 Commandl的命令按钮,并有以下程序。 Private Sub Commandl_Click( )Dim str As String, S As String, k As Integers=Textl: st
13、r=“For k=List 1 ListCount-1 To 0 Step-lIf InStr(List 1 List(k), s) 0 Thenstr=str&Listl List(k)&”“End IfNextkIfstr=“ThenText2=“没有匹配项目 ”ElseText2=strEndIfEndSub程序运行时,在 Textl中输入 ”京 ”,单击命令按钮,则在 Text2中显示的内容是 ( )。 ( A)京 ( B)北京南京 ( C)南京北京 ( D)没有匹配的项目 28 设置定时器控件的 Interval属性为 2 000, Enabled属性为 True,并且有下面的事件过
14、程,程序运行时计算机将发出 ( )次 Beep声。 Sub Timerl_Timer( ) Beep End Sub ( A) 0 ( B) 2000 ( C) 1 ( D)以上都不对 29 下列程序的输出结果为 ( )。 S1=“1”: S2=“2”: S1=Val(S1)+Val(S2):S2=Val(“12”)IfSl S2 Then Print S1-S2 Else Print S2-S1 ( A) -9 ( B) 9 ( C) -12 ( D) 0 30 在窗体上有一个名称为 Labell的标签和一个名称为 Timerl的计时器,并编写有如下几个事件过程: Private Sub F
15、orm_Load( )Timerl EnabledFalseTimer 1 InterVal=_End SubPrivate Sub Form_Click( ) Timerl Enabled=_End SubPrivate Sub Timerl_Timer( ) Label 1 Caption=_EndSub程序运行后,单击窗体,将在标签中显示当前时间,每隔 1 s钟变换一次,在横线处应填写 ( )。 ( A) 1 000 True Time$( ) ( B) 100 True Time$( ) ( C) 1000 False Time$( ) ( D) 100 False Time$( )
16、31 下列程序段的执行结果为 ( )。 x=Int(Rnd+4) Select Case x Case 5: Print”AClass” Case 4: Print”B Class” Case 3: Print”C Class” Case Else: 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=2 To 10 Ifi Mod
17、 2 0 And i Mod 3=0 Then sum=sum+i End If Nexti Print sum End Sub 程序运行后,单击窗体,输出结果为 ( )。 ( A) 24 ( B) 30 ( C) 12 ( D) 18 33 下列程序段的执行结果为 ( )。 a=0: b=1 Do a=a+b b=b+1 LoopWhile a 10 Print a: b ( A) 10 30 ( B) a b ( C) 0 1 ( D) 10 5 34 某人编写了下面的程序,希望能把 Textl文本框中的 内容写到 Temp txt文件中 Private Sub Command l_Cli
18、ck( ) Open”Temp txt”For Output As#2 Print”Textl” Close#2 End Sub 调试时发现没有达到目的,为实现上述目的,应做的修改是 ( )。 ( A)把所有 #2改为 #1 ( B)把 Print”Textl”改为 Print#2, Textl ( C)把 Print”Textl”改为 Write”Textl” ( D)把 Print”Textl”改为 Print Textl 35 Fibonacci数列的规律是:前 2个数为 1,从第 3个数开始,每个数是它前 2个数之和,即: 1, 1, 2, 3, 5, 8, 13, 21, 34, 5
19、5, 89, 。某人编写了下面的函数,判断大于 1的整数 x是否是 Fibonacci数列中的某个数,若是,则返回 True,否则返回 False。 Function Isfab(x As Integer)As Boolean Dim aAsInteger,bAs Integer,cAsInteger,flagAs Boolean flag=False a=1: b=1 Do Whilex b c=a+b: a=b: b=c Ifx=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)把 Ifx=b Then flag=True改为 Ifx=a Then flag=True 36 窗体上有一个名称为 Optionl的单选按钮数组,程序运行时,当单击某个单选按钮时,会调用下面的事件过程 Private Sub Optionl_click(Index As Integer) End Sub 下面关于此过程的参数 Index的叙述中正确的是 ( )。 ( A) Index的值可正可负 ( B)
21、 Index的值用来区分哪个单选按钮被选中 ( 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, ShiftAs Integer)Prin
22、t Chr(KeyCode)End SubPrivate Sub Form_KeyUp(KeyCode As Integer,Shift As Integer)Print Chr(KeyCode+2)End Sub若把窗体的 KeyPreview属性设置为 True,程序运行后,如果按 ”A”键,则输出结果为 ( )。 39 在窗体上画 1个命令按钮,名称为 Commandl,然后编写如下程序: Dim Flag As Boolean Private Sub Command l_Click( ) Dim intNum As Integer intNum=InputBox(“请输入: ”) If
23、Flag Then Print f(intNum) End If End Sub Function f(X as Integer)As Integer IfX 10 Then Y=X Else Y=X+10 EndIf f=Y End Function Private Sub Form_MouseUp(Button As Imeger,Shift As Integer,X as Single, Y As Single) Flag=True End Sub 运行程序,首先单击窗体,然后单击命令按钮,在输入对话框中输入 5,则程序的输出结果为 ( )。 ( A) 0 ( B) 5 ( C) 15
24、( D)无任何输出 40 在窗体上画一个驱动器列表框、一个目录列表框和一 个文件列表框,其名称分别为 Drivel、 Dirl和 Filel,为了使它们同步操作,必须触发驱动器的 Change事件和目录的 Change事件,在这两个事件中执行的语句分别为 ( )。 ( A) Filel Path=Drivel Drive和 Filel Path=Dirl Path ( B) Dirl Path=Drivel Drive和 Filel Path=Dirl Path ( C) Dirl Path=Dirl Path和 Filel Path=Drivel Drive ( D) Dirl Path=D
- 1.请仔细阅读文档,确保文档完整性,对于不预览、不比对内容而直接下载带来的问题本站不予受理。
- 2.下载的文档,不会出现我们的网址水印。
- 3、该文档所得收入(下载+内容+预览)归上传者、原创作者;如果您是本文档原作者,请点此认领!既往收益都归您。
下载文档到电脑,查找使用更方便
2000 积分 0人已下载
下载 | 加入VIP,交流精品资源 |
- 配套讲稿:
如PPT文件的首页显示word图标,表示该PPT已包含配套word讲稿。双击word图标可打开word文档。
- 特殊限制:
部分文档作品中含有的国旗、国徽等图片,仅作为作品整体效果示例展示,禁止商用。设计者仅对作品中独创性部分享有著作权。
- 关 键 词:
- 计算机 试卷 国家 二级 VB 模拟 答案 解析 DOC
