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