[计算机类试卷]VB笔试模拟试卷66及答案与解析.doc
《[计算机类试卷]VB笔试模拟试卷66及答案与解析.doc》由会员分享,可在线阅读,更多相关《[计算机类试卷]VB笔试模拟试卷66及答案与解析.doc(25页珍藏版)》请在麦多课文档分享上搜索。
1、VB笔试模拟试卷 66及答案与解析 1 已知一棵二叉树前序遍历和中序遍历分别为 ABDEGCFH和 DBGEACHF,则该二叉树的后序遍历为 ( A) GEDHFBCA ( B) DGEBHFCA ( C) ABCDEFGH ( D) ACBFEDHG 2 树是结点的集合,它的根结点数目是 ( A)有且只有 1 ( B) 1或多于 1 ( C) 0或 1 ( D)至少 2 3 如果进栈序列为 e1, e2, e3, e4,则可能的出栈序列是 ( A) e3, e1, e4, e2 ( B) e2, e4, e3, e1 ( C) e3, e4, e1, e2 ( D)任意顺序 4 在设计程序时
2、,应采纳的原则之一是 ( A)不限制 goto语句的使用 ( B)减少或取消注解行 ( C)程序越短越好 ( D)程序结构应有助于读者理解 5 程序设计语言的基本成分是数据成分、运算成分、控制成分和 ( A)对象成分 ( B)变量成分 ( C)语句成分 ( D)传输成分 6 下列叙述中,不属于软件需求规格说明书的作用的是 ( A)便于用户、开发人员进行理解和交流 ( B)反映出用户问题的结构,可以作为软件开发工作的基础和依据 ( C)作为确认测试和验收的依 据 ( D)便于开发人员进行需求分析 7 下列不属于软件工程的 3个要素的是 ( A)工具 ( B)过程 ( C)方法 ( D)环境 8
3、单个用户使用的数据视图的描述称为 ( A)外模式 ( B)概念模式 ( C)内模式 ( D)存储模式 9 将 E-R图转换到关系模式时,实体与联系都可以表示成 ( A)属性 ( B)关系 ( C)键 ( D)域 10 SQL语言又称为 ( A)结构化定义语言 ( B)结构化控制语言 ( C)结构化查询语言 ( D)结构化操纵语言 11 设用复制、粘贴的方法 建立了 个命令按钮数组 Command1,以下对该数组说法错误的是 ( A)命令按钮的所有 Caption属性都是 Command1 ( B)在代码中访问任意一个命令按钮只需使用名称 Command1 ( C)命令按钮的大小都相同 ( D)
4、命令按钮共享相同的事件过程 12 设 a=5, b=4, c=3, d=2,则表达式 3 2*b Or a=c And b c Or c d的值是 ( A) 1 ( B) True ( C)假 ( D) 2 13 假定在图片框 Picture1中装入了一个图形,为了清除该图形 (不删除图片 框 ),应采用的正确方法是 ( A)选择图片框,然后按 Del键 ( B)执行语句 Picture1.Picture=LoadPicture(“) ( C)执行语句 Picturel.Picture=“ ( D)选择图片框,在属性窗口中选择 Picture属性条,然后按回车键 14 能够将 Picture对
5、象 Picl加载当前目录中的 face.bmp的语句是 ( A) Pic1.Picture=LoadPicture(App.path a ( A) -1 6 ( B) -1 16 ( C) 1 6 ( D) 11 21 19 计时器文件设置时 间间隔的属性是 ( A) Enabeld ( B) Tndex ( C) Tag ( D) Interval 20 在窗体上画一个命令按钮,然后编写如下事件过程: Private Sub Command1_Click() For i=1 To 4 X=4 For j=1 To 2 X=x+6 Next Next Print x End Sub 程序运行后
6、,单击命令按钮,输出结果是 ( A) 12 ( B) 13 ( C) 16 ( D) 17 21 窗体上有 Text1、 Text2两个文本框及一个命令按钮 Command1,编写下列程序 Dim y As Integer Private Sub Command1_Click() Dim x As Integer X=2 Text1.Text=Fun2(Fun1(x), y) Text2.Text=Fun1(x) End Sub Private Function Fun1(x As Integer)As Integer x=x+y:y=x+y Fun1=x+y End Function Pri
7、vate Function Fun2(x As Integer, y As Integer)As Integer Fun2=2*x+y End Function 当单击 1次和单击 2次命令按钮后,文本框 Textl和 Text2内的值分别是 ( A) 2 4 2 4 ( B) 2 4 4 8 ( C) 10 10 58 58 ( D) 4 4 8 8 22 在窗体上画一个名称为 Command1的命令按钮和一个名称为 Text1的文本框,然后输写如下程序: Private Sub Command1_Click() Dim x, y, z As Integer x=5 y=7 z=0 Text
8、1.Text=“ “ CallFunl(x, y, z) Text1.Text=Str(z) End Sub Sub Fun1(By Val a As Integer, Byval b As Integer, c As Integer) c=a+b End Sub 程序运行后,如果单击命令按钮,则在文本框中显示的内容是 ( A) 0 ( B) 12 ( C) Str(2) ( D)没有显示 23 设已打开 5个文件,文件号分 5U为 1, 2, 3, 4, 5。要关闭所有文件,以下语句正确的是 ( A) Close#1, 2, 3, 4, 5 ( B) Close#1; #2; #3; #4;
9、 #5 ( C) Close #1-#5 ( D) Close 24 在窗体上画一个名为 Command1的命令按钮,其 Command1_Click事件过程如下。 Sub Command1_Click() Dim student As studtype Dim record_no As Integer record n=1 With student .ino=12 .strname=“Smith“ .strsex=“男 ” .smark=89 End With _ Put # 1, record_no, student Close # 1 End Sub 要求在 c:的随机文件 studen
10、t dat写入一条记录。应在程序中空行处填入以下哪条语句使该功能完整 ( A) Open“c:student.dat“For Input As # 1 len=len(student) ( B) Open“c:student.dat:For random As # 1 len=len(student) ( C) Open“c:student.dat“For Output As # 1 len=len(student) ( D) Open“c:student.dat“For Append As # 1 len=len(student) 25 阅读程序: Option Base 1 Dim arr
11、()As Integer Private Sub Form_Click() Dim i As Integer, j As Integer ReDim arr(3, 2) For i=1 To 3 For j=1 To 2 arr(i, j)=i*2+j Next Next ReDim Preserve arr(3, 4) For j=3 To 4 arr(3, j)=j+9 Next Print arr(3, 2)+arr(3, 4) End Sub 程序运行后,单击窗体,输出结果为 ( A) 21 ( B) 13 ( C) 8 ( D) 25 26 要建立一个学生成绩的随机文件,如下定义了学
12、生的记录类型,由学号、姓名、三门课程成绩 (百分制 )组成,下列程序段正确的是 ( A) Type stud1 no As Integer name As String score (1 To 3) As Single End Type ( B) Type stud1 no As Integer name As String * 10 score ( ) As Single End Type ( C) Type stud1 no As Integer name As String * 10 score (1 To 3) As Single End Type ( D) Type stud1 no
13、 As Integer name As String score (1 To 3) As Single End Type 27 下列程序: Private Sub Command1_Click() a=InputBox(“请输入 “) b=InputBox(“请输入 “) Print=a+b End Sub 运行时输入 3和 4,输出的结果是 ( A) 7 ( B) 34 ( C) 3+4 ( D)出错 28 在窗体上画一个名称为 Text1的文本框和一个名称为 Command1的命令按钮,然后编写如下事件过程: Private Sub Command1_Click() Dim arr(10,
14、 10)As Integer, i, j As Integer For i=1 To 3 For j=2 To 4 arr(i, j)=i+j Next Next Text1.Text=an(2, 3)+arr(3, 4) End Sub 程序运行后,单击命令按钮,在文本框中显示的值是 ( A) 12 ( B) 13 ( C) 14 ( D) 15 29 假定有如下的窗体事件过程: Private Sub Form_Click() a$=“Microsoft Visual Basic“ b$=Right(a$, 5) c$=Mid(a$, 1, 9) MsgBox a$, 34, b$,c$,
15、 5 End Sub 程序运行后,单击窗体,则在弹出的信息框的标题栏中显示的信息是 ( A) Microsoft Visual ( B) Microsoft ( C) Basic ( D) 5 30 运行下列程序段后,显示的结果为 J1=23: J2=32 If J1 J2 Then Print J2 Else Print J1 ( A) 23 ( B) 32 ( C) 55 ( D) 2332 31 单击命令按钮时,下列程序的执行结果是 Private Sub Command1_Click() Dim a As Integer, b As Integer, c As Integer a=3:
16、 b=4: c=5 Print SecProc(c, b, A)End Sub Function FirProc(x As Integer, y As Integer, z As Integer) FirProc=2*x+y+3*z End Function Function SecProc(x As Integer, y As Integer, z As Integer) SecProc=FirProc(z, x, y)+x End Function ( A) 20 ( B) 22 ( C) 28 ( D) 30 32 下列程序段的执行结果为 a=3: b=1 For i=1 To 3 f=
17、a+b: a=b: b=f Print f Next I ( A) 4 3 6 ( B) 4 5 9 ( C) 6 3 4 ( D) 7 2 8 33 执行下列程序后,鼠标单击窗体,输出结果为 Private Sub Form_Click() Print “Click“; End Sub Private Sub Form_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single) Print “Donw“ End Sub Private Sub Form_MouseUp(Button As Integer,
18、Shift As Integer, X As Single, Y As single) Print “Up“ End Sub ( A) DownUpClick ( B) ClickDownUp ( C) DownClickUp ( D) UpDownclick 34 在窗体上画一个命令按钮和一个文本框,名称分别为 Command1和 Text1,然后编写如下程序: Private Sub Command1_Click() a=InputBox(“请输入日期 (1-31)“) t=“旅游景点: “&IIf(a 0 And a =10, “长城 “, “ “)&_ IIf (a 10 And a
19、=20, “故宫 “, “ “)& IIf (a 20 And a =31, “颐和园 “, “ “) Text1.Text=t End Sub 程序运行后,如果从键盘上输入 16,则在文本框中显示的内容是 ( A)旅游景点:长 城故宫 ( B)旅游景点:长城颐和园 ( C)旅游景点:颐和园 ( D)旅游景点:故宫 35 执行下列程序段后,输出的结果是 For k1=0 To 4 y=20 For k2=0 To 3 y=10 For k3=0 To2 y=y+10 Next k3, k2, k1 Print y ( A) 90 ( B) 60 ( C) 40 ( D) 10 36 测试的目的
20、是暴露错误,评价程序的可靠性: 而【 】的目的是发现错误的位置并改正错误。 37 在最坏情况下,堆排序需要比较的次数为【 】。 38 若串 s=“Program“,则其子串的数目是【 】。 39 一个项目具有一个项目主管,一个项目主管可管理多个项目,则实体 “项目主管 ”与实体 “项目 ”的联系属于【 】的联系。 40 数据库管理系统常见的数据模型有层次模型、网状模型和【 】三种。 41 Visual BASIC应用程序通常由 3类模块组成,即窗体模块、【 】和类模块。 42 以下程序段执行后 y的值是【 】。 x=8.6 y=int(x+0.5) print y 43 在窗体上画一个命令按钮
21、,然后编写如下程序: Function fun(ByVal num As Long)As Long Dim k As Long k=1 num=Abs(num) Do While num k=k*(num Mod 10) num=num10 Loop fun=k End Function Private Sub Command1_Click() Dim n As Long Dim r As Long n=InputBox(“请输入一个数 “) n=CLng(n) r=fun(n) Print r End Sub 程序运行后,单击命令按钮,在输入对话框中输入 “345“,输出结果为【 】。 44
22、 菜单编辑器可分为 3个部分,即数据区、【 】和菜单项显示区。 45 在窗体上画一个命令按钮,然后编写如下事件过程: Private Sub Command1_Click() For i=1 To 4 x=4 For j=1 To 3 x=3 For k=1 To 2 x=x+6 Next k Next j Next i Print x End Sub 程序运行后,单击命令按钮,输出结果是【 】。 46 在窗体上画一个命令按钮,然后编 写如下事件过程: Option Base 1 Private Sub Command1_Click() Dim a a=Array(1, 2, 3, 4) j=
23、1 For i=4 To 1 Step-1 s=s+a(i)*j j=j*10 Next i Print s End Sub 运行一面的程序,单击命令按钮,其输出结果是【 】。 47 在 KeyDown和 KeyUp事件过程中,当参数 Shift的值为十进制数 1, 2, 4时,分别代表 Shift、【 】、【 】。 48 把窗体的 KeyPreview属性设置为 True,并编写如下两个事件过程: Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer) Print KeyCode; End Sub Private Sub
- 1.请仔细阅读文档,确保文档完整性,对于不预览、不比对内容而直接下载带来的问题本站不予受理。
- 2.下载的文档,不会出现我们的网址水印。
- 3、该文档所得收入(下载+内容+预览)归上传者、原创作者;如果您是本文档原作者,请点此认领!既往收益都归您。
下载文档到电脑,查找使用更方便
2000 积分 0人已下载
下载 | 加入VIP,交流精品资源 |
- 配套讲稿:
如PPT文件的首页显示word图标,表示该PPT已包含配套word讲稿。双击word图标可打开word文档。
- 特殊限制:
部分文档作品中含有的国旗、国徽等图片,仅作为作品整体效果示例展示,禁止商用。设计者仅对作品中独创性部分享有著作权。
- 关 键 词:
- 计算机 试卷 VB 笔试 模拟 66 答案 解析 DOC
