[计算机类试卷]VB笔试模拟试卷121及答案与解析.doc
《[计算机类试卷]VB笔试模拟试卷121及答案与解析.doc》由会员分享,可在线阅读,更多相关《[计算机类试卷]VB笔试模拟试卷121及答案与解析.doc(24页珍藏版)》请在麦多课文档分享上搜索。
1、VB笔试模拟试卷 121及答案与解析 1 下列选项中,不是一个算法的基本特征的是 ( )。 ( A)完整性 ( B)可行性 ( C)有穷性 ( D)拥有足够的情报 2 结构化分析方法是面向 ( )的自顶向下逐步求精进行需求分析的方法。 ( A)对象 ( B)数据结构 ( C)数据流 ( D)目标 3 下列工具中为需求分析常用工具的是 ( )。 ( A) PAD ( B) PFD ( C) N-S ( D) DFD 4 线性表进行二分法检索,其前提条件是 ( )。 ( A)线性表以顺序方 式存储,并按关键码值排好序 ( B)线性表以顺序方式存储,并按关键码的检索频率排好序 ( C)线性表以链式方
2、式存储,并按关键码值排好序 ( D)线性表以链式方式存储,并按关键码的检索频率排好序 5 下列选项中不属于结构化程序设计方法的是 ( )。 ( A)自顶向下 ( B)逐步求精 ( C)模块化 ( D)可复用 6 关于结构化程序设计原则和方法的描述错误的是 ( )。 ( A)选用的结构只准许有一个入口和一个出口 ( B)复杂结构应该用嵌套的基本控制结构进行组合嵌套来实现 ( C)不允许使 用 GOTO语句 ( D)语言中所没有的控制结构,应该采用前后一致的方法来模拟 7 软件需求分析阶段的工作,可以分为 4个方面:需求获取、需求分析、编写需求规格说明书以及 ( )。 ( A)阶段性报告 ( B)
3、需求评审 ( C)总结 ( D)都不正确 8 下列对于软件测试的描述中正确的是 ( )。 ( A)软件测试的目的是证明程序是否正确 ( B)软件测试的目的是使程序运行结果正确 ( C)软件测试的目的是尽可能地多发现程序中的错误 ( D)软件测试的目的是使程序符合结构化原则 9 用链表表 示线性表的优点是 ( )。 ( A)便于随机存取 ( B)花费的存储空间较顺序存储少 ( C)便于插入和删除操作 ( D)数据元素的物理顺序和逻辑顺序相同 10 在数据库设计中,将 E-R图转换为关系模式的过程属于 ( )。 ( A)需求分析阶段 ( B)逻辑设计阶段 ( C)概念设计阶段 ( D)物理设计阶段
4、 11 在新建一个 Visual Basic工程时,将新建窗体的 Name属性设置为 TheFirst,则默认的窗体文件名为 ( )。 ( A) Forml.rrm ( B)工程 1.frm ( C) TheFirst.fim ( D) Forml.vbp 12 要建立一个随机文件记录学生的信息,如下定义了学生的记录类型,由学号、姓名、 5门课程成绩 (百分制 )组成,下列的定义正确的是 ( )。 ( A) Type sru no As Integer name As String score(1 To 5)As Single End Type ( B) Type stu no As Inte
5、ger name As String*10 score()As Single End Type ( C) Type stu no As Integer name As String*10 score(1 To 5)As Single End Type ( D) Type stu no As Integer name As String score()As Single End Type 13 设有变量声明为 “Dim aDate As Date”,则为变量 aDZe正确赋值的表达方式是( )。 ( A) aDate=#8/2008# ( B) aDate=#“8/8/2008“# ( C) a
6、Date=Date(“8/8/2008“) ( D) aDate=Format(“m/d/yy“,“8/8/2008“) 14 表达式 Str(Len(“123“)+Str(77)的值是 ( )。 ( A) 377.7 ( B) 377.7 ( C) 80.7 ( D) 12377.7 15 已知代数式 eXSin(30)2x/(x+y)Lnx,则正确的 Visual Basic表达式为 ( )。 ( A) E*Sin(30*3.14/180)*2*X/X+Y*Log(X) ( B) Exp(X)*Sin(30)*2*X/(X+Y)*Ln(X) ( C) Exp(x)*Sin(30*3.14/
7、180)*2*x/(x+y)*Log(x) ( D) Exp(X)*Sin(30*3.14/180)*2*X/(X+Y)*Ln(X) 16 在使用打印直接输出信息时,下列哪个属性或方法实现了使文件结束打印( )。 ( A) Print方法 ( B) Page属性 ( C) NewPage方法 ( D) EndDoc方法 17 窗体上添加一个文本框 Text1,编写如下代码: Private Sub Text1_KeyDown(KeyCode As Integer, Shift As Integer) Print Chr(KeyCode+5) & KeyCode End Sub 程序运行时,在文
8、本框中输入 “ab”,则在窗体上输出为 ( )。 ( A) F65 G66 ( B) F65 F66 ( C) G66 F65 ( D) G65 G66 18 窗体上有一个图片控件和一个按钮控件,下列程序执行的结果是 ( )。 Private Sub Commandl_Click() Picturel.Picture=LoadPicture(“c: picture.jpg“) Picmrel.Cls Picturel.Print “picture“ End Sub ( A)窗体无显示,图片框显示图片和文字 picture ( B)窗体上出现 picture文本,图片框无显示 ( C)窗体上出现
9、 picture文本,图片框显示图片 picture.jpg ( D)窗体无显示,图片框只显示 picture文字 19 窗体上有一个命令按钮,命令按钮的单击事件过程如下。运行程序后,单击命令按钮,输出结果是 ( )。 Private Sub Command1_Click() Dim a a=Array(1,2, 3, 4, 5) For k=1 To 4 S=S+a(k) Next k Print S End Sub ( A) 10 ( B) 14 ( C) 15 ( D) 120 20 为了使列表框中的项目分为多列显示,需要设置的属性为 ( )。 ( A) Columns ( B) Sty
10、le ( C) List ( D) MultiSelect 21 在窗体上有一个文本框控件,名称为 TextTime,一个计时器控件,名称为Timer1。 要求每一秒在文本框中显示一次当前的时间。 Private Sub Timer1 TextTime.Text=Time End Sub 在下划线上应填入的内容是( )。 ( A) Enabled ( B) Visible ( C) Timer() ( D) Interval 22 下列程序段的执行结果为 ( )。 a=75 If a 60 Then i=1 If a 70 Then i=2 If a 80 Then i=3 If a 90 T
11、hen i=4 Print “i=“; i ( A) i=1 ( B) i=2 ( C) i=3 ( D) i=4 23 下列程序运行时输出的结果是 ( )。 Option Base 1 Const a=10 Private Sub Form_Click() Dim x(A)As Integer k=-1 For i=1 To a x(i)=i*k k=(-1)*k Next i For i=1 To 10 Print x(i) Next i End Sub ( A) 1 3 5 7 9 10 ( B) -1-3-5-7-9 ( C) -1 2-3 4-5 6-7 8-9 10 ( D) 1-
12、2 3-4 5-6 7-8 9-10 24 有下列程序段,其输出结果为 ( )。 a=0: b=0 For i=-1 To -2 Step-1 For i=1 To 2 b=b+1 Next j a=a+1 Next i Print a; b ( A) 2 3 ( B) -2 2 ( C) 4 2 ( D) 2 4 25 下列程序段错误的是 ( )。 ( A) Dim a As Integer a=array(1, 2,3,4) ( B) Dim a(), b() a=array(1, 2,3,4): b=a ( C) Dim a As Variant a=array(1, “asd“,tru
13、e) ( D) Dim a()As Variant a=array(1,2,3,4) 26 在窗体上画一个名称为 Text1的文本框,然后画 3个单选按钮,并用这 3个单选按钮建立一个控件数组,名称为 Option1,程序运行后,如果单击某个单选按钮,则文本框中的字体将根据所选择的单选按钮切换,请选择空白处合适的语句( )。 Private Sub Optionl_Click(Index As Integer) Select Case Case 0 a=“宋体 “ Case 1 a=“黑体 “ Case 2 a=“楷体 GB2312“ End Select Text =a End Sub (
14、A) Option Text ( B) Index Text ( C) Index Font ( D) Option Font 27 有如下函数过程: Function funl(ByVal x As Integer,ByVal y As Integer)As Integer Do While y 0 reminder=x Mod y x=y y=reminder Loop fun1=x End Function 在下列按钮单击事件中调用该函数,则该程序的运行结果是( )。 Private Sub Command1_Click() Dim a As Integer Dim b As Integ
15、er a=100 b=25 x=funl(a, B)Print x End Sub ( A) 0 ( B) 25 ( C) 50 ( D) 100 28 下列程序的运行结果是 ( )。 Private Sub Commandl_Click() a=1.5 b=1.5 Call fun(a,B)Print a, b End Sub Private Sub fun(x, y) x=y*y y=y+x End Sub ( A) 2.25 3.75 ( B) 1.5 2.25 ( C) 1.5 0.75 ( D) 0.75 1.5 29 假定有一个菜单项,名为 MenuItem,为了在运行时使该菜单项
16、不可见 ,应使用的语句为 ( )。 ( A) MenuItem.Enabled=False ( B) MenuItem.Enabled=Trme ( C) MenuItem.Visible=True ( D) MenuItem.Visible=Flase 30 下列 ( )事件过程可以将打开文件对话框的标题改变为 “new Caption”。 ( A) Prirate Sub Commandl Click() CommonDialogl.DialogTitle=“new Caption“ CommonDialogl.ShowFont End Sub ( B) Private Sub Comma
17、ndl+Click() CommonDialogl.DialogTitle=“new Caption“ CommonDialogl.ShowOpen End Sub ( C) Private Sub Commandl_Click() CommonDialogl.DialogTitle=“new Caption“ CommonDialogl.ShowHelp End Sub ( D) Private Sub Commandl_Click() CommonDialogl.DialogTitle=“new Caption“ CommonDialogl.ShowColor End Sub 31 在窗体
18、上画一个名称为 “Command1”,标题为 “计算 ”的命令按钮,再画 7个标签,其中 5个标签组成名称为 Labell的控件数组;名称为 Label2的标签用于显示计算结果,其 Caption属性的初始值为空:标签 Label3的标题为 “计算结果 ”。运行程序时会自动生成 5个随机数,分别显示在标签控件数组的各个标 签中。单击“计算 ”按钮,则将标签数组各元素的值累加,然后计算结果显示在 Label2。下列为“计算 ”按钮的事件过程,请为下划线处选择合适的语句 ( )。 Private Sub Commandl_Click() Sum=0 For i=0 To 4 Sum=Sum+_ N
19、ext _ =Sum End Sub ( A) Labell(i).Caption Label2.Caption ( B) Labell(i).Caption Label3.Caption ( C) Labell.Caption Label2.Caption ( D) Labell.Caption Label3.Caption 32 按文件的访问方式不同,可以将文件分为 ( )。 ( A)顺序文件、随机文件 ( B)文本文件和数据文件 ( C)数据文件和可执行文件 ( D) ASCII文件和二进制文件 33 在 C盘当前文件夹下建立一个名为 SDat.txt的顺序文件。要求用 InputBox
20、函数输入 5名学生的学号 (StuNo)、姓名 (StuName)和英语成绩 (StuEng)。则在下列横线处合适的语句是 ( )。 Private Sub Form_Click() Open “C: SDat.txt“ For Output As 1 For i=1 To 5 StuNo=InputBox(“请输入学号 “) StuName=InputBox(“请输入姓名 “) StuEndg=Val(InputBox(“请输入英语成绩 “) Next i Close #1 End Sub ( A) Input #1,StuNo,StuName,StuEndg ( B) Put #1, St
21、uNo, StuName, StuEndg ( C) Vrite #1, StuNO, StuName, StuEndg ( D) Get #1, StuNo,StuName,StuEndg 34 下列事件过程的功能是:建立一个名为 Datal的随机文件,存放角度值及这些角度的正弦函数值和余弦函数值,角度为 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_Click(
22、) Dim Y As Single Dim i As Integer Dim Ksc As Ang Open _ Y=14159/180 For i=1 To 90 Ksc.K=i Ksc.Sinx=Sin(i*Y) Ksc.Cosx=Cos(i*Y) Next i Close #2 End Sub ( A) Datal.txtFor Random As #1 Len=10 Put #1, i, Ksc ( B) Datal.txtFor Random As #1 Len=10 Put #1, Y, Ksc ( C) Datal.txtFor Random As #1 Put #1, i, K
23、sc ( D) Datal.txtFor Random As #1 Put #1, Y, Ksc 35 下列程序代码实现生成 20个 0 100之间的随机整数,存于数组中,打印数组中大于 50的数,并求这些数的和。请选择正确的程序段是 ( ),完成程序。 Private Sub Commandl_Click() Dim arr(1 To 20) For i=1 To 20 arr(i)=_ Textl.Text=Textl.Text & arr(i)& Chr(13)& Chr(10) Next i Sum=0 For Each X _ If X 50 Then Print Tab(20);
24、X Sum=Sum+X End If Next X Print Tab(20); “Sum=“; Sum End Sub ( A) Int(Rnd*99+1) In arr ( B) Int(RnD)In arr ( C) Int(Rnd*99+1) In arr() ( D) Int(RnD)In arr() 36 在结构化设计方法中,数据流图表达了问题中的数据流与加工间的关系,且每一个 _实际上对应一个处理模块。 37 结构化程序设计的 3种基本结构分别是顺序、选择和 _。 38 二分法查找仅限于这样的表;表中的数据元素必须有序,其存储结构必须是_。 39 一个模块直接调用的其他模块个数称
- 1.请仔细阅读文档,确保文档完整性,对于不预览、不比对内容而直接下载带来的问题本站不予受理。
- 2.下载的文档,不会出现我们的网址水印。
- 3、该文档所得收入(下载+内容+预览)归上传者、原创作者;如果您是本文档原作者,请点此认领!既往收益都归您。
下载文档到电脑,查找使用更方便
2000 积分 0人已下载
下载 | 加入VIP,交流精品资源 |
- 配套讲稿:
如PPT文件的首页显示word图标,表示该PPT已包含配套word讲稿。双击word图标可打开word文档。
- 特殊限制:
部分文档作品中含有的国旗、国徽等图片,仅作为作品整体效果示例展示,禁止商用。设计者仅对作品中独创性部分享有著作权。
- 关 键 词:
- 计算机 试卷 VB 笔试 模拟 121 答案 解析 DOC
