[计算机类试卷]国家二级(VB)机试模拟试卷8及答案与解析.doc
《[计算机类试卷]国家二级(VB)机试模拟试卷8及答案与解析.doc》由会员分享,可在线阅读,更多相关《[计算机类试卷]国家二级(VB)机试模拟试卷8及答案与解析.doc(27页珍藏版)》请在麦多课文档分享上搜索。
1、国家二级( VB)机试模拟试卷 8及答案与解析 一、选择题 1 在关系代数运算中,有 5种基本运算,它们是 ( )。 ( A)并 ( )、差 (-)、交 ()、除 ()和笛卡儿积 () ( B)并 ( )、差 (-)、交 ()、投影 ()和选择 () ( C)并 ( )、交 ()、投影 ()、选择 ()和笛卡儿积 () ( D)并 ( )、差 (-)、投影 ()、选择 ()和笛卡儿积 () 2 在数据库系统的组织结构中,下列 ( )映射把用户数据库与概念数据库联系了起来。 ( A)外模式模式 ( B)内模式外模式 ( C)模式内模式 ( D)内模式模式 3 下列关于线性链表的描述中,正确的是
2、( )。 、只含有一个指针域来存放下一个元素地址 、指针域中的指针用于指向该结点的前一个或后一个结点 (即前件或后件 ) 、结点由两部分组成:数据域和指针域。 ( A)仅 、 ( B)仅 、 ( C)仅 、 ( D)全部 4 下面关于数据库三级模式结构的叙述中,正确的是 ( )。 ( A)内模式可以有多个,外模式和模式只有一个 ( B)外 模式可以有多个,内模式和模式只有一个 ( C)内模式只有一个,模式和外模式可以有多个 ( D)模式只有一个,外模式和内模式可以有多个 5 设有关键码序列 (66, 13, 51, 76, 81, 26, 57, 69, 23),要按关键码值递增的次序排序,
3、若采用快速排序法,并以第一个元素为划分的基准,那么第一趟划分后的结果为 ( )。 ( A) 23, 1 3, 5 1, 57, 66, 26, 8 1, 69, 76 ( B) 1 3, 23, 26, 51, 57, 66, 81, 76, 69 ( C) 23, 1 3, 5 1, 57, 26, 66, 8 1, 69, 76 ( D) 23, 13, 51, 57, 81, 26, 66, 69, 76 6 下列哪一条小属于数据库设计的任务 ?( ) ( A)设计数据库应用结构 ( B)设计数据库概论结构 ( C)设计数据库逻辑结构 ( D)设计数据库物理结构 7 数据库技术的根本目标
4、是 ( )。 ( A)数据存储 ( B)数据共享 ( C)数据查询 ( D)数据管理 8 需求分析阶段的任务是 ( )。 ( A)软件开发方法 ( B)软件开发工具 ( C)软件 开发费用 ( D)软件系统功能 9 关系数据库管理系统能实现的专门关系运算包括 ( )。 ( A)排序、索引、统计 ( B)选择、投影、连接 ( C)关联、更新、排序 ( D)显示、打印、制表 10 数据管理技术发展的三个阶段中, ( )没有专门的软件对数据进行管理。 人工管理阶段 文件系统阶段 数据库阶段 ( A)仅 ( B)仅 ( C) 和 ( D) 和 11 用户在组合框中输入或选择的数据可以通过一个属 性获得
5、,这个属性是 ( )。 ( A) List ( B) ListIndex ( C) Text ( D) ListCount 12 下列关于窗体的描述中,错误的是 ( )。 ( A)窗体的 Height、 Width属性用于设置窗体的高和宽 ( B)窗体的 Load事件在加载窗体时发生 ( C)当窗体的 Enabled属性为 False时,通过鼠标和键盘对窗体的操作都被禁止 ( D)执行 UnLoad Forml语句后,窗体 Forml消失,但仍在内存中 13 在窗体上有一个名称为 Commandl的命令按钮,并编写有如下事件过程: Private Sub Command l_Click() M
6、ove 500, 500 End Sub 程序执行时,单击命令按钮,实现的功能是 ( )。 ( A)命令按钮移动到距窗体左边界、上边界各 500的位置 ( B)命令按钮向左、上方向各移动 500 ( C)窗体移动到距屏幕左边界、上边界各 500的位置 ( D)窗体向左、上方向各移动 500 14 表达式 Int(8*Sqr(36)*10(-2)*10+0 5) 10的值是 ( )。 ( A) 0 48 ( B) 0 048 ( C) 0 5 ( D) 0 05 15 在过程定义中, Private表示 ( )。 ( A)此过程可以被其他过程调用 ( B)此过程不可以被任何其他过程调用 ( C)
7、此过程只可以被本工程中的其他过程调用 ( D)此过程只可以被本窗体模块中的其他过程调用 16 为了使标签中的内容居中显示,应把 Alignment属性设置为 ( )。 ( A) 0 ( B) 1 ( C) 2 ( D) 3 17 为了在按 下回车键时执行某个命令按钮的事件过程,需要把该命令按钮的 ( )属性设 置为 True。 ( A) Value ( B) Cancel ( C) Enabled ( D) Default 18 下面叙述不正确的是 ( )。 ( A)对顺序文件中的数据操作只能按一定的顺序操作 ( B)顺序文件结构简单 ( C)能同时对顺序文件进行读写操作 ( D)顺序文件中只
8、能知道第一个记录的位置 19 假定有以下两个过程: Sub Sl(ByVal x As Interger,ByVal y As Interger) Dim t As Interger t=x: x=y: y=t End Sub Sub S2(x As Interger,y As Interger) Dim t As Interger t=x: x=y: y=t End Sub 则以下说法中正确的是 ( )。 ( A)用过程 S1可以实现交换两个变量的值的操作, S2不能实现 ( B)用过程 S2可以实现交换两个变量的 值的操作, S1不能实现 ( C)用过程 S1和 S2都可以实现交换两个变量
9、的值的操作 ( D)用过程 S1和 S2都不能实现交换两个变量的值的操作 20 在窗体中添加一个命令按钮、一个标签和一个文本框,并将文本框的 Text属性置空,编写 命令按钮 Commandl的 Click事件代码: Private Function fun(x As Long)As Boolean Ifx Mod 2=0 Then fun=True Else fun=False End If End Function Private Sub Command l_C lick() Dim n As Long n-=Val(Textl Text) p=IIf(fun(n), ”奇数 ”, ”偶数
10、 ”) Labell Caption=n&”是一个 ”&p End Sub 程序运行后,在文本框中输入 20,单击命令按钮后,标签中的内 容为 ( )。 ( A) 20是一个奇数 ( B) 20 ( C) 20是一个偶数 ( D) 2 21 下面程序的输出结果是 ( )。 Private Sub Commandl_Click() ch$=”ABCDEF” proc ch Print ch End Sub Private Sub proc(ch As String) s=“ For k=Len(ch)To 1 Step-1 s=s&Mid(ch, k, 1) Next k ch=s End Su
11、b ( A) ABCDEF ( B) FEDCBA ( C) A ( D) F 22 以下关于 Do UntilLoop 循环的说法正确的是 ( )。 ( A)先进入循环执行语句段落后,再判断是否再进入循环 ( B)先进入循环执行语句段落后,再判断是否不再进入循环 ( C)执行前先判断是否不满足条件,若不满足才进入循环 ( D)执行前先判断是否不 满足条件,若满足才进入循环 23 在窗体上画一个命令按钮,名称为 Commandl,然后编写如下程序: Private Sub Command l_Click() For i=1 To 2 Forj=l To i Print String(i, ”H
12、ello”) Nextj Print Next i End Sub 程序运行后,如果单击命令按钮,则在窗体上显示的内容是 ( )。 24 下列不能打开工具箱窗口的操作是 ( )。 ( A)执行 “视图 ”菜单中的 “工具箱 ”命令 ( B)按 AIt+F8键 ( C)单击工具栏上的 “工具箱 ”按钮 ( D)按 Alt+V,然后按 AIt+X键 25 下列程序段的执行结果为 ( )。 a=6 For k=1 To 0 a=a+k Next k Print k; a ( A) -1 6 ( B) -1 1 6 ( C) 1 6 ( D) 1 1 21 26 窗体上有名为 Textl、 Text2
13、的两个文本框,和一个由 3个单选按钮组成的控件数组 Optionl, 如图 1所示。程序运行后,如果单击某个单选按钮,则执行 Textl中数值与该单选按钮所 对应的运算 (乘 1、乘 1 0或乘 100),并将结果显示在 Text2中,如图 2所示。为了实现 上述功能,在程序中的横线处应填入的内容是 ( )。Private Sub Option l_Click(_As Integer) IfTextl Text ”Then Select Case_ Case 0: Text2 Text=Textl Text Case 1: Text2 Text=Textl Text*10 Case 2:Tex
14、t2 Text=Textl Text*100 End Select End IfEnd Sub ( A) Optionl Index ( B) Index ( C) Option l(Index) ( D) Option l(Index) Value 27 下列程序运行后,输出结果为 ( )。 Sub abcd(ByVal n As Integer) n=n+5 End Sub Private Sub Form Click() n =3 Call abcd(n ) Print n End Sub ( A) 3 ( B) 4 ( C) 5 ( D) 8 28 下列关于通用对话框 CDl的叙述中,
15、错误的是 ( )。 ( A)使用 CDl ShowColor方法,可显示 “颜色 ”对话框 ( B)显示 “字体 ”对话框前,必须先设置 CDl的 Flags属性,否则会出错 ( C)只要在 “打开 ”对话框中选择了文件,并单击 “打开 ”按钮,即可将选中的文件打开 ( D) CancelError属性用于控制用户单击 “取消 ”按钮关闭对话框时,是否显示出错警告 29 在窗体上画 1个文本框,名称为 Textl,然后编写如下程序: Private Sub Form Load() Open”C: dat txt”For Output As#1 Textl Text=” End Sub Priv
16、ate Sub Text 1_KeyPress(KeyAscii As Integer) If_=13 Then If UCase(Textl Text= _)Then Close 1 End Else Write#1 Textl Text Textl Text=“ End If End If End Sub 程序的 功能是,在 C盘根目录下建立 1个名为 dat txt的文件,在文本框中输入字符,每 次按回车键 (回车符的 ASC 码是 13)都把当前文本框中的内容写入文件 dat txt 中,并清空文本框中的内容;如果输入 “END”,则结束程序,请选择适合空白处 的语句 ( )。 ( A
17、) KeyAscii ”END” ( B) Textl Text ”END” ( C) Textl Text 13 ( D) KeyAscii 13 30 下列程序的执行结果是 ( )。 Private Sub Form_Activate() Dim score(3)As Integer,total As Integer Dim aa_score As Variant score(1)=50: score(2)=14:score(3)=36 total=0; i=0 For Each aa_score In score i=i+1 total=total+aa_score Print i,aa
18、_score tota l Next End Sub 31 在窗体上画一个名为 Commandl的命令按钮,编写 如下程序: Private Sub Command l_Click() Dim M(10)As Integer For k=1 To 10 M(k)=12-k Next k x=6 Print M(2+M(x) End Sub 程序运行后,单击命令按钮,输出的结果是 ( )。 ( A) 4 ( B) 5 ( C) 6 ( D) 8 32 要清除已经在图片 框 Picturel中打印的字符串而不清除图片框中的图像,应使用语句 ( )。 ( A) Picture 1 Cls ( B)
19、Picture 1 Picture=LoadPicture(”) ( C) Picture 1 Pint” ( D) Picture 1 Picture“ 33 执行以下程序后,在窗体上输出的是 ( )。 Private Sub Command l_Click() Dim a(20) For i=1 To 20 Step 2 a(j)=j Next j Print a(1)+a(2)+a(3) End Sub ( A) 4 ( B) 5 ( C) 6 ( D) 7 34 下面程序的运行结果是 ( )。 Private Sub Form Click() i=0 Do Until 0 i=i+1
20、If i 10 Then Exit Do Loop Print i End Sub ( A) 0 ( B) 10 ( C) 11 ( D)出错 35 窗体上有 1个名为 List1的列表框,其中已经输入了若干个项目 (如图 3所示 );还有 2个 文本框,名称分别为 Text1、 Text2, 1个名称为 Commandl的命令按钮,并有以下程序: Private Sub Command 1_Click() Dim str As String, s As String, k As Integer s=Textl str=“ For k=Listl ListCount-1 To 0 Step-1
21、 If InStr(Listl List(k), s) 0 Then str=str&Listl List(k)&” ” End If Next k If str=“Then Text2=”没有匹配项目 ” Else Text2=str End IfEnd Sub 程序运行时,在 Textl中输入 “京 ”,单击命令按钮,则在Text2中显示的内容是 ( )。 ( A)京 ( B)北京南京 ( C)南京 北京 ( D)没有匹配的项目 36 下面程序运行时,若输入 395,则输出结果是 ( )。 Private Sub Cmdl_Click() Dim a a=InputBox(”请输入一个 3
22、位整数 ”) Print a Mod 10, a 100, (a Mod 100) 10 End Sub ( A) 5 9 3 ( B) 3 5 9 ( C) 5 3 9 ( D) 3 9 5 37 设已经在窗体上添加了一个通用对话框控件 CommonDialogl,以下语句正确的是 ( )。 ( A) CommonDialogl Filter=ALLL Files|*.*|=|Pictures(* Bmp)|*.Bmp ( B) CommonDialogl Filter=”ALLL Files“|*.*|“=|Pictures(* Bmp)“|*.Bmp ( C) CommonDialogl
23、 Filter=ALLL Files|*.*|=|Pictures(* Bmp)|*.Bmp ( D) CommonDialog 1 Filter=”ALLL Files |*.*|=|Pictures(* Bmp)|*.Bmp” 38 Visual Basic根据计算机访问文件的方式将文件分成 3类,其中不包括 ( )。 ( A)顺序文件 ( B) Unix文件 ( C)二进制文件 ( D)随机文件 39 用 Write和 Print语句向文件中写入多个数据的差别在于 ( )。 ( A) Write语句不会自动在数据项之间插入逗号 ( B) Print语句自动在数据 项之间插入逗号 ( C)
24、 Write语句写入字符串会自动给字符串加上双引号;写入的正数前面没有空格 ( D) Print语句写入字符串会自动给字符串加上双引号;写入的正数前面没有空格 40 窗体上建立了一个名为 CommonDialongl的通用对话框,用下面的语句建立一个对话框: CommonDialongl Action=2,则以下语句与之等价的是 ( )。 ( A) CommonDialon 1 ShowOpen ( B) CommonDialog 1 ShowSave ( C) CommonDialog 1 ShowColor ( D) CommonDialog 1 ShowFont 二、基本操作题 41 请
- 1.请仔细阅读文档,确保文档完整性,对于不预览、不比对内容而直接下载带来的问题本站不予受理。
- 2.下载的文档,不会出现我们的网址水印。
- 3、该文档所得收入(下载+内容+预览)归上传者、原创作者;如果您是本文档原作者,请点此认领!既往收益都归您。
下载文档到电脑,查找使用更方便
2000 积分 0人已下载
下载 | 加入VIP,交流精品资源 |
- 配套讲稿:
如PPT文件的首页显示word图标,表示该PPT已包含配套word讲稿。双击word图标可打开word文档。
- 特殊限制:
部分文档作品中含有的国旗、国徽等图片,仅作为作品整体效果示例展示,禁止商用。设计者仅对作品中独创性部分享有著作权。
- 关 键 词:
- 计算机 试卷 国家 二级 VB 模拟 答案 解析 DOC
