[计算机类试卷]国家二级(VB)机试模拟试卷155及答案与解析.doc
《[计算机类试卷]国家二级(VB)机试模拟试卷155及答案与解析.doc》由会员分享,可在线阅读,更多相关《[计算机类试卷]国家二级(VB)机试模拟试卷155及答案与解析.doc(29页珍藏版)》请在麦多课文档分享上搜索。
1、国家二级( VB)机试模拟试卷 155及答案与解析 一、选择题 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, 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)设计数据库物理结构 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 Form1语句后,窗体 Form1消失,但仍在内存中 13 在窗体上有一个名称为 Command1的命令按钮,并编写有如下事件过程: Private Sub Command1_Click() Move 5
6、00, 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 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可以实现交换两个变量的值的操作, S1不能实现 ( C)用过程 S1和 S2都可以实现交换两个变量的值的
9、操作 ( D)用过程 S1和 S2都不能实现交换两个变量的值的操作 20 在窗体中添加一个命令按钮、一个标签和一个文本框,并将文本框的 Text属性置空,编写命令按钮 Command1的 Click事件代码: Private Function fun(x As Long)As Boolean lf x Mod2=0Then fun=True Else fun=False End If End Function Private Sub Command1_Click() Dim n As Long n=Val(Text1 Text) P=IIf(fun(n), “奇数 “, “偶数 “) Labe
10、l1 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)To1Step-1 s=s & Mid(ch, k, 1) Next k ch=s End Sub ( A) AB
11、CDEF ( B) FEDCBA ( C) A ( D) F 22 以下关于 Do UntilLoop 循环的说法正确的是 ( )。 ( A)先进入循环执行语句段落后,再判断是否再进 入循环 ( B)先进入循环执行语句段落后,再判断是否不再进入循环 ( C)执行前先判断是否不满足条件,若不满足才进入循环 ( D)执行前先判断是否不满足条件,若满足才进入循环 23 在窗体上画一个命令按钮,名称为 Command1,然后编写如下程序: Private Sub Command1_Click() For i=1To2 For i=1Toi Print String(i, “Hello“) Nextj
12、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=a+k Next k Print k; a ( A) -1 6 ( B) -1 16 ( C) 1
13、 6 ( D) 11 21 26 窗体上有名为 Text1、 Text2的两个文本框,和一个由 3个单选按钮组成的控件数组 Option1,如图 1所示。程序运行后,如果单击某个单选按钮,则执行 Text1中数值与该单选按钮所对应的运算 (乘 1、乘 10或乘 100),并将结果显示在 Text2中,如图 2所示。为了实现上述功能,在程序中的横线处应填入的内容是 ( )。Private Sub Option1_Click(_As Integer)IfText1 Text “ “ThenSelect Case_Case0: Text2 Text=Text1 TeXtCase1:Text2 Tex
14、t=Text1 Text*10Case2: Text2 Text=Text1 Text*100End SelectEnd IfEnd Sub ( A) Option1 Index ( B) Index ( C) Option1(Index) ( D) Option1(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
15、28 下列关于通用对话框 CD1的叙述中,错误的是 ( )。 ( A)使用 CD1 ShowColor方法,可显示 “颜色 ”对话框 ( B)显示 “字体 ”对话框前,必须先设置 CD1的 Flags属性,否则会出错 ( C)只要在 “打开 ”对话框中选择了文件,并单击 “打开 ”按钮,即可将选中的文件打开 ( D) CancelError属性用于控制用户单击 “取消 ”按钮关闭对话框 时,是否显示出错警告 29 在窗体上画 1个文本框,名称为 Text1,然后编写如下程序: Private Sub Form_Load() Open“C: dat txt“For Output As #1 Te
16、xt1 Text=“ End Sub Private Sub Text1_KeyPress(KeyAscii As Integer) If_=13Then If UCase(Text1 Text=_)Then Close1 End Else Write #1 Text1 Text Text1 Text=“ End If End If End Sub 程序的功能是,在 C盘根目录下建立 1个名为 dat txt的文件,在文本框中输入字符,每次按回车键 (回车符的 ASCII码是 13)都把当前文本框中的内容写入文件dat txt中,并清空文本框中的内容;如果输入 “END”,则结束程序,请选择适
17、合空白处的语句 ( )。 ( A) KevAscii “END“ ( B) Text1 Text “END“ ( C) Text1 Text 13 ( D) KevAscii 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+
18、aascore Print i, aa score, tota1 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 Command1_Click() Dim M(10)As Integer For k=1To10 M(k)=12-k Next k
19、x=6 Print M(2+M(x) End Sub 程序运行后,单击命令按钮,输出的结果是 ( )。 ( A) 4 ( B) 5 ( C) 6 ( D) 8 32 要清除已经在图片框 Picture1中打印的字符串而不清除图片框中的图像,应使用语句 ( )。 ( A) Picture1 Cls ( B) Picture1 Picture=LoadPicture(“) ( C) Picture1 Pint“ ( D) Picture1 Picture“ 33 执行以下程序后,在窗体上输出的是 ( )。 Private Sub Command1_Click() Dim a(20) For j=1
20、To20Step2 a(j)=j Next i 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 Until0 i=i+1 If i 10Then Exit Do Loop Print i End Sub ( A) 0 ( B) 10 ( C) 11 ( D)出错 35 窗体上有 1个 名为 List1的列表框,其中已经输入了若干个项目 (如图 3所示 );还有 2个文本框,名称分别为Text1、 Text2, 1个名称为 Com
21、mand1的命令按钮,并有以下程序: Private Sub Command1_Click()Dim str As String, s As String, k As Integers=Text1str=“For k=List1 ListCount-1To0Step-1If InStr(List1 List(k), s) 0Thenstr=str & List1 List(k)&“ “End IfNext kIf str=“ThenText2=“没有匹配项目 “ElseText2=strEnd IfEnd Sub程序运行时,在 Text1中输入 “京 ”,单击命令按钮,则在 Text2中显示的
22、内容是 ( )。 ( A)京 ( B)北京南京 ( C)南京北京 ( D)没有匹配的项目 36 下面程序运行时,若输入 395,则输出结果是 ( )。 Private Sub Cmd1_Click() Dim a a=InputBox(“请输入一个 3位整数 “) Print a Mo d10, 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 设已经在窗体上添加了一个通用对话框控件 CommonDialog1,以下语句正确的是 ( )。 ( A) CommonDialog1 Filter=
23、ALLL Files| *|=|Pictures(* Bmp)|* Bmp ( B) CommonDialog1 Filter=“ALLL Files“|* *|“Pictures(* Bmp)“|*Bmp ( C) CommonDialog1 Filter=ALLL Files|* *|Pictures(* Bmp)|* Bmp ( D) CommonDialog1 Filter=“ALLL Files|* *|Pictures(* Bmp)|* Bmp“ 38 Visual Basic根据计算机访问文件的方式将文件分成 3类,其中不包括 ( )。 ( A)顺序文件 ( B) Unix文件
24、( C)二进制文件 ( D)随机文件 39 用 Write和 Print语句向文件中写入多个数据的差别在于 ( )。 ( A) Write语句不会自动在数据项之间插入逗号 ( B) Print语句自动在数据项之间插入逗号 ( C) Wrilte语句写入字符串会自动给字符串加上双引号;写入的止数前面没有空格 ( D) Print语句写入字符串会自动给字符串加上双引号;写入的正数前面没有空格 40 窗体上建立了一个名为 CommonDiaIong1的通用对话框,用下面的语句建立一个对话框: CommonDialong1 Action=2,则以下语句与之等价的是 ( )。 ( A) CommonDi
- 1.请仔细阅读文档,确保文档完整性,对于不预览、不比对内容而直接下载带来的问题本站不予受理。
- 2.下载的文档,不会出现我们的网址水印。
- 3、该文档所得收入(下载+内容+预览)归上传者、原创作者;如果您是本文档原作者,请点此认领!既往收益都归您。
下载文档到电脑,查找使用更方便
2000 积分 0人已下载
下载 | 加入VIP,交流精品资源 |
- 配套讲稿:
如PPT文件的首页显示word图标,表示该PPT已包含配套word讲稿。双击word图标可打开word文档。
- 特殊限制:
部分文档作品中含有的国旗、国徽等图片,仅作为作品整体效果示例展示,禁止商用。设计者仅对作品中独创性部分享有著作权。
- 关 键 词:
- 计算机 试卷 国家 二级 VB 模拟 155 答案 解析 DOC
