首页 - 网校 - 万题库 - 直播 - 雄鹰网校 - 团购 - 书城 - 模考 - 学习通 - 导航 -
首页网校万题库直播雄鹰网校团购书城模考论坛实用文档作文大全宝宝起名
2015中考
法律硕士
2015高考
MBA考试
2015考研
MPA考试
在职研
中科院
考研培训
专升本
自学考试 成人高考
四 六 级
GRE考试
攻硕英语
零起点日语
职称英语
口译笔译
申硕英语
零起点韩语
商务英语
日语等级
GMAT考试
公共英语
职称日语
新概念英语
专四专八
博思考试
零起点英语
托福考试
托业考试
零起点法语
雅思考试
成人英语三级
零起点德语
等级考试
华为认证
水平考试
Java认证
职称计算机 微软认证 思科认证 Oracle认证 Linux认证
公 务 员
导游考试
物 流 师
出版资格
单 证 员
报 关 员
外 销 员
价格鉴证
网络编辑
驾 驶 员
报检员
法律顾问
管理咨询
企业培训
社会工作者
银行从业
教师资格
营养师
保险从业
普 通 话
证券从业
跟 单 员
秘书资格
电子商务
期货考试
国际商务
心理咨询
营 销 师
司法考试
国际货运代理人
人力资源管理师
广告师职业水平
卫生资格 执业医师 执业药师 执业护士
会计从业资格
基金从业资格
统计从业资格
经济师
精算师
统计师
会计职称
法律顾问
ACCA考试
初级会计职称
资产评估师
高级经济师
注册会计师
高级会计师
美国注册会计师
审计师考试
国际内审师
注册税务师
理财规划师
一级建造师
安全工程师
设备监理师
公路监理师
公路造价师
二级建造师
招标师考试
物业管理师
电气工程师
建筑师考试
造价工程师
注册测绘师
质量工程师
岩土工程师
注册给排水
造价员考试
注册计量师
环保工程师
化工工程师
暖通工程师
咨询工程师
结构工程师
城市规划师
材料员考试
消防工程师
监理工程师
房地产估价
土地估价师
安全评价师
房地产经纪人
投资项目管理师
环境影响评价师
土地登记代理人
宝宝起名
缤纷校园
实用文档
入党申请
英语学习
思想汇报
作文大全
工作总结
求职招聘 论文下载 直播课堂
您现在的位置: 考试吧 > 计算机等级考试 > 计算机二级考试 > VB > 历年真题 > 正文

2013年3月全国计算机二级Visual Basic语言程序设计试卷

来源:考试吧 2018-02-12 11:27:38 考试吧:中国教育培训第一门户 模拟考场
“2013年3月全国计算机二级Visual Basic语言程序设计试卷”供考生参考。更多计算机等级考试内容请访问考试吧计算机等级考试网。

2013年3月全国计算机等级考试二级笔试试卷

