【计算机类职业资格】计算机二级(VB)15及答案解析.doc
《【计算机类职业资格】计算机二级(VB)15及答案解析.doc》由会员分享,可在线阅读,更多相关《【计算机类职业资格】计算机二级(VB)15及答案解析.doc(15页珍藏版)》请在麦多课文档分享上搜索。
1、计算机二级(VB)15 及答案解析(总分:1765.00,做题时间:90 分钟)一、选择题(每小题 2 分,共 70 分) 下列各(总题数:25,分数:1750.00)1.以下程序段的输出结果为( )。 Dim 1,a(10),p(3) k=5 Fori=0 To 10 a(i)=i Next i For i=0 To 2 p(i)=a(i*(i+1) Next i For i=0 To 2 k=k+p(i)*2 Next i Frint k (分数:70.00)A.WHEREB.FROMC.GROUP BYD.ORDER BY2.假定在图片框 Picture1 中装入了一个图形,为了清除该图
2、形(不删除图片框),应采 用的正确方法是_。 (分数:70.00)A.选择图片框,然后按 Del 键B.执行语句 Picture1.Picture = LoadPicture (“)C.执行语句 Picture1.Picture =“D.选择图片框,在属性窗口中选择 Picture 属性条,然后按回车键3.单击命令按钮,下列程序的执行结果为( )。 Private Sub Commandl_Click() Dim x As Integer,y As Integer x=32:y=42 Call PCS(x,y) Print x;y End Sub Public Sub PCS(Byval n
3、As Integer,ByVal m As Integer) n=n Mod 10+1 m=m Mood 10+1 End Sub (分数:70.00)A.If xy Then y=x3B.If xy Then y=3xC.If xy Then y=x3D.If xy Then y=x * * 34.Visual Basic 程序设计采用的编程机制是( )。(分数:70.00)A.可视化B.面向对象C.事件驱动D.过程结构化5.以下各项中,Visual Basic 不能接收的图形文件是( )。(分数:70.00)Aico 文件Bjpg 文件Cpsd 文件Dbmp 文件6.在窗体上画一个名称为
4、Timer1 的计时器控件,要求每隔 0.5 秒发生一次计时器事件,则以下正确的属性设置语句是( )。 (分数:70.00)_7.下列说法错误的是( )。(分数:70.00)A.x 0B.x -4C.x -48.关于 Visual Basic“方法“的概念错误的是( )。(分数:70.00)A.方法是对象的一部分B.方法是预先定义好的操作C.方法是对事件的响应D.方法用于完成某些特定的功能9.下列程序段的执行结果为( )。 X=2 Y=5 If X * Y 1 Then Y=Y - 1 Else Y=-1 Print Y-X0 (分数:70.00)A.TrueB.FalseC.-1D.110.
5、设有下面的循环: i=0 While i=1 i=i + 3 Print i Wend 则运行后的输出结果是( )。 (分数:70.00)A.abB.abcC.abdD.abcd11.已知使用 Show 方法的格式为:窗体名称Show模式,如果要使窗体是“模态型”宙体,则“模式”值为( )。(分数:70.00)A.TrueB.0C.1D.False12.在代码编辑器中,续行符是用来换行书写同一个语句的符号,用以表示续行符的是( )。(分数:70.00)A.123B._nameC.classD.1first13.当双击窗体 Form1 时,要将窗体 Form1 隐藏起来、将窗体 Form2 以模
6、式方式显示出来的事件过程,正确的是( )。 (分数:70.00)A.B.C.D.14.当组合框的 Style 属性设置为何值时,组合框称为下拉式列表框?(分数:70.00)A.0B.1C.2D.315.在修改列表框内容时,AddItem 方法的作用是( )。(分数:70.00)A.在列表框内插入一行文本B.在列表框中插入多行文本C.删除列表框中指定的项目D.清除列表框内的全部内容16.对长度为 n 的线性表进行顺序查找,在最坏情况下所需要的比较次数为_。 (分数:70.00)A.log2nB.n/2C.nD.n+117.下列程序段执行结果为( )。 x=5 y=-6 If Not x0 The
7、n x=y-3 Else y=x+3 Print x-y;y-x (分数:70.00)A.-3 3B.5 -9C.3 -3D.-6 518.在窗体上画一个列表框和一个命令按钮,其名称分别为 List1 和 Command1,然后编写 如下事件过程 Private Sub Form_Load() List1.AddItem “Item1“ List1.AddItem “Item2“ List1.AddItem “Item3“ End Sub Private Sub Command1_Click() List1.List(List1.ListCount) = “AAAA“ End Sub 程序运行
8、后,单击命令按钮,其结果为_。 (分数:70.00)A.把字符串“AAAA”添加到列表框中,但位置不能确定B.把字符串“AAAA”添加到列表框的最后(即“Item3”的后面)C.把列表框中原有的最后一项改为“AAAA”D.把字符串“AAAA”插入到列表框的最前面(即“Item1”的前面)19.下列过程定义语句中,参数不是对象的定义语句是( )。(分数:70.00)A.BorderStyle 的值设为 FixedSingle,此项设置值的作用即禁止最大化和最小化按钮B.窗体的 MaxButton 和 MinButton 值设为 FalseC.正常情况下新建的窗体都没有最大化和最小化按钮D.该窗体
9、可用鼠标拖动边框的方法改变窗体的大小20.下面的程序的运行结果是( )。 a=1 b=1 Do a=a2 b= b + 1 Loop Until b5 Print “k=“;a;Spc(4);“b=“;b + a (分数:70.00)A.ComputerB.什么都没有C.* * * * * * * *D.程序出错21.表达式 x=Sqr(a2-5)+sqr(b2-5)的类型是( )。(分数:70.00)A.在 Visual Basic 中的对话框分为两种类型:预定义对话框和自定义对话框B.自定义对话框由用户根据自己需要定义的C.预定义对话框是用户在设置程序代码后定义的D.MssgBox 函数是
10、用户的自定义对话框的函数22.设一个工程由两个窗体组成,其名称分别为 Form1 和 Form2,在 Form1 上有一个名称为 Command1 的命令按钮。窗体 Form1 的程序代码如下: Private Sub Command1_Click( ) Dim a As Integer a=10 Call g(Form2,a) End Sub Private Sub g(f As Form,x As Integer) y=IIf(x10,000,-100) fShow fCaption=y End Sub 运行以上程序,正确的结果是( )。 (分数:70.00)_23.设窗体上有一个文本框,
11、名称为 Text1,程序运行后,要求该文本框只能显示信息,不能接收输入的信息,以下能实现该操作的语句是( )。 (分数:70.00)_24.以下关于变量作用域的叙述中,正确的是( )。 (分数:70.00)_25.在窗体上画一个名称为 CommonDialog1 的通用对话框,一个名称为 Command1 的命令按钮。然后编写如下事件过程: Private Sub Command1_Click( ) CommonDialoglFileName=“” CommonDialogl,Filter“All File*(*Doc)*Doc(*Txt)*Txt” CommonDialoglFilterln
12、dex2 CommonDialoglDialogTitle“VBTest” CommonDialoglAction1 End Sub 对于这个程序,以下叙述中错误的是( )。 (分数:70.00)_26.将 E-R 图转换到关系模式时,实体与联系都可以表示成( )。(分数:-1.00)A.属性B.关系C.键D.域27.算法的时间复杂度是指( )。(分数:-1.00)A.执行算法程序所需要的时间B.算法程序的长度C.算法执行过程中所需要的基本运算次数D.算法程序中的指令条数28.程序设计语言的基本成分是数据成分、运算成分、控制成分和( )。(分数:-1.00)A.对象成分B.变量成分C.语句成分
13、D.传输成分29.已知一棵二叉树前序遍历和中序遍历分别为 ABDEGCFH 和 DBGEACHF,则该二叉树的后序遍历为 ( )。(分数:-1.00)A.GEDHFBCAB.DGEBHFCAC.ABCDEFGHD.ACBFEDHG30.程序的 3 种基本控制结构是( )。(分数:-1.00)A.过程、子过程和分程序B.顺序、选择和重复C.递归、堆栈和队列D.调用、返回和转移31.软件开发的结构化生命周期方法将软件生命周期划分成( )。(分数:-1.00)A.定义、开发、运行维护B.设计阶段、编程阶段、测试阶段C.总体设计、详细设计、编程调试D.需求分析、功能定义、系统设计32.下列工具中为需求
14、分析常用工具的是( )。(分数:-1.00)A.PADB.PFDC.N-SD.DFD33.设有两个串 p 和 q,求 q 在 p 首次出现位置的运算称作( )。(分数:-1.00)A.连接B.模式匹配C.求于串D.求串长34.软件开发的结构化生命周期方法将软件生命周期划分成( )。(分数:-1.00)A.定义、开发、运行维护B.设计阶段、编程阶段、测试阶段C.总体设计、详细设计、编程调试D.需求分析、功能定义、系统设计35.n 个顶点的强连通图的边数至少有( )。(分数:-1.00)A.n-1B.n(n-1)C.nD.n+1三、填空题(每空 2 分,共 30 分)(总题数:10,分数:30.0
15、0)36.改变驱动器列表框的 Drive 属性值将引发 1 事件。(分数:3.00)填空项 1:_37.下列事件过程的功能是:建立一个名为 Data1 的随机文件,存放角度值及这些角度的正弦 函数值和余弦函数值,角度为 1,2,3,90。请在空白处填入适当的内容,将程序补充完整。 Private Type Ang K As Integer Sinx As Single Cosx AS Single End Type Dim Ksc As Ang Private Sub Form _Click1 Dim Y As Single Open 2 Y=314159/180 For I=1 To 90
16、KscK=I KscSinx=Sin(I*Y) KscCosx=Cos(I*Y) 3 Next I Clise #2 End Sub (分数:3.00)填空项 1:_38.下面程序是由鼠标事件在窗体上画图,如果按下鼠标将可以画图,双击窗体可以清除所画图形。补充完整下面的程序。 首先在窗体层定义如下变量: Dim PaintStart As Boolean 编写如下事件过程: Private Sub Form_Load1 DrawWidth=2 ForeColor=vbGreen End Sub Private Sub Form_MouseDown(Button As Integer,Shift
17、 As Integer,_ X As Single,Y As Single) 2 End Sub Private Sub Form_MouseMove(Button As Integer,Shift As Integer,_ X As Single,Y As Single) If PaintStart Then PSet(X,Y) End If End Sub Private Sub Form_MouseUp(Button As Integer,Shift As Integer,_ X As Single,Y As Single) 3 End Sub Private Sub Form_Db1C
18、lick4 5 End Sub (分数:3.00)填空项 1:_39.下列程序的功能是:将数据 1,2,8 写入顺序文件 Numtxt 中,请补充完整。 Private Sub Form_Click1 Dim i As Integer Open“Numtxt“For Output As #1 For i=1 To 8 2 Next i Close #1 End Sub (分数:3.00)填空项 1:_40.在窗体上画两个名称分别为 Command1 和 Command2、标题分别为“初始化”和“求和”的命令按钮。程序运行后,如果单击“初始化”命令按钮,则对数组 a 的各元素赋值;如果单击“求和
19、”命令按钮,则求出数组 a 的各元素之和,并对文本框中显示出来,如图所示。请填空。 (分数:3.00)填空项 1:_41.在窗 体上画 1 个命令按钮 和 1 个通用对话框, 其名称分别 为 Command1 和 CommonDialog1,然后编写如下事件过程: Private Sub Command1_Click1 CommonDialog1. 2 = “打开文件“ CommonDialog1.Filter = “All Files(*.*)|*.*“ CommonDialog1.InitDir = “C:/“ CommonDialog1.ShowOpen End Sub 该程序的功能是,
20、程序运行后,单击命令按钮,将显示“打开“文件对话框,其标题是“ 打开文件“,在“文件类型“栏内显示“All Files(*.*)“,并显示 C 盘根目录下的所有文件, 请填空。 (分数:3.00)填空项 1:_42.下面运行程序后,单击命令按钮,输出的结果是 1。 Private Sub Command1_Click2 Dim a%(1 To 4),b%(3 To 6),i%,s1#,s2# For i=1 To 4 a(i) =i Next i For i=3 To 6 b(i) =i Next i s1=YAS(A) s2=YAS(B) Print“s1=“;s1;“s2=“;s2 End
21、 Sub Function YAS(a3As Integer) Dim t#,i% t=1 For i=LBound(A) To UBound(A) t=t * a(i) Next i YAS=t End Function (分数:3.00)填空项 1:_43.下列程序是判断一个整数(=3)是否为素数,请补充完整。 Dim n As Integer n=InputBox(“请输入一个整数(=3)“) k=Int(Sqr(n) i=2 swit=0 While i 0B.x -4C.x -4 解析:此题考查 if 语句的用法,x0 时打印“first”,x,-3x10,000,-100) fSh
- 1.请仔细阅读文档,确保文档完整性,对于不预览、不比对内容而直接下载带来的问题本站不予受理。
- 2.下载的文档,不会出现我们的网址水印。
- 3、该文档所得收入(下载+内容+预览)归上传者、原创作者;如果您是本文档原作者,请点此认领!既往收益都归您。
下载文档到电脑,查找使用更方便
5000 积分 0人已下载
下载 | 加入VIP,交流精品资源 |
- 配套讲稿:
如PPT文件的首页显示word图标,表示该PPT已包含配套word讲稿。双击word图标可打开word文档。
- 特殊限制:
部分文档作品中含有的国旗、国徽等图片,仅作为作品整体效果示例展示,禁止商用。设计者仅对作品中独创性部分享有著作权。
- 关 键 词:
- 计算机 职业资格 二级 VB15 答案 解析 DOC
