【计算机类职业资格】国家二级(VB)机试模拟试卷169及答案解析.doc
《【计算机类职业资格】国家二级(VB)机试模拟试卷169及答案解析.doc》由会员分享,可在线阅读,更多相关《【计算机类职业资格】国家二级(VB)机试模拟试卷169及答案解析.doc(16页珍藏版)》请在麦多课文档分享上搜索。
1、国家二级(VB)机试模拟试卷 169 及答案解析(总分:86.00,做题时间:90 分钟)一、选择题(总题数:40,分数:80.00)1.下列叙述中正确的是( )。(分数:2.00)A.线性表的链式存储结构与顺序存储结构所需要的存储空间是相同的B.线性表的链式存储结构所需要的存储空间一般要多于顺序存储结构C.线性表的链式存储结构所需要的存储空间一般要少于顺序存储结构D.线性表的链式存储结构与顺序存储结构在存储空间的需求上没有可比性2.下列叙述中正确的是( )。(分数:2.00)A.栈是一种先进先出的线性表B.队列是一种后进先出的线性表C.栈与队列都是非线性结构D.以上三种说法都不对3.软件测试
2、的目的是( )。(分数:2.00)A.评估软件可靠性B.发现并改正程序中的错误C.改正程序中的错误D.发现程序中的错误4.在软件开发中,需求分析阶段产生的主要文档是( )。(分数:2.00)A.软件集成测试计划B.软件详细设计说明书C.用户手册D.软件需求规格说明书5.软件生命周期是指( )。(分数:2.00)A.软件产品从提出、实现、使用维护到停止使用退役的过程B.软件从需求分析、设计、实现到测试完成的过程C.软件的开发过程D.软件的运行维护过程6.面向对象方法中,继承是指( )。(分数:2.00)A.一组对象所具有的相似性质B.一个对象具有另一个对象的性质C.各对象之间的共同性质D.类之间
3、共享属性和操作的机制7.层次型、网状型和关系型数据库划分原则是( )。(分数:2.00)A.记录长度B.文件的大小C.联系的复杂程度D.数据之间的联系方式8.一个工作人员可以使用多台计算机,而一台计算机可被多个人使用,则实体工作人员与实体计算机之间的联系是( )。(分数:2.00)A.一对一B.一对多C.多对多D.多对一9.数据库设计中反映用户对数据要求的模式是( )。(分数:2.00)A.内模式B.概念模式C.外模式D.设计模式10.有三个关系 R、S 和 T 如下: (分数:2.00)A.自然连接B.差C.交D.并11.以下叙述中正确的是( )。(分数:2.00)A.在属性窗口只能设置窗体
4、的属性B.在属性窗口只能设置控件的属性C.在属性窗口可以设置窗体和控件的属性D.在属性窗口可以设置任何对象的属性12.下列打开“代码窗口”的操作中错误的是( )。(分数:2.00)A.按 F4 键B.单击“工程资源管理器”窗口中的“查看代码”按钮C.双击已建立好的控件D.执行“视图”菜单中的“代码窗口”命令13.以下叙述中错误的是( )。(分数:2.00)A.Visual Basic 是事件驱动型可视化编程工具B.Visual Basic 应用程序不具有明显的开始和结束语句C.Visual Basic 工具箱中的所有控件都具有宽度(Width)和高度(Height)属性D.Visual Bas
5、ic 中控件的某些属性只能在运行时设置14.设 a=2,b=3,c=4,d=5,下列表达式的值是( )。 ab And cc(分数:2.00)A.TrueB.FalseC.一 1D.115.在标准模块中用 Public 关键字定义的变量,其作用域为( )。(分数:2.00)A.本模块所有过程B.整个工程C.所有窗体D.所有标准模块16.假定有如下语句: answer$=MsgBox(“Stringl“,“String2“,“String3“,2) 执行该语句后,将显示一个信息框,单击其中的“确定”按钮,则 answer$的值为( )。(分数:2.00)A.StringlB.String2C.S
6、tring3D.117.设 a=10,b=5,c=1,执行语句 Print abc 后,窗体上显示的是( )。(分数:2.00)A.TrueB.FalseC.1D.出错18.为了通过传值方式来传送过程参数,在函数声明部分应使用的关键字为( )。(分数:2.00)A.ValueB.ByValC.ByRefD.Reference19.以下说法中正确的是( )。(分数:2.00)A.事件过程也是过程,只能由其他过程调用B.事件过程的过程名是由程序设计者命名的C.事件过程通常放在标准模块中D.事件过程是用来处理由用户操作或系统激发的事件的代码20.设有语句: Open“c:TestDat“For Ou
7、tput As #1 则以下叙述中错误的是( )。(分数:2.00)A.该语句打开 c 盘根目录下的一个文件 TestDat,如果该文件不存在则出错B.该语句打开 C 盘根目录下一个名为 TestDat 的文件,如果该文件不存在则创建该文件C.该语句打开文件的文件号为 1D.执行该语句后,就可以通过 Print#语句向文件 TestDat 中写入信息21.在窗体上画两个文本框,其名称分别为 Text1 和 Text2,然后编写如下程序: Private Sub Form_Load() Show Text1Text=“ Text2Text=“ Text1SetFocus End Sub Priv
8、ate Sub Text1_Change() Text2Text=Mid(Text1Text,6) End Sub 程序运行后,如果在文本框 Text1 中输入ChinaBeijing,则在文本框 Text2 中显示的内容足( )。(分数:2.00)A.ChinaBeijingB.ChinaC.BeijingD.ChinaB22.在窗体上画一个水平滚动条,其属性值满足 MinA.增加一个 SmallChange 量B.减少一个 SmallChange 量C.增加一个 LargeChange 量D.减少一个 LargeChange 量23.在窗体上画一个组合框,一个命令按钮和一个文本框,其名称分
9、别为 Combo1,Command1 和 Text1,然后编写如下事件过程: Private Sub Form_Load() Combo1AddItem“AAAAA“ Combo1AddItem“BBBBB“ Combo1Addltem“CCCCC“ Combo1AddItem“DDDDD“ Combo1AddItem“EEEEE“ End Sub 程序运行后,如果单击命令按钮,则在文本框中显示组合框的项目“CCCCC”。为了实现该操作,在命令按钮的 Click 事件过程中应使用的语句为( )。(分数:2.00)A.Text1Text=Combo1List(2)B.Text1Text=Comb
10、o1TextC.Text1Text=Combo1List(3)D.Text1Text=Combo1ListIndex24.为了使文本框只具有垂直滚动条,应先把 MultiLine 属性设置为 True,然后再把 ScrollBars 属性设置为 ( )。(分数:2.00)A.0B.1C.2D.325.能够用于标识对象名称的属性是( )。(分数:2.00)A.NameB.CaptionC.ValueD.Text26.关于水平滚动条,如下叙述中错误的是( )。(分数:2.00)A.当滚动框的位置改变时,触发 Change 事件B.当拖动滚动条中的滚动框时,触发 Scroll 事件C.LargeCh
11、ange 属性是滚动条的最大值D.Value 是滚动条中滚动框的当前值27.对于列表框控件 List1,能够表示当前被选中列表项内容的是( )。(分数:2.00)A.List1TextB.List1IndexC.List1ListIndexD.List1List28.当文本框中的内容发生改变时所触发的事件是( )。(分数:2.00)A.KeyUpB.ChangeC.LostFocusD.GotFocus29.定时器的 Interval 属性的值是一个整数,它表示的是( )。(分数:2.00)A.毫秒数B.秒数C.分钟数D.小时数30.阅读程序: Private Sub Form_Click()
12、 a=0 For j=1 To 15 a=a+j Mod 3 Next i Print a End Sub 程序运行后,单击窗体,输出结果是( )。(分数:2.00)A.105B.1C.120D.1531.在窗体上画一个命令按钮,其名称为 Command1,然后编写如下代码: Option Base j Private Sub Command1_Click() Dim a a=Array(1,2,3,4) j=l For i=4 To 1 Step 一 1 s=s+a(i)*j j=j*10 Next i Print s End Sub 程序运行后,单击命令按钮,其输出结果是( )。(分数:2
13、.00)A.4321B.1234C.34D.1232.在窗体上画一个命令按钮,名称为 Command1,然后编写如下代码: Option Base 0 Private Sub Command1_Click() Dim A1(4)As Integer,A2(4)As Integer For k=0 To 2 A1(k+1)=InputBox(“请输入一个整数“) A2(3 一 k)=A1(k+1) Next k Print A2(k) End Sub 程序运行后,单击命令按钮,在输入对话框中依次输入 2、4、6,则输出结果为( )。(分数:2.00)A.0B.1C.2D.333.在窗体上画两个标
14、签和一个命令按钮,其名称分别为 Label1、Label2 和 Command1,然后编写如下程序: Private Sub func(L As Label) LCaption=“1234“ End Sub Pfivate Sub Form_Load() Label1Caption=“ABCDE“ Label2Caption=10 End Sub Private Sub Command1_Click() a=Val(Label2Caption) Call func(Tabell) Label2Caption=a End Sub 程序运行后,单击命令按钮,则在两个标签中显示的内容分别为( )。(
15、分数:2.00)A.ABCD 和 10B.1234 和 100C.ABCD 和 100D.1234 和 1034.在窗体上画一个命令按钮(名称为 Command1),并编写如下代码: Function Fun1(ByVal a As Integer,b As Integer)As Integer Dim t As Integer t=ab b=t+a Fun1=t+b End Function Private Sub Command1_Click() Dim x As Integer x=10 Print Fun1(Fun1(x,(Fun1(x,x 一 1),x 一 1) End Sub 程序
16、运行后,单击命令按钮,输出结果是( )。(分数:2.00)A.10B.0C.11D.2135.设有如下通用过程: Public Function Fun(xStr As String)As String Dim tStr As String,strL As Integer lStr=“ strL=Len(xStr) i=strL2 Do While i=strL tStr=tStr&Mid(xStr,i+1,1) i=i+1 Loop Fun=tStr&tStr End Function 在窗体上画一个名称为 Text1 的文本框和一个名称为Command1 的命令按钮。然后编写如下的事件过程
17、: Private Sub Command1_Click() Dim S1 As String SI=“ABCDEF“ Text1Text=LCase(Fun(S1) End Sub 程序运行后,单击命令按钮,文本框中显示的是( )。(分数:2.00)A.ABCDEFB.abcdefC.defdefD.defabc36.在窗体上画一个命令按钮和一个文本框(名称分别为 Command1 和 Text1),并把窗体的 KeyPreView 属性设置为 True,然后编写如下代码: Dim SaveAll As String Private Sub Form_Load() Show Text1Tex
18、t=“ Text1SetFocus End Sub Private Sub Command1_Click() Text1Text=LCase(SaveAll)+SaveAll End Sub Private Sub Form_KeyPress(KeyAscii As Integer) SaveAll=SaveAll+Chr(KeyAscii) End Sub 程序运行后,直接用键盘输入:VB再单击命令按钮,则文本框中显示的内容为( )。(分数:2.00)A.vbVBB.不显不任何信息C.VBD.出错37.设有以下程序: Private Sub Form_Click() x=50 For i=1
19、 To 4 y=InputBox(“请输入一个整数“) y=Val(Y) If y Mod 5=0 Then a=a+y x=y Else a=a+x End If Next i Print a End Sub 程序运行后,单击窗体,在输入对话框中依次输入 15、24、35、46,输出结果为( )。(分数:2.00)A.100B.50C.120D.7038.设在工程文件中有一个标准模块,其中定义了如下记录类型: Type Books Name As String*10 TelNum As String*20 End Type 在窗体上画一个名为 Command1 的命令按钮,要求当执行事件过程
20、Command1_Click 时,在顺序文件 Persontxt 中写入一条 Books 类型的记录。下列能够完成该操作的事件过程是( )。(分数:2.00)A.Private Sub Command1_Click() Dim B As Books Open“Persontxt“For Output As #1 BName=InputBox(“输入姓名“) BTelNum=InputBox(“输入电话号码“) Write #1BName,BTelNum Close #1 End SuhB.Private Sub Command1_Click() Dim B As Books Open“Pers
21、ontxt“For Input As #1 BName=InputBox(“输入姓名“) BTelNum=InputBox(“输入电话号码“) Print #1,BName,BTelNum Close #1 Fnd SubC.Private Sub Command1_Click() Dim B As Books Open“Persontxt“For Output As #1 BName=InputBox(“输入姓名“) BTelNum=InputBox(“输入电话号码“) Write #1B Close #1 End SubD.Private Sub Command1_Click() Open
22、“Persontxt“For Input As #1 Name=InputBox(“输入姓名“) TelNum=InputBox(“输入电话号码“) Print #1,Name,TelNum Close #1 End Sub39.有如下过程代码: Sub var_dim( ) Static numa As Integer Dim numb As Integer numa=numa+2 numb=numb+1 print numa;numb End Sub 连续 3 次调用 vat_dim 过程,第 3 次调用时的输出是( )。(分数:2.00)A.2 1B.2 3C.6 1D.6 340.在窗
23、体上画 1 个命令按钮,并编写如下事件过程: Private Sub Command1_Click() Dim a(3,3) For m=1 To 3 For n=1 To 3 If n=m Or n=4 一 m Then a(m,n)=m+n Else a(m,n)=0 End If Print a(m,n);Next n Print Next m End Sub 运行程序,单击命令按钮,窗体上显示的内容为( )。(分数:2.00)A.2 0 0 0 4 0 0 0 6B.2 0 4 0 4 0 4 0 6C.2 3 0 3 4 0 0 0 6D.2 0 0 0 4 5 0 5 6二、基本操
24、作题(总题数:1,分数:2.00)41.(1)在名称为 Form1 的窗体上添加一个名称为 Command1 的命令按钮数组,含三个命令按钮,它们的标题依次为“是”、“否”、“取消”,Index 属性分别为 0、1、2,每个按钮的高、宽均为 300、800。窗体的标题为“按钮窗口”。运行后的窗体如图所示。 注意:存盘时必须存放在考生文件夹下,工程文件名保存为 sjt1vbp,窗体文件名保存为 sjt1frm。 (2)在名称为 Form1 的窗体上添加一个名称为Shal 的形状控件,然后建立一个菜单,名称为 shape0,标题为“形状”,该菜单有两个子菜单,其名称分别为 shape1 和 sha
- 1.请仔细阅读文档,确保文档完整性,对于不预览、不比对内容而直接下载带来的问题本站不予受理。
- 2.下载的文档,不会出现我们的网址水印。
- 3、该文档所得收入(下载+内容+预览)归上传者、原创作者;如果您是本文档原作者,请点此认领!既往收益都归您。
下载文档到电脑,查找使用更方便
5000 积分 0人已下载
下载 | 加入VIP,交流精品资源 |
- 配套讲稿:
如PPT文件的首页显示word图标,表示该PPT已包含配套word讲稿。双击word图标可打开word文档。
- 特殊限制:
部分文档作品中含有的国旗、国徽等图片,仅作为作品整体效果示例展示,禁止商用。设计者仅对作品中独创性部分享有著作权。
- 关 键 词:
- 计算机 职业资格 国家 二级 VB 模拟 试卷 169 答案 解析 DOC