Visual Basic语言程序设计

  一、单选题。

  (1)下列数据结构中,属于非线性结构的是

  (2)在下列链表中,能够从任意一个结点出发直接访问到所有结点的是

  (3)下列与栈结构有关联的是

  (4)下面对软件特点描述不正确的是

  (5)下面属于黑盒测试方法的是

  (6)下面不属于软件设计阶段任务的是

  (7)数据库管理系统是

  (8)在E-R图中,表示实体的图元是

  (9)有两个关系R和T 如下

  R T

  A B C A C

  a 1 2 a 2

  b 4 4 b 4

  c 2 3 c 3

  d 3 2 d 2

  则由关系R得到关系T的操作是

  (10)对图书进行编目时,图书有如下属性:ISBN书号,书名,作者,出版社,出版日期。能作为关键字的是

  (11)下列关于Visual Basic标准模块的描述中,错误的是

  (12)下列变量名中合法的是

  (13)表达式 66 \ 8 mod 5 & "avg" 的值是

  (14)下列能正确计算s=1+2+…… +100的程序段是

  (15)设有如下程序:

  Private Sub Form_Click()

  a = 10: b = 20

  x = a = b

  Print x

  End Sub

  程序运行后,单击窗体,输出结果为

  (16)在面向对象的程序设计中,对象可以执行的操作和可被对象识别的动作分别被称为

  (17)下列说法中,错误的是

  (18)设有如下程序:

  Private Sub Command1_Click()

  Dim i As Integer, j As Integer

  For i = 1 To 10

  i = i + j

  j = j + 1

  Next i

  End Sub

  程序运行后,单击命令按钮Command1,循环执行的次数为

  (19)设有如下程序:

  Private Sub Command1_Click()

  Dim m As Integer, n As Integer

  m = 1

  For n = 1 To 5

  m = m * n

  If m > 15 Then

  Exit For

  Else

  n = n + 1

  End If

  Next n

  Print m; n

  End Sub

  程序运行后,单击命令按钮Command1,输出结果为

  (20)设有如下程序:

  Private Sub Form_Click()

  Dim a, k As Integer

  Dim n As Integer, s As Integer

  a = Array(1, 1, 1, 2, 2, 2)

  For k = LBound(a) To UBound(a)

  n = n + k

  s = s + a(k)

  Next

  Print n; s

  End Sub

  程序运行后,如果单击窗体,则在窗体上输出的内容为:

  (21)窗体上有一个文本框,用于接收正整数。为保证输入数据的合法性  (即正整数),可以在该数据输入结束后准备继续其他操作时进行数据的合法性检查。为实现上述目的,应选用的事件是

  (22)设有如下程序:

  Private Sub Command1_Click()

  Dim a(10) As Integer

  Dim i As Integer, n As Integer

  n = 6

  For i = 1 To n

  a(i) = i * i

  Next i

  For i = 1 To n / 2

  temp = a(i)

  a(i) = a(n - i)

  a(n - i) = temp

  Next i

  For i = 1 To n

  Print a(i);

  Next

  End Sub

  程序运行后,单击命令按钮Command1,输出结果为

  (23)工程中包含Form1、Form2两个窗体,Form1是启动窗体,两个窗体上都有名称为 Label1的标签和名称为Command1的命令按钮,窗****观分别如图1、图2所示:

  Form1的事件过程如下:

  Private Sub Command1_Click()

  Form2.Show

  End Sub

  Form2中的事件过程如下:

  Private Sub Command1_Click()

  Label1.Caption = Form1.Label1.Caption

  End Sub

  关于以下程序,下面叙述中错误的是

  (24)窗体上有一个名称为Dir1的目录列表框,一个名称为File1的文件列表框。当改变目录列表框的内容时,文件列表框的内容应该与之同步改变。为实现两控件同步操作,应该使用的事件过程是

  (25)列表框List1中没有数据项,现编制如下程序:

  Private Sub Command1_Click()

  For i = 1 To 6

  List1.AddItem i

  Next i

  For i = 5 To 3 Step -1

  List1.RemoveItem i

  Next i

  End Sub

  程序运行后,单击命令按钮Command1,则列表框List1中的数据项为

  (26)一个工程文件中含有窗体Form1、Form2和标准模块Model1。如果Form1的声明部分有语句Private x As Integer,且Model1中有语句Public y As Integer,则下列说法中,正确的是

  (27)下列关于文件及其操作的描述中,正确的是

  (28)下列操作说明中,错误的是

  (29)在窗体上画一个名称为CD1的通用对话框,并编写如下程序:

  Private Sub Command1_Click()

  CD1.Filter = "所有文件(*.*)|*.*|文本文件(*.txt)|*.txt|Word文档(*.doc)|*.doc"

  CD1.FilterIndex = 2

  CD1.Action = 2

  End Sub

  运行程序,并单击命令按钮Command1,下面描述中正确的是

  (30)下列关于Visual Basic菜单的叙述中,错误的是

  (31)下列关于Sub Main过程的描述中,错误的是

  (32)设有如下程序:

  Private Sub Command1_Click()

  Dim i As Integer

  str1 = InputBox("输入一个字符串")

  str2 = ""

  i = 0

  Do While i < Len(str1) / 2

  str2 = str2 + Mid(str1, i + 1, 1)

  str2 = str2 + Mid(str1, Len(str1) - i, 1)

  i = i + 1

  Loop

  Print str2

  End Sub

  程序运行后,单击命令按钮Command1,在弹出的输入对话框中输入“abcdef”,则输出结果为

  (33)命令按钮Command1的单击事件过程如下:

  Private Sub Command1_Click()

  Dim x As String

  Dim y As String

  x = InputBox("输入字母", "输入")

  y = IIf((ucase9x) <> "A", "表达式1", "表达式2")

  Print y

  End Sub

  运行程序,单击命令按钮,在弹出的输入对话框中输入“ a”,则以下描述中正确的是

  (34)设有如下程序:

  Sub proc(x() As Integer)

  Static i As Integer

  Do

  x(i) = x(i) + x(i + 1)

  i = i + 1

  Loop While i < 2

  End Sub

  Private Sub Command1_Click()

  Dim a(5) As Integer, i As Integer

  For i = 0 To 4

  a(i) = i + 1

  Next i

  Call proc(a)

  Call proc(a)

  For i = 0 To 4

  Print a(i);

  Next i

  End Sub

  程序运行后,单击命令按钮Command1,输出结果为

  (35)以下程序将随机产生n个两位整数,并使用冒泡法将它们按递增顺序排序后输出。

  Option Base 1

  Private Sub Command1_Click()

  Dim a() As Integer

  Dim i As Integer, j As Integer

  Randomize

  n = InputBox("输入数据个数")

  ReDim a(n)

  For i = 1 To n

  a(i) = Int(Rnd * 90) + 10

  Next i

  For i = 1 To n - 1

  For j = 1 To n - i

  If a(j) < a(j - 1) Then

  temp = a(j): a(j) = a(j - 1): a(j - 1) = temp

  End If

  Next j

  Next i

  For i = 1 To n

  Print a(i);

  Next i

  End Sub

  运行以上程序,发现有错误,需要对j循环的开始语句进行修改。以下正确的修改是

扫描/长按二维码帮助考试通关
2018年等考报考资讯
2018等考各科通关技巧
2018各科最新预测试卷
2018等考各科备考资料

微信搜索"考试吧"了解更多考试资讯、下载备考资料

  相关推荐:

  2018年全国计算机等级考试必做试题汇总(各科目)

  2018年全国计算机等级考试复习知识点汇总(各科目)

  2018计算机等级考试报名时间|各地报名入口|报名条件

  2018年全国计算机等级考试时间|教材目录(2018年版)

  2018全国计算机等级考试备考经验及应试技巧汇总

  报名方法|考试内容|考试大纲|2018计算机等级考试科目

  历年真题汇总|考试吧策划:2018年计算机等级考试报考指南

文章搜索
版权声明:如果计算机等级考试网所转载内容不慎侵犯了您的权益,请与我们联系800@exam8.com,我们将会及时处理。如转载本计算机等级考试网内容,请注明出处。
Copyright © 2004- 考试吧计算机等级考试网 All Rights Reserved 
中国科学院研究生院权威支持(北京)
在线模拟试题
考证通关杀器
考试最新资讯
一次通关技巧