[计算机类试卷]VB笔试模拟试卷147及答案与解析.doc
《[计算机类试卷]VB笔试模拟试卷147及答案与解析.doc》由会员分享,可在线阅读,更多相关《[计算机类试卷]VB笔试模拟试卷147及答案与解析.doc(24页珍藏版)》请在麦多课文档分享上搜索。
1、VB笔试模拟试卷 147及答案与解析 1 数据的存储结构是指 _。 ( A)存储在外存中的数据 ( B)数据所占的存储空间量 ( C)数据在计算机中的顺序存储方式 ( D)数据的逻辑结构在计算机中的表示 2 下列关于栈的描述正确的是 _。 ( A)在栈中只能插入元素而不能删除元素 ( B)在栈中只能删除元素而不能插入元素 ( C)栈是特殊的线性表,只能在一端插入或删除元素 ( D)栈是特殊的线性表,只能在一端插入,而在另一端删除元素 3 程序设计方法包括 _和面向对象的程序 设计。 ( A)面向数据程序设计 ( B)面向结构程序设计 ( C)结构化程序设计 ( D)顺序化程序设计 4 为了使模
2、块尽可能独立,要求 _。 ( A)模块的内聚程度要尽量高。且各模块间的耦合程度要尽量强 ( B)模块的内聚程度要尽量高,且各模块间的耦合程度要尽量弱 ( C)模块的内聚程度要尽量低,且各模块间的耦合程度要尽量弱 ( D)模块的内聚程度要尽量低,且各模块间的耦合程度要尽量强 5 下列描述中正确的是 _。 ( A)程序就是软件 ( B)软件开发不受计算机系统的限制 ( C)软件既是逻辑实体,又是物理实体 ( D)软件是程序、数据与相关文档的集台 6 下列叙说中正确的是 _。 ( A)程序设计就是编制程序 ( B)程序的测试必须由程序员自己去完成 ( C)程序经调试改错后还应进行再测试 ( D)程序
3、经调试改错后不必进行再测试 7 数据库系统的核心是 _。 ( A)数据模型 ( B)数据库管理系统 ( C)数据库 ( D)数据库管理员 8 在数据库的 3级模式结构中,内模式有 _个。 ( A) 1 ( B) 2 ( C) 3 ( D)任意多 9 软件中子类部件对父类部件属性的延续性指软件的 _。 ( A)独立性 ( B)共享性 ( C)多态性 ( D)继承性 10 数据模型是 _。 ( A)文件的集合 ( B)记录的集合 ( C)数据的集合 ( D)记录及其联系的集合 11 在新建一个 Visual Basic工程时,将新建窗体的 Name属性设置为 TheFirst,则默认的窗体文件名为
4、 ( )。 ( A) Form1.frm ( B)工程 1.frm ( C) TheFirst.frm ( D) Form1.vbp 12 要 建立一个随机文件记录学生的信息,如下定义了学生的记录类型,由学号、姓名、 5门课程成绩 (百分制 )组成,下列的定义正确的是 ( )。 ( A) Type stu no As Integer name As String score(1 To 5)AS Single End Type ( B) Type stu no As Integer name As String*10 score()As Single End Type ( C) Type stu
5、 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”,则为变量 aDate正确赋值的表达方式是( )。 ( A) aDate=#8/2008# ( B) aDate=#“8/8/2008”# ( C) aDate=Date(“8/8/2008”) ( D) aDate=Format(“m/d/yy”, ”8/8/2008”
6、) 14 表达式 Str(Len(“123”)+Str(77.7)的值是 ( )。 ( 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/180)*2*x/(x+y)*Log(x) ( D) Exp(X)*Sin(30*3.14/180)*2*X/(X
7、+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)i ( A) i=1 ( B) i=2 ( C) i=3 ( D) i=4 23 下列程序运行时输出的结果是 ( )。 Option Base 1 Const a=10
8、 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-2 3-4 5-6 7-8 9-10 24 有下列程序段,其输出结果为 ( )。 a=0:b=0 For i=-1 To-2 Step-1 For j=1 To 2 b=b+1 Next j a=a+1 Ne
9、xt i Print a; b ( A) 23 ( B) -22 ( C) 42 ( D) 24 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“,true) ( D) Dim a()As Variant a=array(1, 2,3,4) 26 在窗体上画一个名称为 Text1的文本框,然后画 3个单选按钮,并用这 3个单选按钮建立一个控件数组,名称为 Option1,程序运行
10、后,如果单击某个单选按钮,则文本框中的字体将根据所选择的单选按钮切换,请选择空白处合适的语句( )。 Private Sub Option1_Click(Index As Integer) Select Case Case 0 a=“宋体 ” Case 1 a=“黑体 ” Case 2 a=“楷体 _GB2312” End Select Text1. =a End Sub ( A) Option Text ( B) Index Text ( C) Index Font ( D) Option Font 27 有如下函数过程: Function fun1(By Val x As Integer,
11、By Val 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 Integer a=100 b=25 x=fun1(a, b)Print x End Sub ( A) 0 ( B) 25 ( C) 50 ( D) 100 28 下列程序的运行结果是 ( )。 Private Sub Co
12、mmand1_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,为了在运行时使该菜单项不可见,应使用的语句为 ( )。 ( A) MenuItem.Enabled=False ( B) MenuItem.Enabled=Trme ( C) MenuItem.Visible=True ( D) Me
13、nuItem.Visible=F1ase 30 下列 ( )事件过程可以将打开文件对话框的标题改变为 “new Caption”。 ( A) Private Sub Command1_CliCk() CommonDialog1.DialogTitle=“new Caption“ CommonDialog1.ShowFont End Sub ( B) Private Sub Command1_Click() CommonDialog1.DialogTitle=“new Caption“ CommonDialog1.ShowOpen End Sub ( C) Private Sub Command
14、1_Click() CommonDialog1.DialogTitle=“new Caption“ CommonDialog1.Show Help End Sub ( D) Private Sub Command1_Click() CommonDialog1.DialogTitle=“new Caption“ CommonDialog1.ShowColor End Sub 31 在窗体上画一个名称为 “Command1”,标题为 “计算 ”的命令按钮,再画 7个标签,其中 5个标签组成名称为 Label1的控件数组;名称为 Label2的标签用于显示计算结果,其 Caption属性的初始值为空
15、:标签 Label3的标题为 “计算结果 ”。运行程序时会自动生成 5个随机数,分别显示在标签控件数组的各个标签中。单击 “计算 ”按钮,则将标签数组 各元素的值累加,然后计算结果显示在 Label2。下列为 “计算 ”按钮的事件过程,请为下划线处选择合适的语句 ( )。 Private Sub Command1_Click() Sum=0 For i=0 To 4 Sum=Sum+_ Next _=Sum End Sub ( A) Label1(i).Caption Label2.Caption ( B) Label1(i).Caption Label3.Caption ( C) Label
16、1.Caption Label2.Caption ( D) Label1.Caption Label3.Caption 32 按文件的访问方式不同,可以将文件分为 ( )。 ( A)顺序文件、随机文件 ( B)文本文件和数据文件 ( C)数据文件和可执行文件 ( D) ASCII文件和二进制文件 33 在 C盘当前文件夹下建立一个名为 SDat.txt的顺序文件。要求用 InputBox函数输入 5名学生的学号 (StuNo)、姓名 (StuName)和英语成绩 (StuEng)。则在下列横线处合适的语句是 ( )。 Private Sub Form_Click() Open“C:SDat.t
17、xt“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,StuNo,StuName,StuEndg ( C) Write#1,StuNo,StuName,StuEndg ( D) Get#1,StuNo,StuName,StuEndg 34 下列事件过程的功能是:建立一个名为 Dat
18、al的随机文件,存放角度值及这些角度的正弦函数值和余弦函数值,角度为 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() Dim Y As Single Dim i As Integer Dim Ksc As Ang Open_ Y=3.14159/180 For i=1 To 90 Ksc.K=i Ksc.Sinx=Sin(i*Y) Ksc Cosx=C
19、os(i*Y) _ Next i Close#2 EndSub ( A) Data1.txtFor Random As#1 Len=10 Put#1,i,Ksc ( B) Data1.txtFor Random As#1 Len=10 Put#1,Y,Ksc ( C) Data1.txtFor Random As#1 Put#1,i,Ksc ( D) Data1.txtFor Random As#1 Put#1,Y,Ksc 35 下列程序代码实现生成 20个 0 100之间的随机整数,存于数组中,打印数组中大于 50的数,并求这些数的和。请选择正确的程序段是 ( ),完成程序。 Private
20、 Sub Command1_Clickn Dim arr(1 To 20) For i=1 To 20 arr(i)=_ Text1.Text=Text1.TextX 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
21、8 树中度为零的结点称为 _。 39 在面向对象方法中,类之间共享属性和方法的机制称为 _。 40 软件是程序、数据和 _的集合。 41 为了选择多个控件,可以按住 _键, 然后单击每个控件。 42 执行下列语句后,输出结果为 _。 s$=“ABCDEFG“ Print InStr(s$,“efS“) Print LCase$(s$) 43 下列程序段在窗体上输出 _,在立即窗口中输出 _。 S1=“software“ S2=“hardware“ S3=“computer“ Print Right(S1, 3) Picture1.Print Mid(S2, 2, 4) Debug.Print
22、Left(S3, 2) 44 列表框的 List属性返回 _。 45 在程序的空白行处填写适当的语句,完成以下功能:依次自动将列表框 List2中所有列表项目移入列表框 List1中,并将移入 List1中的项目从 List2中删除。 Do While List2.ListCount _ ListRemoveItem 0 Loop 46 For k=_To-7 Step-3 47 下列程序段的执行结果为 _。 i=4 a=5 Do i=i+1 a=a+2 Loop Until i =7 Print “A=“; a 48 首先执行循环体,然后再进行条件判断,决定是否结束循环的循环语句是_。 49
23、 窗体下面有一个命令按钮,然后编写如下事件过程: Private Sub Command1_Click() x=0 Do Until x = -1 a=InputBox(“请输入第一个数字 a的值 “) a=Val(a) b=InputBox(“请输入第二个数字 b的值 “) b=Val(b) x=InputBox(“请输入第三个数字 x的值 “) x=Val(x) a=a+b+x Loop Print a End Sub 在程序运行后,单击命令按钮,在对话框中分别输入 5, 4, 8, 5, 8, -1,输出结果为 _。 VB笔试模拟试卷 147答案与解析 1 【正确答案】 D 【试题解析】
24、 数据的存储结构是数据按逻辑结构规定的关系在计算机存储器中的存放方式,也称数据的物理结构。 2 【正确答案】 C 【试题解析】 可以根据栈的定义得到答案。栈是一种 “后进先出 ”的线性表,只能在一端进行插入或删除操作。 3 【正确答案】 C 【试题解析】 计算机程序设计是伴随着现代电子计算机 的出现而发展起来的一门技术,是多种学科理论、方法和技术互相交织、互相融合的产物。程序设计方法主要经过了结构化程序设计和面向对象的程序设计两个阶段。 4 【正确答案】 B 【试题解析】 衡量模块的独立程度使用耦合性和内聚性两个定性的度量标准。内聚性是一个模块内部各个元素间彼此结合的紧密程度的度量,内聚性是从
- 1.请仔细阅读文档,确保文档完整性,对于不预览、不比对内容而直接下载带来的问题本站不予受理。
- 2.下载的文档,不会出现我们的网址水印。
- 3、该文档所得收入(下载+内容+预览)归上传者、原创作者;如果您是本文档原作者,请点此认领!既往收益都归您。
下载文档到电脑,查找使用更方便
2000 积分 0人已下载
下载 | 加入VIP,交流精品资源 |
- 配套讲稿:
如PPT文件的首页显示word图标,表示该PPT已包含配套word讲稿。双击word图标可打开word文档。
- 特殊限制:
部分文档作品中含有的国旗、国徽等图片,仅作为作品整体效果示例展示,禁止商用。设计者仅对作品中独创性部分享有著作权。
- 关 键 词:
- 计算机 试卷 VB 笔试 模拟 147 答案 解析 DOC
