第一篇：2008年计算机等级考试二级VB预测试题及答案1 免费下载
www.xiexiebang.com提供大学英语考试试题免费下载
www.xiexiebang.com提供大学英语考试试题免费下载
www.xiexiebang.com提供大学英语考试试题免费下载
www.xiexiebang.com提供大学英语考试试题免费下载
www.xiexiebang.com提供大学英语考试试题免费下载
提供大学英语考试试题免费下载
www.xiexiebang.com提供大学英语考试试题免费下载
提供大学英语考试试题免费下载
提供大学英语考试试题免费下载
www.xiexiebang.com提供大学英语考试试题免费下载
第二篇：计算机二级考试：VB冲刺试题及答案(四)
2013年计算机二级考试：VB冲刺试题及答案
（四）笔试部分
一、选择题
1.串的长度是（）
A.串中不同字符的个数
B.串中不同字母的个数
C.串中所含字符的个数且字符个数大于零
D.串中所含字符的个数
【参考答案】 D
2.以下不属于对象的基本特点的是（）
A.分类性
B.多态性
C.继承性
D.封装性
【参考答案】 C
3.下面不属于软件设计原则的是（）
A.抽象
B.模块化
C.自底向上
D.信息隐蔽
【参考答案】 C
4.下列SQL语句中，用于修改表结构的是（）
A.ALTER
B.CREATE
C.UPDATE
D.INSERT
【参考答案】 A
5.关系模型允许定义3类数据约束，下列不属于数据约束的是（）
A.实体完整性约束
本试题摘取于考试吧：http://
B.参照完整性约束
C.域完整性约束
D.用户自定义的完整性约束
【参考答案】 C
6.非空的循环单链表head的尾结点(由p所指向)，满足（）
A.p->next==NULL
B.p==NULL
C.p->next=head
D.p=head
【参考答案】 C
7.对建立良好的程序设计风格，下面描述正确的是（）
A.程序应简单、清晰、可读性好
B.符号名的命名只要符合语法
C.充分考虑程序的执行效率
D.程序的注释可有可无
【参考答案】 A
A.数据结构
B.数据操作
C.数据查询
D.数据约束
【参考答案】 C
11.VisualFoxPro中打开数据库的命令是()
A.OPEN DATABASE<数据库名>
B.USE<数据库名>
C.USE DATABASE<数据库名>
D.OPEN<数据库名>
【参考答案】 A
12.在以下四组函数运算中，结果相同的是（）
A.LEFT(″Visual FoxPro″,6)与SUBSTR(″Visual FoxPro″,1,6)
B.YEAR(DATE())与SUBSTR(DTOC(DATE())，7，2)
C.VARTYPE(″36-5*4″)与VARTYPE(36-5*4)
D.假定A=″this″,B=″is a string″,A-B与A+B
【参考答案】 A
13.在对象引用中，ActiveControl表示（）
A.包含对象的表单
B.包含对象的表单集
C.当前活动表单
D.当前活动表单中有焦点的控件
【参考答案】 D
14.结构化程序设计三种基本逻辑结构是()
A.选择结构、循环结构和嵌套结构
B.顺序结构、选择结构和循环结构
C.选择结构、循环结构和模块结构
D.顺序结构、递归结构和循环结构
【参考答案】 B 本试题摘取于考试吧：http://
15.执行命令INPUT″请输入数据：″TO AAA时，如果要通过键盘输入字符串，应当使用的定界符包括（）
A.单引号
B.单引号或双引号
C.单引号、双引号或方括号
D.单引导、双引号、方括号或圆点
【参考答案】 C
16.在Visual FoxPro中进行参照完整性设置时，要想设置成：当更改父表中的主关键字段或候选关键字段时，自动更改所有相关子表记录中的对应值。应选择（）
A.限制(Restrict)
B.忽略(Ignore)
C.级联(Cascade)
D.级联(Cascade)或限制(Restrict)
【参考答案】 C
17.执行STORE″111″TO A之后，再执行?″222″+″&A″的结果是（）
A.222&A
B.333
C.222111
D.出错信息
【参考答案】 C
18.打开一个空数据表文件，分别用函数EOF()和BOF()测试，其结果一定是（）
A..T.和.T.B..F.和.F.C..T.和.F.D..F.和.T.【参考答案】 A
19.命令的作用是（）
A.可输出2个表达式的值
B.向用户提问的提示符
本试题摘取于考试吧：http://
C.只能显示变量的值
D.在当前光标处显示表达式的值
【参考答案】 D
20.用DIMENSION P(2)定义了一个数组，紧接着执行命令?TYPE(′P(1)′)，其结果是（）
A.U
B.N
C.L
D.C
【参考答案】 C
21.在命令窗口中执行下列命令：
SJKM=″HYGS″
USE &SJKM
后，已打开的数据表文件是（）
A.HYGS.DBF
B.HJKM.DBF
C.&SJKM.DBF
D.HYGS.TXT
【参考答案】 A
22.可以使用5种不同的数据类型描述数据库文件中的字段，它们分别是字符型(C)、数值型(N)、日期型(D)、逻辑型(L)和（）
A.屏幕型(S)
B.备注型(M)
C.浮点型(F)
D.全局型(PUB)
【参考答案】 A
23.AB
C.DBF是一个具有两个备注型字段的数据库文件，使用COPY TO PSQ命令进行复制操作，其结果将（）
A.得到一个新的数据库文件
本试题摘取于考试吧：http://
B.得到一个新的数据库文件和一个新的备注文件
C.得到一个新的数据库文件和两个新的备注文件
D.显示错误信息，表明不能复制具有备注型字段的数据库文件
【参考答案】 B
24.表Visual FoxPro中下列表达式中错误的是（）
A.″总分″+10
B.″AB″==″AB″
C.x>3 AND y<5
D.x<>y
【参考答案】 A
25.如果要创建一个3级数据分组报表，第1个分组表达式是“部分”，第2个分组表达式是“性别”，第3个分组表达式是“基本工资”，则当前索引的索引关键字表达式应该是（）
A.部分+性别+基本工资
B.部分+性别+STR(基本工资)
C.性别+部分+STR(基本工资)
D.STR(基本工资)+性别+部分
【参考答案】 B
26.物理删除记录可用两条记录完成，这两步的命令分别是（）
A.PACK和ZAP
B.PACK和RECALL
C.DELETE和PACK
D.DELETE和RECALL
【参考答案】 C
27.实现多表查询的数据不可以是（）
A.远程视图
B.数据库
C.数据表
D.本地视图
【参考答案】 B 本试题摘取于考试吧：http://
28.在Visual FoxPro中进行参照完整性设置时，要想设置成：在删除父表中的记录时，如果子表中有相关的记录，那么自动删除子表中相关的所有记录。应选择删除规则中的（）
A.限制(Restrict)
B.忽略(Ignore)
C.级联(Cascade)
D.级联(Cascade)或限制(Restrict)
【参考答案】 C
29.计时器控件的重要属性是（）
A.Enabled
B.Caption
C.Interval
D.Value
【参考答案】 C
30.在下面的Visual FoxPro表达式中，错误的是（）
A.{^2002-06-08 06:08:09 AM}+168
B.{^2002-06-08}-DATE()
C.{^2002-06-08}*10
D.{^2002-06-08}-[1986]
【参考答案】 C
31.将一个预览成功的菜单存盘，在运行该菜单时，却不能执行。这是因为（）
A.没有放到项目中去
B.没有生成 C.要用命令
D.要编入程序
【参考答案】 B
32.报表格式文件的扩展名是（）
A.IDX
B.MEM
C.FRX 本试题摘取于考试吧：http://
D.FMT
【参考答案】 C
33.形状控件的重要属性是（）
A.Top
B.Caption
C.Curvature
D.Width
【参考答案】 C
34.执行命令DIMENSION M(4，2)之后，数组M的下标变量个数和初值分别（）
A.8，.F.B.4,.T.C.8,0
D.2,空值
【参考答案】 A
35.已知一个数据表文件有8条记录，当前记录号是5，使用APPEND BLANK命令加一条空记录，该空记录的记录号是（）
A.6
B.5
C.9
D.8
【参考答案】 C
二、填空题
1.使用数据库设计器为两个表建立联系，首先应在父表中建立【1】索引，在子表中建立【2】索引。
【参考答案】
【1】主 【2】普通
2.常量.n.表示的是【3】型的数据。
【参考答案】
【3】逻辑
3.在Visual FoxPro 中参数传递的方式有两种，一种是按值传递，另一种是按引用传递，将参数设置本试题摘取于考试吧：http://
为按引用传递的语句是：SET UDFPARMS【4】。
【参考答案】
【4】TO REFERENCE
4.运行表单时，Load事件是在Init事件之【5】被引发。
【参考答案】
【5】前
5.如下程序段的输出结果是【6】。
i=1
DO WHILE i<10
i=i+2
ENDDO
?i
【参考答案】
【6】11
第6-9题使用如下三个表：
零件.DBF：零件号 C(2)，零件名称 C(10)，单价 N(10)，规格 C(8)
使用零件.DBF：项目号 C(2)，零件号 C(2)，数量I
项目.DBF：项目号 C(2)，项目名称 C(20)，项目负责人 C(10)，电话 C(20)
6.为“数量”字段增加有效性规则：数量>0，应该使用的SQL语句是【7】TABLE 使用零件【8】数量SET【9】数量>0。
【参考答案】
【7】ALTER 【8】ALTER 【9】CHECK
7.查询与项目“s1”所(项目号)使用的任意一个零件相同的项目号、项目名称、零件号和零件名称，使用的SQL语句是SELECT 项目.项目号，项目名称，使用零件.零件号，零件名称;
FROM 项目，使用零件，零件 WHERE 项目.项目号=使用零件.项目号【10】;
使用零件.零件号=零件.零件号 AND 使用零件.零件号【11】;
(SELECT 零件号 FROM 使用零件 WHERE 使用零件.项目号=′s1′
【参考答案】
【10】AND【11】IN 本试题摘取于考试吧：http://
8.建立一个由零件名称、数量、项目号、项目名称字段构成的视图，视图中只包含项目号为“s2”的数据，应该使用的SQL语句是
CREATE VIEW item-view【12】;
SELECT 零件.零件名称，使用零件.数量，使用零件.项目号，项目.项目名称;
FROM 零件 INNER JOIN 使用零件;
INNER JOIN【13】;
ON 使用零件.项目号=项目.项目号;
ON 零件.零件号=使用零件.零件号;
WHERE 项目.项目号=′s2′
【参考答案】
【12】AS 【13】项目
9.从上一题建立的视图中查询使用数量最多的2个零件的信息，应该使用的SQL语句是SELECT * 【14】2 FROM item-view【15】数量 DESC。
【参考答案】
【14】TOP 【15】ORDER BY
上机部分
1.基本操作题
在考生文件夹下完成如下操作：
(1)打开数据库Customer，并将自由表Customer和Order添加到数据库中。
(2)为表Order的“订单日期”字段定义默认值为系统的当前日期。
(3)为表Customer建立主索引，索引名和索引表达式均为“客户编号”。
(4)为表Order建立普通索引，索引名和索引表达式均为“客户编号”，然后通过“客户编号”字段建立表Customer和Order之间的永久联系。
【参考答案】
(1)具体步骤如下：
考试大（⑤ 使用同样的方法把Order表添加到数据库中。
(2)具体步骤如下：
① 在表Order上右击，在弹出的快捷菜单中选择“修改”命令。
② 弹出“表设计器”对话框，在“字段”选项卡中选择“订单日期”字段，在“字段有效性”下的“默认值”文本框中输入：DATE()。
(3)具体步骤如下：
① 在表Customer上右击，在弹出的快捷菜单中选择“修改”命令。
② 弹出“表设计器”对话框，单击“索引”选项卡，在“索引名”文本框中输入“客户编号”，在“类型”列表框中选择“主索引”选项，在“表达式”文本框中输入“客户编号”。
(4)具体步骤如下：
① 在表Order上右击，在弹出的快捷菜单中选择“修改”命令。
② 弹出“表设计器”对话框，单击“索引”选项卡，在“索引名”文本框中输入“客户编号”，在“类型”列表框中选择“普通索引”选项，在“表达式”文本框中输入“客户编号”。
③ 拖放Customer表的主索引标志“客户编号”到Order表的普通索引标志“客户编号”上，释放鼠标后，永久联系即已经建立。
2.简单应用题
在考生文件夹下完成如下简单应用：
(1)用SQL语句完成下列操作：列出“林诗因”持有的所有外币名称(取自rate_exchange表)和持有数量(取自currency_s1表)，并将检索结果按持有数量升序排序存放于表rate_temp中，同时将所使用的SQL语句存放于新建的文本文件rate.txt中。
(2)使用一对多报表向导建立报表。要求：父表为rate_exchange，子表为currency_s1，从父表中选择字段“外币名称”;从子表中选择全部字段;两个表通过“外币代码”建立联系;按“外币代码”降序排序;报表样式为“经营式”，方向为“横向”，报表标题为“外币持有情况”;生成的报表文件名为currency_report。
【参考答案】
(1)具体步骤如下：
① 在“命令”窗口输入命令：MODIFY COMMAND query，打开程序编辑器，编写如下程序段：
******下面是文件query.prg中的程序段******
SELECT rate_exchange.外币名称,currency_s1.持有数量;
FROM currency_s1 INNER JOIN rate_exchange;本试题摘取于考试吧：http://
ON currency_s1.外币代码=rate_exchange.外币代码;
WHERE currency_s1.姓名=“林诗因”;
ORDER BY currency_s1.持有数量;
INTO TABLE rate_temp.dbf
****************************************
② 在“命令”窗口输入命令：DO query，执行程序。
(2)具体步骤如下：
① 从“文件”菜单中选择“新建”命令。
② 在弹出的“新建”对话框中选中“报表”单选按钮，然后单击“向导”图标按钮。
③ 系统弹出“向导选取”对话框，在列表框中选择“一对多报表向导”选项，单击“确定”按钮。
④ 系统首先要求选择一对多报表中作为父表的数据表文件。根据题意，选择rate_exchange表作为父表，从“可用字段”列表框中将“rate_exchange.外币名称”字段添加到右边的“选定字段”列表框中，用做父表的可用字段。
⑤ 单击“下一步”按钮设计子表的可用字段，操作方法与父表选取字段的方法一样，将currency_s1表中的所有字段添加到“选定字段”列表框中。
⑥ 单击“下一步”按钮进入“建立表关联”的设计界面，在此处系统已经默认设置好进行关联的字段：父表的“外币代码”和子表的“外币代码”字段。
⑦ 单击“下一步”按钮进入“选择排序方式”的设计界面，将“可用字段或索引标识”列表框中的“外币代码”字段添加到右边的“选定字段”列表框中，并选中“降序”单选按钮。
⑧ 单击“下一步”按钮进入“选择报表样式”的界面，在“样式”列表框中选择“经营式”选项，在“方向”选项组中选择“横向”。
⑨ 单击“下一步”按钮进入最后的“完成”设计界面，在“标题”文本框中输入“外币持有情况”为报表标题，单击“完成”按钮。
⑩ 在系统弹出的“另存为”对话框中，将报表以currency_report为文件名保存在考生文件夹下，退出报表设计向导。
3.综合应用题
建立满足如下要求的应用并运行，所有控件的属性必须在表单设计器的属性窗口中设置：
(1)建立一个表单myform(文件名和表单名均为myform)，其中包含两个表格控件，第一个表格控件名称是grd1，用于显示表Customer中的记录，第二个表格控件名称是grd2，用于显示与表Customer本试题摘取于考试吧：http://
中当前记录对应的Order表的记录。要求两个表格尺寸相同、水平对齐。
(2)建立一个菜单mymenu，该菜单只有一个菜单项“退出”，该菜单项对应于一个过程，并且含有两条语句，第一条语句是关闭表单myform，第二条语句是将菜单恢复为默认的系统菜单。
(3)在myform的Load事件中执行生成的菜单程序mymenu.mpr。
【参考答案】
(1)具体步骤如下：
① 从“文件”菜单中选择“新建”命令。
② 在弹出的“新建”对话框中选中“表单”单选按钮，单击“新建表单”按钮。
③ 在弹出的表单设计器属性窗口中，选中name属性，在其后输入属性值myform。
④ 存盘，存盘文件名设为myform。
⑤ 从当前打开的数据库中，拖放Customer表到表单中，将生成一个表格控件，选中该表格控件，在属性窗口中选中name属性，设置它的值为grd1。
⑥ 同样，从当前打开的数据库中，拖放Order表到表单中，将又生成一个表格控件，选中该表格控件，在其属性窗口中选中name属性，设置它的值为grd2。
⑦ 选中grd1和grd2两个表格，执行“格式”→“对齐”→“水平居中对齐”命令，在“布局”工具栏中用鼠标单击“相同大小”按钮。
(2)具体步骤如下：
① 从“文件”菜单中选择“新建”命令，在弹出的“新建”对话框中选中“菜单”单选按钮，单击“新建文件”按钮。
② 在“新建菜单”对话框中单击“菜单”按钮，进入“菜单设计器”窗口。
③ 在弹出的菜单设计器“菜单名称”下面输入“退出”，在“结果”栏下面的列表框中选择“过程”选项，再单击后面的“创建”按钮。
④ 在出现的过程中输入如下两个语句：
thisform.release
set sysmenu to default
⑤ 保存菜单，菜单文件名取为mymenu.mnx。
⑥ 执行“菜单”菜单下的“生成”命令，生成菜单程序文件mymenu.mpr。
(3)在表单myform的空白处双击，将出现代码编写窗口，在该窗口中输入代码：
do mymenu.mpr
本试题摘取于考试吧：http://
本试题摘取于考试吧：http://
第三篇：2010年3月计算机等级考试二级VB试题及答案
一、选择题(每小题2分，共70分)
下列各题A)、B)、C)、D)四个选项中，只有一个选项是正确的。请将正确选项填涂在答题卡相应位置上，答在试卷上不得分。
(1)下列叙述中正确的是
A)对长度为n的有序链表进行查找，最坏情况下需要的比较次数为n
B)对长度为n的有序链表进行对分查找，最坏情况下需要的比较次数为(n/2)
C)对长度为n的有序链表进行对分查找，最坏情况下需要的比较次数为(log2n)
D)对长度为n的有序链表进行对分查找，最坏情况下需要的比较次数为(n log2n)
(2)算法的时间复杂度是指
A)算法的执行时间
B)算法所处理的数据量
C)算法程序中的语句或指令条数
D)算法在执行过程中所需要的基本运算次数
(3)软件按功能可以分为：应用软件、系统软件和支撑软件(或工具软件)。下面属于系统软件的是
A)编辑软件
B)操作系统
C)教务管理系统
D)浏览器
(4)软件(程序)调试的任务是
A)诊断和改正程序中的错误
B)尽可能多地发现程序中的错误
C)发现并改正程序中的所有错误
D)确定程序中错误的性质
(5)数据流程图(DFD图)是
A)软件概要设计的工具
B)软件详细设计的工具
C)结构化方法的需求分析工具
D)面向对象方法的需求分析工具
(6)软件生命周期可分为定义阶段，开发阶段和维护阶段。详细设计属于
A)定义阶段
B)开发阶段
C)维护阶段
D)上述三个阶段
(7)数据库管理系统中负责数据模式定义的语言是
A)数据定义语言
B)数据管理语言
C)数据操纵语言
D)数据控制语言
(8)在学生管理的关系数据库中，存取一个学生信息的数据单位是
A)文件
B)数据库
C)字段
D)记录
(9)数据库设计中，用E-R图来描述信息结构但不涉及信息在计算机中的表示，它属于数据库设计的
A)需求分析阶段
B)逻辑设计阶段
C)概念设计阶段
D)物理设计阶段
(10)有两个关系R和T如下：
则由关系R得到关系T的操作是
A)选择
B)投影
C)交 D)并
(11)在VB集成环境中要结束一个正在运行的工程，可单击工具栏上的一个按钮，这个按钮是
(12)设x是整型变量，与函数Ⅱf(x>0,-x,x)有相同结果的代数式是 A)|x| B)-|x| C)x D)-x(13)设窗体文件中有下面的事件过程： Private Sub Command1_Click()Dim s a%=100 Print a End Sub 其中变量a和s的数据类型分别是 A)整型，整型 B)变体型，变体型 C)整型，变体型 D)变体型，整型
(14)下面哪个属性肯定不是框架控件的属性 A)Text B)Caption
C)Left
D)Enabled
(15)下面不能在信息框中输出“VB”的是
A)MsgBox “VB”
B)x=MsgBox(“VB”)
C)MsgBox(“VB”)
D)Call MsgBox “VB”
(16)窗体上有一个名称为Option1的单选按钮数组，程序运行时，当单击某个单选按钮时，会调用下面的事件过程
Private Sub Option1_C1ick(Index As Integer)
„
End Sub
下面关于此过程的参数Index的叙述中正确的是
A)Index为1表示单选按钮被选中，为O表示未选中
B)Index的值可正可负
C)Index的值用来区分哪个单选按钮被选中
D)Index表示数组中单选按钮的数量
(17)设窗体中有一个文本框Text1，若在程序中执行了Text1.SetFocus，则触发
A)Text1的SetFocus事件
B)Text1的GotFocus事件
C)Text1的LostFocus事件
D)窗体的GotFocus事件
(18)VB中有3个键盘事件：KeyPress、KeyDown、KeyUp，若光标在Text1文本框中，则每输入一个字母
A)这3个事件都会触发
B)只触发KeyPress事件
C)只触发KeyDown、KeyUp事件
D)不触发其中任何一个事件
(19)下面关于标准模块的叙述中错误的是
A)标准模块中可以声明全局变量
B)标准模块中可以包含一个Sub Main过程，但此过程不能被设置为启动过程
C)标准模块中可以包含一些Public过程
D)一个工程中可以含有多个标准模块
(20)设窗体的名称为Form1，标题为Win，则窗体的MouseDown事件过程的过程名是
A)Form1_MouseDown
B)Win_MouseDown
C)Form_MouseDown
D)MouseDown_Form1(21)下面正确使用动态数组的是
A)Dim arr()As Integer
„
ReDim arr(3,5)
B)Dim arr()As Integer
„
ReDim arr(50)As String C)Dim arr()„
ReDim arr(50)As Integer D)Dim arr(50)As Integer „
ReDim arr(20)(22)下面是求最大公约数的函数的首部
Function gcd(ByVal x As Integer, ByVal y As Integer)As Integer 若要输出8、12、16这3个数的最大公约数，下面正确的语句是 A)Print gcd(8,12)，gcd(12,16)，gcd(16,8)B)Print gcd(8,12,16)C)Print gcd(8)，gcd(12)，gcd(16)D)Print gcd(8,gcd(12,16))(23)有下面的程序段，其功能是按图1所示的规律输出数据 Dim a(3,5)As Integer For i=1 To 3 For j=1 To 5 A(i,j)=i+j Print a(i,j);Next Print Next
若要按图2所示的规律继续输出数据，则接在上述程序段后面的程序段应该是 A)For i=1 To 5 For j=1 To 3 Print a(j,i);Next Print Next B)For i=1 To 3 For j=1 To 5 Print a(j,i);Next
Next
C)For j=1 To 5
For i=1 To 3
Print a(j,i);
Next
Next
D)For i=1 To 5
For j=1 To 3
Print a(i,j);
Next
Next(24)窗体上有一个Text1文本框，一个Command1命令按钮，并有以下程序
Private Sub Commandl_Click()
Dim n
If Text1.Text<>“23456” Then
n=n+1
Print “口令输入错误” & n & “次”
End If
End Sub
希望程序运行时得到左图所示的效果，即：输入口令，单击“确认口令”命令按钮，若输入的口令不是“123456”，则在窗体上显示输入错误口令的次数。但上面的程序实际显示的是右图所示的效果，程序需要修改。下面修改方案中正确的是
A)在Dim n语句的下面添加一句：n=O
B)把Print “口令输入错误” & n & “次”改为Print “口令输入错误” +n+“次”
C)把Print “口令输入错误” & n & “次”改为Print “口令输入错误”&Str(n)&“次”
D)把Dim n改为Static n
(25)要求当鼠标在图片框P1中移动时，立即在图片框中显示鼠标的位置坐标。下面能正确实现上述功能的事件过程是
A)Private Sub P1_MouseMove(Button AS Integer,Shift As Integer,X As Single, Y As Single)
Print X,Y
End Sub
B)Private Sub P1_MouseDown(Button AS Integer,Shift As Integer,X As Single, Y As Single)
Picture.Print X,Y
End Sub
C)Private Sub P1_MouseMove(Button AS Integer,Shift As Integer,X As Single, Y As Single)
P1.Print X,Y
End Sub
D)Private Sub Form_MouseMove(Button AS Integer,Shift As Integer,X As Single, Y As Single)
P1.Print X,Y
End Sub
(26)计算二的近似值的一个公式是
某人编写下面的程序用此公式计算并输出π的近似值：
Private Sub Comand1_Click()
PI=1。
Sign=1
n=20000
For k=3 To n
Sign=-Sign/k
PI=PI+Sign/k
Next k
Print PI*4
End Sub
运行后发现结果为3.22751，显然，程序需要修改。下面修改方案中正确的是
A)把For k=3 To n 改为 For k=1 To n
B)把n=20000改为n=20000000
C)把For k=3 To n改为For k=3 To n Step 2
D)把PI=1改为PI=0(27)下面程序计算并输出的是
Private Sub Comand1_Click()
a=10
s=0
Do
s=s+a*a*a
a=a-1
Loop Until a<=0
Print s
End Sub
A)13+23+33+„+103的值
B)10!+„+3!+2!+1!的值
C)(1+2+3+„+10)3的值
D)10个103的和
(28)若在窗体模块的声明部分声明了如下自定义类型和数组
Private Type rec
Code As Integer
Caption As String
End Type
Dim arr(5)As rec
则下面的输出语句中正确的是
A)Print arr.Code(2),arr.Caption(2)
B)Print arr.Code,arr.Caption
C)Print arr(2).Code,arr(2).Caption
D)Print Code(2),Caption(2)
(29)设窗体上有一个通用对话框控件CD1，希望在执行下面程序时，打开如图所示的文件对话框
Private Sub Comand1_Click()
CD1.DialogTitle=“打开文件”
CD1.InitDir=“C:”
CD1.Filter=“所有文件|*.*|Word文档|*.doc|文本文件|*.Txt”
CD1.FileName=“" CD1.Action=1 If CD1.FileName=”“Then Print”未打开文件“ Else Print”要打开文件“& CD1.FileName End If End Sub
但实际显示的对话框中列出了C:下的所有文件和文件夹，“文件类型”一栏中显示的是“所有文件”。下面的修改方案中正确的是
A)把CD1.Action=1改为CD1.Action=2
B)把“CD1.Filter=”后面字符串中的“所有文件”改为“文本文件”
C)在语句CD1.Action=1的前面添加：CD1.FilterIndex=3
D)把CD1.FileName=”“改为CD1.FileName=”文本文件“
(30)下面程序运行时，若输入395，则输出结果是
Private Sub Comand1_Click()
Dim x%
x=InputBox(”请输入一个3位整数“)
Print x Mod 10,x100,(x Mod 100)10
End Sub
A)3 9 5
B)5 3 9
C)5 9 3
D)3 5 9(31)窗体上有List1、List2两个列表框，List1中有若干列表项(见图)，并有下面的程序：
Private Sub Comand1_Click()
For k=List1.ListCount-1 To 0 Step-1
If List1.Selected(k)Then
List2.AddItem List1.List(k)
List1.RemoveItem k
End If
Next k
End Sub
程序运行时，按照图示在List1中选中2个列表项，然后单击Commandl命令按钮，则产生的结果是
A)在List2中插入了“外语”、“物理”两项
B)在List1中删除了“外语”、“物理”两项
C)同时产生A)和B)的结果
D)把List1中最后1个列表项删除并插入到List2中
(32)设工程中有2个窗体： Form1、Form2，Form1为启动窗体。Form2中有菜单。其结构如表。要求在程序运行时，在Form1的文本框Text1中输入口令并按回车键(回车键的ASCII码为13)后，隐藏Form1，显示Form2。若口令为“Teacher”，所有菜单项都可见;否则看不到“成绩录入”菜单项。为此，某人在Form1窗体文件中编写如下程序：
Private Sub Text1_KeyPress(KeyAscii As Integer)
If KeyAscii=13 Then
If Text1.Text=”Teacher“ Then
Form2.input.visible=True
Else
Form2.input.visible=False
End If
End If
Form1.Hide
Form2.Show
End Sub
程序运行时发现刚输入口令时就隐藏了Form1，显示了Form2，程序需要修改。下面修改方案中正确的是
A)把Form1中Text1文本框及相关程序放到Form2窗体中
B)把Form1.Hide、Form2.Show两行移到2个End If之间
C)把If KeyAscii=13 Then改为 If KeyAscii=”Teaeher“ Then
D)把2个Form2.input.Visible中的“Form2”删去
(33)某人编写了下面的程序，希望能把Text1文本框中的内容写到out.txt文件中
Private Sub Comand1_Click()
Open ”out.txt“ For Output As #2
Print ”Text1“
Close #2
End Sub
调试时发现没有达到目的，为实现上述目的，应做的修改是
A)把Print ”Text1“改为Print #2,Text1
B)把Print ”Text1“改为Print Text1
C)把Print ”Text1“改为Write ”Text1“
D)把所有#2改为#1(34)窗体上有一个名为Command1的命令按钮，并有下面的程序： Private Sub Comand1_Click()Dim arr(5)As Integer For k=1 To 5 arr(k)=k Next k prog arr()For k=1 To 5 Print arr(k)Next k End Sub Sub prog(a()As Integer)n=Ubound(a)For i=n To 2 step-1 For j=1 To n-1 if a(j)t=a(j):a(j)=a(j+1):a(j+1)=t End If Next j Next i End Sub 程序运行时，单击命令按钮后显示的是 A)12345 B)54321 C)01234 D)43210(35)下面程序运行时，若输入“Visual Basic Programming”，则在窗体上输出的是 Private Sub Comand1_Click()Dim count(25)As Integer, ch As String ch=Ucase(InputBox(”请输入字母字符串“))For k=1 To Len(ch)n=Asc(Mid(ch,k,1))-Asc(”A“)If n>=0 Then Count(n)=Count(n)+ 1 End If Next k m=count(0)For k=1 To 25 If m<> m=count(k)End If Next k Print m
End Sub
A)0
B)1
C)2
D)3
二、填空题
(1)一个队列的初始状态为空。现将元素A,B,C,D,E,F,5,4,3,2,1依次入队，然后再依次退队，则元素退队的顺序为 【1】。
(2)设某循环队列的容量为50，如果头指针front=45(指向队头元素的前一位置)，尾指针rear=10(指向队尾元素)，则该循环队列中共有 【2】 个元素。
(3)设二叉树如下：
对该二叉树进行后序遍历的结果为 【3】。
(4)软件是 【4】、数据和文档的集合。
(5)有一个学生选课的关系，其中学生的关系模式为：学生(学号，姓名，班级，年龄)，课程的关系模式为：课程(课号，课程名，学时)，其中两个关系模式的键分别是学号和课号，则关系模式选课可定义为：选课(学号，【5】，成绩)。
(6)为了使复选框禁用(即呈现灰色)，应把它的Value属性设置为 【6】。
(7)在窗体上画一个标签、一个计时器和一个命令按钮，其名称分别为Labl1、Timer1和Command1，如图1所示。程序运行后，如果单击命令按钮，则标签开始闪烁，每秒钟“欢迎”二字显示、消失各一次，如图2所示。以下是实现上述功能的程序，请填空。
Private Sub Form_Load()
Label1.Caption=”欢迎“
Timer1.Enabled=False
Timer1.Interval= 【7】
End Sub
Private Sub Timer1_Timer()
Label1.Visible= 【8】
End Sub
Private Sub command1_Click()
【9】
End Sub
(8)有如下程序：
Private Sub Form_Click()n=10 i=0
Do
i=i+n
n=n-2
Loop While n>2
Print i
End Sub
程序运行后，单击窗体，输出结果为 【10】。
(9)在窗体上画一个名称为Command1的命令按钮。然后编写如下程序：
Option Base 1
Private Sub Command1_Click()
Dim a(10)As Integer
For i=1 To 10
a(i)=i
Next
Call swap(【11】)
For i=1 To 10
Print a(i);
Next
End Sub
Sub swap(b()As Integer)
n=Ubound(b)
For i=1 To n / 2
t=b(i)
b(i)=b(n)
b(n)=t
【12】
Next
End Sub
上述程序的功能是，通过调用过程swap，调换数组中数值的存放位置，即a(1)与a(10)的值互换，a(2)与a(9)的值互换，„„。请填空。
(10)在窗体上画一个文本框，其名称为Text1，在属性窗口中把该文本框的MultiLine属性设置为True，然后编写如下的事件过程：
Private Sub Form_Click()
Open ”d:testsmtext1.Txt“ For Input As #1
Do While Not 【13】
Line Input #1, aspect$
Whole$=whole$+aspect$+Chr$(13)+Chr$(10)
Loop
Text1.Text=whole$
【14】
Open ”d:testsmtext2.Txt" For Output As #1
Print #1, 【15】
Close #1
End Sub
运行程序，单击窗体，将把磁盘文件smtext1.txt的内容读到内存并在文本框中显示出来，然后把该文本框中的内容存入磁盘文件smtext2.txt。请填空。选择题
1、A
2、D
3、B
4、A
5、C
6、B
7、A
8、D
9、A
10、A
填空题
1、A,B,C,D,E,5,4,3,2,1 2、15
3、EDBGHFCA
4、程序
5、课号
第四篇：计算机二级VB考试题及答案
不论从事何种工作，如果要想做出高效、实效，务必先从自身的工作计划开始。有了计划，才不致于使自己思想迷茫、头脑空洞，不知从哪里着手开展工作。下面是小编搜索整理的计算机二级VB考试题及答案，供大家参考学习！
计算机二级VB考试题及答案
1.设有如下程序段：
x=
2For c=1 To 4 Step 2
x=x+c
Next c
运行以上程序后，x的值是(A)(单)
A.6
B.7
C.8
D.9
2.以下叙述中错误的是(A)(单)
A.在KeyPress事件过程中不能识别键盘键的按下与释放
B.在KeyPress事件过程中不能识别回车键
C.在KeyDown和KeyUp事件过程中，从键盘输入的字母“A”和字母“a”对应的KeyCode视作相同的字母
D.在KeyDown和KeyUp事件过程中，从大键盘上输入的“1”和从右侧小键盘上输入的“1”被视作不同的字符
3.执行如下两条语句，窗体上显示的是(C)(单)
A=9.8596
Print Format(a,“000.00”)
A.0,009.86
B.9.86
C.009.86
D.0,009.86
4.在窗体上画一个名称为CommandDialog1 的通用对话框，一个名称为Command1的命令按钮。然后编写如下事件过程：
Private Sub Command1_Click()
CommonDialog1.FileName =“"
CommonDialog1.Filter=”All file|*.*|(*.Doc)|*.Doc|(*.Txt)|*.Txt“
CommonDialog1.FilterIndex=
1CommonDialog1.DialogTitle=”VBTest“
CommonDialog1.Action=1
End Sub
对于这个程序，以下叙述中错误的是(D)(单)
A.该对话框被设置为”打开“对话框
B.在该对话框中指定的文件名为空
C.该对话框的标题为VBTest
D.在该对话框中指定的默认文件类型为文本文件(*.Txt)
5.设一个工程由两个窗体组成，其名称分别为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(x>10,100,-100)
f.Show
f.Caption=y
End Sub
运行以上程序，正确的结果是(B)(单)
A.Form1的Caption属性值为100
B.Form2的Caption属性值为-100
C.Form1的Caption属性值为-100
D.Form2的Caption属性值为100
6.在窗体上画一个名称为Command1的命令按钮，并编写如下程序：
Private Sub Command1_Click()
Dim x As Integer
Static y As Integer
x=10
y=
5Call f1(x,y)
Print x,y
End Sub
Private Sub f1(ByRef x1 As Integer, y1 As Integer)
x1=x1+2
y1=y1+2
End Sub
程序运行后，单击命令按钮，在窗体上显示的内容是(D)(单)
A.10 5
B.12 5
C.10 7
D.12 7
7.Option Base 1
Private Sub Command1_Click()
Dim a(10)As Integer
Dim n As Integer
n=
3If n<10 Then
Call GetArray(a,n)
End If
End Sub
Private Sub GetArray(b()As Integer,n As Integer)
Dim c(10)As Integer
j=0
For t=1 To n
b(t)=Rnd*100
If b(t)/2=b(t)2 Then
j=j+1
c(j)=b(t)
End If
Next t
Print j
End Sub
以下叙述中错误的是(C)(单)
A.数组b中的数范围为0-100
B.c数组下标的下界从1开始
C.GetArray过程的参数n是按值传送的D.语句If b(t)/2=b(t)2 Then 是判断数组b中元素的值是否为整数
8.在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程：
Option Base 1
Private Sub Command1_Click()
Dim a
a= Array(1,2,3,4,5)
For c=1 To Ubound(a)
a(c)= a(c)+c-1
Next c
Print a(3)
End Sub
程序运行后，单击命令按钮，则在窗体上显示的内容是(B)(单)
A.4B.5
C.6
D.7
9.阅读程序：
Option Base 1
Private Sub Form_Click()
Dim arr
Dim Sum%
Sum = 0
arr = Array(1, 3, 5, 7, 9)
For t = 1 To 5
Sum = Sum + arr(t)
Next t
Print Sum
End Sub
程序运行后，单击窗体，输入结果为(B)(单)
A.5
B.9
C.25
D.15
10.在窗体上画一个名称为File1的文件列表框，并编写如下程序：
Private Sub File1_DblClick()
x=Shell(File1.FileName,1)
End Sub
以下关于该程序的叙述中，错误的是(A)(单)
A.x没有实际作用，因此可以将该语句写为：Call Shell(File1,FileName,1)
B.双击文件列表框中的文件，将触发该事件过程
C.要执行的文件的名字通过File1.FileName指定
D.File1中显示的是当前驱动器、当前目录下的文件
11.在窗体上画一个名称为Label1、标题为”VisualBasic考试“的标签，两个名称分别为Command1和Command2、标题分别为”开始“和”停止“的命令按钮，然后画一个名称为Timer1的计时器控件，并把其Interval属性设置为500。编写如下程序：
Private Sub Form_Load()
Timer1.Enabled=False
End Sub
Private Sub Command1_Click()
Timer1.Enabled=True
End Sub
Private Sub Timer1_Timer()
If Label1.Left< Form1.Width Then
Label1.Left = Label1.Left + 20
Else
Label1.Left=0
End If
End Sub
程序运行后，单击”开始“按钮，标签在窗体中移动。对于这个程序，以下叙述中错误的是(A)(单)
A.标签的移动方向为自右向左
B.单击”停止“按钮后再单击”开始“按钮，标签从停止的位置继续移动
C.当标签全部移出窗体后，将从窗体的另一端出现并重新移动
D.标签按指定的时间时隔移动
12.规范地说，VB是一种(A)的开发工具(单)
A.面向对象
B.面向用户
C.面向屏幕
D.面向窗体
13.VB6设计界面包含多个视窗，控制这些视窗显示或关闭的命令包含在(D)下拉菜单中(单)
A.文件
B.工程
C.编辑
D.视图
14下面(D)操作不是激活或显示属性列表框的操作(单)
A.按快捷键F
4B.点击工具栏中的”属性列表框“按钮
C.选择”视图“下拉菜单的”属性窗口“项
D.双击窗体中的某一对象
15.Visual Basic程序中分隔各语句的字符是(B)(单)
A.′
B.:
C.D._
16.假定窗体的名称(Name属性)为Form1，则把窗体的标题设置为”VB Test“的语句为(B)(单)
A.Form1 = ”VB Test“
B.Caption =”VB Test“
C.Form1.Text = ”VB Test“
D.Form1.Name =”VB Test"
17.下列不能打开代码窗口的操作是(D)(单)
A.双击窗体上的某个控件双击
B.双击窗体
C.按F7键
D.单击窗体或控件
18.Visual Basic程序中语句行的续行符是(D)(单)
A.′
B.:
C.D._
19.Visual Basic程序中的注释所使用的字符是(A)(单)
A.′
B.:
C.D._
20.下列说法中正确的是：为了保存一个Visual Basic应用程序，应当(D)(单)
A.只保存窗体模块文件(.frm)
B.只保存工程文件(.vbp)
C.分别保存工程文件和标准模块文件(.bas)
D.分别保存工程文件、窗体文件和标准模块文件
第五篇：2011河南省全国计算机等级考试二级VB笔试试卷及参考答案理论考试试题及答案
1、对建立良好的程序设计风格，下面描述正确的是(A)A.程序应简单、清晰、可读性好 B.符号名的命名要符合语法 C.充分考虑程序的执行效率 D.程序的注释可有可无
2、下列模式中，能够给出数据库物理存储结构与物理存取方法的是(A)A.内模式 B.外模式 C.概念模式 D.逻辑模式
3、数据流图用于抽象描述一个软件的逻辑模型，数据流图由一些特定的图符构成。下列图符名标识的图符不属于数据流图合法图符的是(A)A.控制流 B.加工 C.数据存储 D.源和潭
4、下列关于栈的叙述中正确的是(D)A.在栈中只能插入数据 B.在栈中只能删除数据
C.栈是先进先出的线性表 D.栈是先进后出的线性表
5、面向对象的设计方法与传统的的面向过程的方法有本质不同，它的基本原理是(C)A.模拟现实世界中不同事物之间的联系 B.强调模拟现实世界中的算法而不强调概念 C.使用现实世界的概念抽象地思考问题从而自然地解决问题 D.鼓励开发者在软件开发的绝大部分中都用实际领域的概念去思考
6、在软件生命周期中，能准确地确定软件系统必须做什么和必须具备哪些功能的阶段是(D)A.概要设计 B.详细设计 C.可行性分析 D.需求分析
7、在面向对象方法中，一个对象请求另一对象为其服务的方式是通过发送(D)A.调用语句 B.命令 C.口令 D.消息
8、程序流程图（PFD）中的箭头代表的是(B)A.数据流 B.控制流 C.调用关系 D.组成关系
9、设一棵完全二叉树共有699个结点，则在该二叉树中的叶子结点数为(B)注：利用公式n=n0+n1+n2、n0=n2+1和完全二叉数的特点可求出 A.349 B.350 C.255 D.351
10、在结构化方法中，软件功能分解属于下列软件开发中的阶段是(C)注：总体设计也就是概要设计
A.详细设计 B.需求分析 C.总体设计 D.编程调试
11、对建立良好的程序设计风格，下面描述正确的是(A)A.程序应简单、清晰、可读性好 B.符号名的命名要符合语法 C.充分考虑程序的执行效率 D.程序的注释可有可无
12、在一棵二叉树上第5层的结点数最多是(B)注：由公式2（k-1）得 A.8 B.16 C.32 D.15
13、数据库系统的核心是(B)A.数据模型 B.数据库管理系统 C.软件工具 D.数据库
14、将E-R图转换到关系模式时，实体与联系都可以表示成(B)A.属性 B.关系 C.键 D.域
15、将E-R图转换到关系模式时，实体与联系都可以表示成(B)A.属性 B.关系 C.键 D.域
16、软件需求分析阶段的工作，可以分为四个方面：需求获取、需求分析、编写需求规格说明书以及(B)A.阶段性报告 B.需求评审 C.总结 D.都不正确
17、对长度为N的线性表进行顺序查找，在最坏情况下所需要的比较次数为(B)注：要牢记 A.N+1 B.N C.(N+1)/2 D.N/2
18、在结构化方法中，软件功能分解属于下列软件开发中的阶段是(C)注：总体设计也就是概要设计
A.详细设计 B.需求分析 C.总体设计 D.编程调试
19、在软件生命周期中，能准确地确定软件系统必须做什么和必须具备哪些功能的阶段是(D)A.概要设计 B.详细设计 C.可行性分析 D.需求分析
20、下列叙述中正确的是(A)A.线性表是线性结构 B.栈与队列是非线性结构 C.线性链表是非线性结构 D.二叉树是线性结构
21、下列模式中，能够给出数据库物理存储结构与物理存取方法的是(A)A.内模式 B.外模式 C.概念模式 D.逻辑模式
22、数据库概念设计的过程中，视图设计一般有三种设计次序，以下各项中不对的是(D)A.自顶向下 B.由底向上 C.由内向外 D.由整体到局部
23、算法一般都可以用哪几种控制结构组合而成(D)A.循环、分支、递归 B.顺序、循环、嵌套 C.循环、递归、选择 D.顺序、选择、循环
24、下面不属于软件工程的3个要素的是(D)A.工具 B.过程 C.方法 D.环境
25、下列关于队列的叙述中正确的是(C)A.在队列中只能插入数据 B.在队列中只能删除数据 C.队列是先进先出的线性表 D.队列是先进后出的线性表
26、数据流图用于抽象描述一个软件的逻辑模型，数据流图由一些特定的图符构成。下列图符名标识的图符不属于数据流图合法图符的是(A)A.控制流 B.加工 C.数据存储 D.源和潭
27、在软件生命周期中，能准确地确定软件系统必须做什么和必须具备哪些功能的阶段是(D)A.概要设计 B.详细设计 C.可行性分析 D.需求分析
28、下面描述中，符合结构化程序设计风格的是(A)A.使用顺序、选择和重复（循环）三种基本控制结构表示程序的控制逻辑 B.模块只有一个入口，可以有多个出口 C.注重提高程序的执行效率 D.不使用goto语句
29、算法的空间复杂度是指(D)A.算法程序的长度 B.算法程序中的指令条数 C.算法程序所占的存储空间 D.算法执行过程中所需要的存储空间
30、在软件生命周期中，能准确地确定软件系统必须做什么和必须具备哪些功能的阶段是(D)A.概要设计 B.详细设计 C.可行性分析 D.需求分析
31、下列叙述中正确的是(C)A.数据库是一个独立的系统，不需要操作系统的支持 B.数据库设计是指设计数据库管理系统C.数据库技术的根本目标是要解决数据共享的问题 D.数据库系统中，数据的物理结构必须与逻辑结构一致
32、在面向对象方法中，一个对象请求另一对象为其服务的方式是通过发送(D)A.调用语句 B.命令 C.口令 D.消息
33、在数据管理技术的发展过程中，经历了人工管理阶段、文件系统阶段和数据库系统阶段。其中数据独立性最高的阶段是(A)A.数据库系统 B.文件系统 C.人工管理 D.数据项管理
34、在结构化方法中，软件功能分解属于下列软件开发中的阶段是(C)注：总体设计也就是概要设计
A.详细设计 B.需求分析 C.总体设计 D.编程调试
35、在数据管理技术的发展过程中，经历了人工管理阶段、文件系统阶段和数据库系统阶段。其中数据独立性最高的阶段是(A)A.数据库系统 B.文件系统 C.人工管理 D.数据项管理
36、在下列选项中，哪个不是一个算法一般应该具有的基本特征(C)A.确定性 B.可行性 C.无穷性 D.拥有足够的情报
37、在一棵二叉树上第5层的结点数最多是(B)注：由公式2（k-1）得 A.8 B.16 C.32 D.15
38、算法的空间复杂度是指(D)A.算法程序的长度 B.算法程序中的指令条数 C.算法程序所占的存储空间 D.算法执行过程中所需要的存储空间
39、设有下列二叉树：图见书P46 对此二叉树中序遍历的结果为(B)A.ABCDEF B.DBEAFC C.ABDECF D.DEBFCA
点击咨询 