浙江省2006年春二级VB考试试卷及答案
全国计算机二级《VB》练习题及答案
全国计算机二级《VB》练习题及答案全国计算机二级《VB》练习题及答案9月计算机等级考试将于9月23日-26日举行，目前处于紧张的备考阶段，以下是店铺搜索整理的一份全国计算机二级《VB》练习题及答案，供参考练习，预祝考生们考出自己理想的成绩!想了解更多相关信息请持续关注我们店铺!1.双击窗体中的对象后，VB将显示的窗口是(C)(单)A.工具箱B.项目(工程)窗口C.代码窗口D.属性窗口2.下述选项中，VB的程序设计方法是(B)(单)A.面向对象、顺序驱动B.面向对象、事件驱动C.面向过程、事件驱动D.面向过程、顺序驱动3.在VB中，要将一个窗体装载到内存进行变量初始化等预处理，但没有显示该窗体，应使用的方法或语句是(C)(单)A.ShowB.UnloadC.LoadD.Hide4.文本框的默认属性是(B)(单)A.CaptionB.TextD.Top5.标签默认属性是(A)(单)A.CaptionD.Top6.执行以下程序段：a$="abbacddcba"For I=6 To 2 Step -2X=Mid(a,I,I)Y=Left(a,I)z=Right(a,I)z=Ucase(X&Y&z)Next IPrint z输出结果为(B)(单)A.ABAB.BBABBAC.ABBABAD.AABAAB7.在窗体上画一个名称为Command1的命令按钮，然后编写如下程序：Option Base 1Private Sub Command1_Click( )Dim a As Varianta=Array(1,2,3,4,5)Sum=0For I=1 To 5Sum = sum+a(I)Next Ix=Sum/5For I =1 To 5If a(I)>x Then Print a(I);End Sub程序运行后，单击命令按钮，在窗体上显示的内容是(D)(单)A.1 2B.1 2 3C.3 4 5D.4 58.假定一个工程由一个窗体文件Form1和两个标准模块文件Model1及Model2组成。
2006年浙江省二级vb试卷
计算机等级考试试卷(二级Visual Basic)试题1（每小题3分，共15分）阅读下列程序说明和程序，在每小题提供的若干可选答案中，挑选一个正确答案。
【程序说明】界面设计如上图所示，程序运行时要求有以下功能：•按Command1（出题）后随机生成两个两位正整数存入模块级变量a、b且a>b，并分别在Label1、Label2中显示，此后Command1不可用；•在Text1中输入结果、按回车后，以消息框显示运算正确与否、累计所完成题数以及做错的题数，Command1恢复为可用；•按Command2（退出）后以消息框显示所完成题数以及做错的题数，退出。
【程序】Dim n As Integer, n_error As Integer（1）Private Sub Command1_Click()a = 10 + Rnd * 89:b = 10 + Rnd * 89If a < b Then （2）Label1.Caption = a: Label2.Caption = bn = n + 1: Text1.Text = "": Command1.Enabled = FalseEnd SubPrivate Sub Text1_ (3) (KeyAscii As Integer)If KeyAscii <> 13 Then (4) ' 回车键的ASCII码值为13 If a - b = Val(Text1.Text) ThenMsgBox ("回答正确")ElseMsgBox("回答不正确")n_error = n_error + 1End IfCommand1.Enabled = TrueEnd SubPrivate Sub Command2_Click()MsgBox( (5) )End End Sub 【供选择的答案】(1) A 、'小学生两位数减法训练程序 B 、a=0: b=0: c=0C 、n=0: n_error=0D 、Dim a As Byte, b As Byte, c As Byte (2) A 、b=a: a=bB 、c=a: a=b: b=cC 、a=b: b=aD 、c=a: b=a: a=c (3) A 、KeyPress B 、ChangeC 、KeyDownD 、KeyUp (4) A 、Exit SubB 、KeyAscii =13C 、KeyAscii=0D 、Exit Do(5) A 、"共" & n & "题，错" & n_error & "题"B 、"共n 题，错 n_error 题"C 、"共" + n + "题，错" + n_error + "题"D 、共 & n & "题，错" & n_error & "题"试题2（每小题3分，共12分）阅读下列程序说明和程序，在每小题提供的若干可选答案中，挑选一个正确答案。
2006年3月全国计算机等级考试二级VB语言笔试试题及答案
2006年3月全国计算机等级考试二级VB语言笔试试题及答案无忧考网为大家收集整理了《2006年3月全国计算机等级考试二级VB语言笔试试题及答案》供大家参考，希望对大家有所帮助！！！(1)下列选项中不符合良好程序设计风格的是（）。
A．源程序要文档化B．数据说明的次序要规范化C．避免滥用 goto 语句D．模块设计要保证高耦合、高内聚 (2)从工程管理角度，软件设计一般分为两步完成，它们是（）。
A．概要设计与详细设计B．数据设计与接口设计C．软件结构设计与数据设计D．过程设计与数据设计 (3)下列选项中不属于软件生命周期开发阶段任务的是（）。
A．软件测试B．概要设计C．软件维护D．详细设计 (4)在数据库系统中，用户所见的数据模式为（）。
A．概念模式B．外模式C．内模式D．物理模式 (5)数据库设计的四个阶段是：需求分析、概念设计、逻辑设计和（）。
A．编码设计B．测试阶段C．运行阶段D．物理设计 (6)设有如下三个关系表：下列操作中正确的是（）。
(7)下列叙述中正确的是（）。
A．一个算法的空间复杂度大，则其空间复杂度也必定大B．一个算法的空间复杂度大，则其时间复杂度必定小C．一个算法的时间复杂度大，则其空间复杂度必定小D．上述三种说法都不对 (8)在长度为 64 的有序线性表中进行顺序查找，最坏情况下需要比较的次数为（）。
A．63 B．64 C．6 D．7 (9)数据库技术的根本目标是要解决数据的（）。
A．存储问题B．共享问题C．安全问题D．保护问题 (10)对下列二叉树：进行中序遍历的结果是（）。
A．ACBDFEG B．ACBDFGE C．ABDCGEF D．FCADBEG (11)以下叙述中正确的是（）。
A．窗体的 Name 属性指定窗体的名称，用来标识一个窗体B．窗体的 Name 属性值是显示在窗体标题栏中文本C．可以在运行期间改变窗体的 Name 属性的值D．窗体的 Name 属性值可以为空 (12)以下叙述中错误的是（）。
2006年4月全国计算机等级考试二级Visual Basic(含答案)
2006年4月全国计算机等级考试二级笔试试卷VB语言程序设计含答案一、选择题(每小题2分，共70分)下列各题A)、B)、C)、D)四个选项中，只有一个选项是正确的。
请将正确选项填涂在答题卡相应位置上，答在试卷上不得分。
(1)下列选项中不属于结构化程序设计方法的是。
A) 自顶向下B) 逐步求精C) 模块化D) 可复用(2)两个或两个以上模块之间关联的紧密程度称为。
A) 耦合度B) 内聚度C) 复杂度D) 数据传输特性(3)下列叙述中正确的是。
A) 软件测试应该由程序开发者来完成B) 程序经调试后一般不需要再测试C) 软件维护只包括对程序代码的维护D) 以上三种说法都不对(4)按照“后进先出”原则组织数据的数据结构是。
A) 队列B) 栈C) 双向链表D) 二叉树(5)下列叙述中正确的是。
A) 线性链表是线性表的链式存储结构B) 栈与队列是非线性结构C) 双向链表是非线性结构D) 只有根结点的二叉树是线性结构(6)对如下二叉树ABDECF进行后序遍历的结果为。
A) ABCDEFB) DBEAFCC) ABDECFD) DEBFCA(7)在深度为7的满二叉树中，叶子结点的个数为。
A) 32B) 31C) 64 D) 63(8)“商品”与“顾客”两个实体集之间的联系一般是。
A) 一对一B) 一对多C) 多对一D) 多对多(9)在E-R图中，用来表示实体的图形是。
A) 矩形B) 椭圆形C) 菱形D) 三角形(10)数据库DB、数据库系统DBS、数据库管理系统DBMS之间的关系是。
A) DB包含DBS和DBMSB) DBMS包含DB和DBSC) DBS包含DB和DBMS D) 没有任何关系(11)以下关于Visual Basic特点的叙述中，错误的是。
A) Visual Basic是采用事件驱动编程机制的语言B) Visual Basic程序既可以编译运行，也可以解释运行C) 构成Visual Basic程序的多个过程没有固定的执行顺序D) Visual Basic程序不是结构化程序，不具备结构化程序的三种基本结构(12)以下叙述中，错误的是。
全国计算机二级VB模拟试题及答案
全国计算机二级VB模拟试题及答案全国计算机二级VB模拟试题及答案计算机二级考试是全国计算机等级考试（National Computer Rank Examination，简称NCRE）四个等级中的一个等级，考核计算机基础知识和使用一种高级计算机语言编写程序以及上机调试的基本技能。
那么全国计算机二级VB考试怎么考？以下仅供参考！1.在待排序的元素序列基本有序的前提下，效率最高的排序方法是(C)A)冒泡排序B)选择排序C)快速排序D)归并排序2.非空的循环单链表head的尾结点(由p所指向)，满足(A)A)p->next==NULLB)p==NULLC)p->next=headD)p=head3.线性表的顺序存储结构和线性表的链式存储结构分别是(C)A)顺序存取的存储结构、顺序存取的存储结构B)随机存取的存储结构、顺序存取的存储结构C)随机存取的存储结构、随机存取的存储结构D)任意存取的存储结构、任意存取的存储结构4.结构化程序设计所规定的三种基本控制结构是(D)A)输入、处理、输出B)树形、网形、环形C)顺序、选择、循环D)主程序、子程序、函数5.下列不属于软件调试技术的是(D)A)强行排错法B)集成测试法C)回溯法D)原因排除法6.软件生命周期中花费时间最多的阶段是(B)A)详细设计B)软件编码C)软件测试D)软件维护7.软件设计中，有利于提高模块独立性的一个准则是(A)A)低内聚低耦合B)低内聚高耦合C)高内聚低耦合D)高内聚高耦合8.数据库的故障恢复一般是由(D)A)数据流图完成的B)数据字典完成的C)DBA完成的D)PAD图完成的9.下列关系运算的叙述中，正确的是(B)A)投影、选择、连接是从二维表行的方向进行的运算B)并、交、差是从二维表的列的方向来进行运算C)投影、选择、连接是从二维表列的方向进行的运算D)以上3种说法都不对10.在关系数据库中，对一个关系做投影操作后，新关系的元组个数将(A)A)等于原来关系中的'元组个数B)大于原来关系中的元组个数C)小于原来关系中的元组个数D)不能确定元组个数11.以下不具有Picture属性的对象是(B)A)窗体B)图片框C)图像框D)文本框12.双击窗体中的对象后，Visual Basic将显示的窗口是(D)A)项目(工程)窗口B)工具箱C)代码窗口D)属性窗口13.若要将窗体从内存中卸载，其实现的方法是(A)A)ShowB)UnLoadC)LoadD)Hide14.要使目录列表框(名称为Dirl)中的目录随着驱动器列表框(名称为Drivel)中所选择的当前驱动器的不同而同时发生变化，则应：(A)A)在Dirl中的Change事件中，书写语句 Dirl.Drive=Drivel.DriveB)在Dirl中的Change事件中，书写语句 Dirl.Path=Drivel.DriveC)在Drivel中的Change事件中，书写语句Dirl.Path=Drivel.DriveD)在Drivel中的Change事件中，书写语句Dirl.Drive=Drivel.Drive15.设有如下声明：Dim x As Integer如果Sgn(x)的值为-1，则表示x的值是(A)A)整数B)大于0的整数C)等于0的整数D)小于0的数16.下述说法不正确的是(B)A)变量名的长度不能超过255个字符B)变量名可以包含小数点或者内嵌的类型声明字符C)变量名不能使用关键字D)变量名的第一个字符必须是字母17.下列可作为Visual Basic变量名的是(A)A)FilenameB)A(A+B)C)A%DD)Print18.语句Print Sgn(-6^2)+Abs(-6^2)+Int(-6^2)的输出结果是(BD)A)-36B)1C)-1D)-7219.下面说法中，不正确的是(D)A)Cls清除由Print方法显示的文本或在图片框中显示的图形，并把光标移到对象的左上角(0,0)B)当前窗体是用Picture属性装入的图形时，也可以用Cls方法清除C)Move方法用来移动窗体和控件，并改变其大小D)Cls方法中的对象，可以是窗体或图片框，如果省略则清除当前窗体中显示的内容20.假定在图片框Picturel中装入了一个图形，为了清除该图形(注意，清除图形，而不是删除图片框)，应采用的正确方法是(D)A)选择图片框，然后按Del键B)执行语句 Picturel.picture=LoadPicture("")C)执行语句 Picturel.picture=""D)选择图片框，在属性窗口中选择Picture属性条，然后按回车键21.线性表L=(a1,a2,a3,…ai,…an)，下列说法正确的是(D)A)每个元素都有一个直接前件和直接后件B)线性表中至少要有一个元素C)表中诸元素的排列顺序必须是由小到大或由大到小D)除第一个元素和最后一个元素外，其余每个元素都有一个且只有一个直接前件和直接后件22.设树T的度为4，其中度为1,2，3,4的结点个数分别为4,2，1,1。
二级VB练习题及答案
二级VB练习题及答案第一章Visual Basic程序开发环境习题1.与传统的程序设计语言相比，Visual Basic最突出的特点是：A.结构化程序设计B.程序开发环境C.事件驱动编程机制D.程序调试技术答案：C2.在正确安装Visual Basic 6.0后，可以通过多种方式启动Visual Basic，以下方式中，不能启动VB的是：A.通过“开始”菜单中的“程序”命令B.通过“我的电脑”找到VB6.0.EXE,双击该文件名C.通过开始菜单中的“运行”命令D.进入DOS方式，执行VB6.0.EXE文件答案：D3.为了用键盘打开菜单和执行菜单命令，第一步应按的键是：A.功能键F10或ALTB.SHIFT+功能键F4C.CTRL和功能键F8D.CTRL+ALT答案：A4.Visual Basic 集成环境中的主窗口中不包括：A.标题栏B.菜单栏C.状态栏D.工具栏答案：C5.用标准工具栏中的工具按钮不能执行的操作是：A.添加工程B.打印源程序C.运行程序D.打开工程答案：B6.Visual Basic窗体设计器的主要功能是：A.建立用户界面B.编写源程序代码C.画图D.显示文字答案：A7.Visaul Basic 6.0分为3种版本：、、。
答案：学习版、企业版、专业版8.可以通过菜单中命令退出Visaul Basic。
答案：文件、退出9.退出Visual Basic的快捷键。
答案：ALT+Q10.快捷键CTRL+O的功能相当于菜单命令。
或者相当于工具栏上的按钮。
答案：文件、打开工程11.如果打开了不需要的菜单或对话框，可以用键退出。
答案：ESC12.工程文化的扩展名是,窗体文件的扩展名是。
答案：.vbp、.frm13.Visual Basic中的工具栏有两种形式，分别为形式和形式答案：固定、浮动第二章对象及其操作习题1.下列可以激活属性窗口的操作是（）A.用鼠标双击窗体的任何部位。
B.执行“工程”菜单中的“属性窗口”命令。
(完整版)浙江省计算机等级考试二级VB上机练习题
计算机等级考试上机练习题一、程序设计题浙江省计算机等级考试（二级VB）上机测试的程序设计题，从2002年秋季开始，其题型及考试要求都有较大变化。
要求考生在老考生目录中，按照题目要求，自己新建一工程文件Design.Vbp，按题目要求完成界面设计和编写相应事件代码。
程序设计题的操作步骤如下：1．考生在单击“回答”按钮后，便可启动Visual Basic6.0系统，同时运行考生目录中的Design.exe文件，以便考生设计时随时同程序设计要求最终效果比较。
2．程序界面设计，要求考生设置窗体指定的一些属性，在窗体添加控件，并设置控件的某些属性。
3．编写程序代码，根据题目的要求，在代码窗口中编写相应事件的程序代码，调试运行程序使其程序的运行效果与运行Design.exe的效果相同。
4．将工程以文件名“Design.Vbp”，窗体以文件名“Design.Frm”保存在考生文件夹中。
下面是计算机等级考试（二级Visual Basic程序设计）上机测试的程序设计样题。
如果学生要上机做这些试题，由于你的计算机中没有Design.EXE文件，你可自己启动Visual Basic6.0系统，新建一标准EXE工程，按题目的要求设计界面、添加所需控件并设置相关属性，编写相应事件代码，使其程序运行结果能实现题目的要求。
（二）程序设计题1．请参考Design.exe程序的运行结果，新建一个工程，完成“添加与删除”程序的设计。
将工程文件以Design.Vbp、窗体文件以Design.frm保存到考试目录下，具体要求如下：（1）窗体的标题为“添加与删除”，固定边框。
（2）在窗体中引入一个文本框Text1，再在文本框的下面引入一个列表框List1，列表框内容中有四项，分别为“Word、Excel、PowerPoint、Outlook”。
（3）单击“添加”按钮（Command1），将文本框中的内容加到列表框中的第一题，如果文第二部分上机测试练习题171本框中没有内容，则给出提示“没有内容，不予添加”。
计算机二级VB练习题附答案
计算机二级VB练习题附答案计算机二级VB练习题附答案计算机二级考试是全国计算机等级考试（National Computer Rank Examination，简称NCRE）四个等级中的一个等级，考核计算机基础知识和使用一种高级计算机语言编写程序以及上机调试的基本技能。
那么计算机二级vb考试会怎么考？以下仅供参考！【计算机二级VB练习题一】1、为了在运行时能显示窗体左上角的控制框(系统菜单)，可以设置以下哪个属性的值为True( )。
A.Contr01BoxB.MinButtonC.MaxButtonD.BorderStyle参考答案：A参考解析：本题考查窗体的常见属性。
窗体中ControlBox属性用来控制是否显示控制菜单，属性值为False时不显示控制菜单。
属性MinButton和MaxButton控制是否显示最大化和最小化按钮，属性BorderStyle则是设置窗体的边界样式。
2、组合框是文本框和( )特性的组合。
A.复选框B.标签C.列表框D.目录列表框参考答案：C参考解析：本题考查组合框。
组合框控件(ComboBox)是将文本框和列表框的功能结合在一起，用户可以在列表中选择某项(注：只能选取一项)，或在编辑区域中直接输入文本内容来选定项目。
3、Visual Basic根据计算机访问文件的方式将文件分成3类，其中不包括( )。
A.顺序文件B.Unix文件C.二进制文件D.随机文件参考答案：B参考解析：本题考查VB文件的分类。
VB中根据文件的访问形式分为顺序文件、随机文件和二进制文件。
4、下列模式中，能够给出数据库物理存储结构与物理存取方法的是( )。
A.内模式B.外模式C.概念模式D.逻辑模式参考答案：A参考解析：数据库管理系统的三级模式结构由外模式、模式和内模式组成。
外模式，或予模式，或用户模式，是指数据库用户所看到的数据结构，是用户看到的数据视图。
模式，或逻辑模式，是数据库中对全体数据的逻辑结构和特性的描述，是所有用户所见到的数据视图的总和。
浙江省二级考试VB试题汇总
省二级考试VB试题汇总（200６年6月）前言:本辅导资料主要在于介绍省二级考试的基本题型和基本考点,所以建议大家在第一遍看本资料时,应认真做好每一题，在遇到不会或不懂的题时，立即到课本中找本题相关的知识点并弄懂这些知识点,然后再来分析此题，以达到对考点各各击破的目的，如此下去便可掌握省二级考试的几乎所有考点，从而可以应付千变万化的考题了.本资料内的考题只是考试题库中的一小部分而已，切不可只做出本资料内各题的答案，而没掌握其考点知识，这将会导致后悔莫及的后果.此外,建议大家在掌握考试题型和考点后,应上机实际操作,尤其对于能力测试题更应已上机练习为主,掌握做题步骤和基本技巧，方可取得理想的成绩.最后预祝大家在省二级考试中取得优异的成绩!第一部分知识测试题一、选择题(每套试卷有20个选择题，每题１分）1 以下４种描述中，错误的是＿__＿＿＿_． DA. 常量在程序执行期间其值不会发生改变Ｂ。
根据数据类型不同，常量可分为字符型常量、数值常量、日期/时间型常量和布尔型常量C。
符号常量是用一个标识符来代表一个常数，好象是为常数取一个名字，但仍保持常数的性质D。
符号常量的使用和变量的使用没有差别２下面合法的常量是____＿__. DA. 1/2B. ＇abcd’ C。
1.2*5 D。
Ｆalse3Viｓｕal Basｉｃ中可以用类型说明符来标识变量的Ｃ类型,其中表示货币型的是_＿＿____。
dA。
% Ｂ。
# Ｃ。
＠D。
＄４以下关键字中，不能定义变量的是__＿＿＿_＿。
AＡ。
Dｅclａre B. DiｍC。
Puｂlic Ｄ. Ｐrivate5用十六进制表示Visual Basic的整型常数时,前面要加上的符号是__＿____. A A）＆H B）＆O C) ＨD) O6 Visｕal Baｓic日期常量的定界符是_＿_＿__＿. ＡA。
#＃ B.‘’ Ｃ. （) D。
{｝７数学关系３≤ｘ<10表示成正确的ＶB表达式为＿_＿＿___。
VB考试试题及答案分解
卷1一、填空题1、VB程序设计的主要特点是可视化设计和事件编程。
2、在VB中，最主要的两种对象是窗体（form）和控件。
3、工程是构成应用程序文件的集合。
4、方法是VB提供的一种特殊子程序，用来完成一定的操作。
5、浮点类型数据包括单精度型和___双精度__数据。
6、事件是窗体或控件对象识别的__动作____。
7、可用窗体的__print_ 方法在窗体中显示文字。
8、复选框控件Value属性指示复选框处于____选中___或禁止状态(暗淡的)中的某一种。
9、在VB中，修改窗体的高度（height）和宽度（width）属性值，可改变窗体的大小。
10、双击工具箱中的控件图标，可在窗体的中央出现一个尺寸为缺省值的控件。
11、在MsgBox函数中，如果缺省title参数，则使用工程1 作为消息框的标题。
12、设x＝34.58，语句Print Format(x,“000.0”)的输出结果是34.6 。
13、在VB 中，数值型变量的初值为0 ，Varant型变量的初值为空，布尔型变量的初值为FALSE 。
14、设置窗体的picture 属性，可在窗体上显示图片。
15、程序运行工程中，清除MP图片框中的图片应使用语句cls 。
二、选择题1、菜单控件只包括一个事件，即 C ，当用鼠标单击或键盘选中后按“回车”键时触发该事件，除分隔条以外的所有菜单控件都能识别该事件。
A、GotFocusB、LoadC、Click D、KeyDown2、滚动条控件(如图所示)的Max属性所设置的是 A 。
A、滚动框处于最右位置时，一个滚动条位置的Value属性最大设置值B、单击滚动条和滚动箭头之间的区域时，滚动条中滚动块的最大移动量C、单击滚动条的箭头区域时，滚动条中滚动块的最大移动量D、滚动条控件无该属性3、SQL 语句Select * Form student 中的*表示 B 。
A、所有记录B、所有字段C、所有表D、都不对4、以下选项中，不属于标签的属性是 C 。
全国02年9月04年9月06年春季二级VB笔试试题及答案
02年9月二级VB语言笔试试题及答案一、选择题(每题2分，共70分)下列各题A) 、B) 、C) 、D) 四个选项中，只有一个选项是正确的，请将正确选项涂写在答题卡相应位置上，答在试卷上不得分。
(1) 在设计阶段，当双击窗体上的某个控件时，所打开的窗口是A) 工程资源管理器窗口B) 工具箱窗口C) 代码窗口D) 属性窗口(2) 以下叙述中正确的是A) 窗体的Name属性指定窗体的名称，用来标识一个窗体B) 窗体的Name属性的值是显示在窗体标题栏中的文本C) 可以在运行期间改变对象的Name属性的值D) 对象的Name属性值可以为空(3) 刚建立一个新的标准EXE工程后，不在工具箱中出现的控件是A) 单选按钮B) 图片框C) 通用对话框D) 文本框(4) 设有如下变量声明Dim TestDate As Date为变量TestDate正确赋值的表达方式是A) TextDate=#1/1/2002# B) TestDate=#“1/1/2002”#C) TextDate=date(“1/1/2002”) D) TestDate=Format(“m/d/yy”,“1/1/2002”)(5) 设有如下声明：Dim X As Integer如果Sgn(X) 的值为-1，则X的值是A) 整数B) 大于0的整数C) 等于0的整数D) 小于0的数(6) 在窗体上画一个名称为Commandl的命令按钮，然后编写如下程序：Private Sub Command1_Click()Static X As IntegerStatic Y As IntegerClsY=1Y=Y+5X=5+XPrint X,YEnd Sub程序运行时，三次单击命令按钮Commandl后，窗体上显示的结果为A) 15 16 B) 15 6 C) 15 15 D) 5 6(7) 设a=3,b=5，则以下表达式值为真的是A) a>=b And b>10 B) (a>b)Or(b>0)C) (a<0)Eqv(b>0) D) (-3+5>a)And(b>0)(8) 设有语句x=InputBox(“输入数值”，“0”，“示例”)程序运行后，如果从键盘上输入数值10并按回车键，则下列叙述中正确的是A) 变量X的值是数值10 B) 在InputBox对话框标题栏中显示的是“示例”C) 0是默认值D) 变量X的值是字符串“10”(9) 从键盘上输入两个字符串，分别保存在变量str1、str2中。
浙江省计算机二级VB上机考试设计题及答案
B．程序设计题程序设计011、在窗体上放置一个命令按钮，命名为CmdMaxSize.2、取消窗体（Form）的最大化和最小化按钮3、当单击CmdMaxSize按钮时，实现窗口放大功能，放大后再单击该按钮则还原窗口。
4、同时可能使用热键Alt+L和Alt+B实现窗口放大或还原。
5、当窗体大小改变后，总是让CmdMaxSize按钮位于窗口的中央。
6、界面及功能设计请参考cx01.exe文件。
程序设计021、窗体上有三个文体框，上面两个分别用于输入商品单价和商品数量，单击“计算”，将应付款显示在下面一个文本框中。
2、最下面一个文本框不能直接输入。
3、单击“清空”按钮，三个文本框内容被清空，同时第一个文本框获得焦点。
4、界面及功能设计请参考cx02.exe文件。
程序设计031、按照Cx.exe所示在窗体上放置按钮和控件。
2、当单击“确定”按钮后，首先比较“用户名”和“原始密码”是否一致，若一致且都为“admin”，则继续执行步骤4；否则弹出消息框，提示用户出错，并让用户重新输入。
3、比较“新密码（N）”和“新密码（S）”，若两者一致，弹出密码修改成功消息框，程序终止执行。
否则弹出错误消息，并让用户重新输入。
4、所有消息框按Cx.exe所示设计。
5、当单击“取消”按钮时，程序终止执行。
6、当按“Tab”键时，保证按照“用户名”、“原密码”、“新密码（N）”、“新密码（S）”、“确定”按钮和“取消”按钮顺序访问各控件。
7、界面及功能设计请参考cx03.exe文件。
程序设计041、在窗体上放置4个单选按钮，分别用于显示星期、年份、月份和日期。
2、在窗台上放置一个文本框，选中单选按钮时，显示相应的信息。
3、在窗体上放置一个命令按钮，单击按钮时退出应用程序。
4、界面及功能设计请参考cx04.exe 文件。
程序设计051、单击“坐标系”按钮，将图片框的坐标系统设置为原点在中央，x轴[-10,10]，y 轴[-10,10]，并画出该坐标系统；2、单击“扇形”按钮,在图片框中画一个圆心在原点，半径为5,圆周为红色，线宽为2，内部为绿色，起始角为π/6，终止角为5π/6的扇形；3、界面及功能设计请参考cx05.exe文件。
计算机二级VB考试题及答案
计算机二级VB考试题及答案计算机二级VB考试题及答案「篇一」1.以下程序段运行的结果为(B)(单)Private Sub Form_ClickMyDate = #7/21/1997#Print Format(MyDate, "m/d/yy")Print Format(MyDate,"yyyy年m月dd日")End SubA.7/21/97 1997年7月21日B.7-21-97 1997年7月21日C.97/7/21 1997年7月21日D.7/21/97 97年7月21日2.以下程序段运行的结果为(B)(单)Private Sub Form_ClickMyTime = #9:21:30 PM#MyDate = #7/21/1997#Print Tab(2); Format(MyDate, "mmmm-yy")Print Tab(2); Format(MyTime, "hh:mm:ss A/P")End SubA.July-97 9:21:30 PB.July-97 09:21:30 PC.07-97 9:21:30 PD.July-97 9:21:303.以下程序段运行的结果为(C)(单)Private Sub Form_ClickMyDate = #7/21/1997#Print Format(MyDate, "dddd,mmmm,dd,yyyy")End SubA.21,07,1997B.21,07,21,1997C.Monday,July,21,1997D.Monday,07,21,19974.在窗体中建立一个文本框text1和一个命令按钮command1，编写下面程序：Private Sub Text1_LostFocusIf Not IsNumeric(Text1) ThenMsgBox "帐号有非数字字符错误"Text1.Text = ""Text1.SetFocuselseMsgBox "帐号正确"End IfEnd Sub当在text1文本框中输入字符"abc"之后，单击命令按钮，结果为(B)(单)A.显示对话框，提示信息为"帐号正确"B.显示对话框，提示信息为"帐号有非数字字符错误"C.程序出错D.没有任何提示5.在窗体中建立一个文本框text1和一个命令按钮command1，编写下面程序：Private Sub Text1_LostFocusIf Not IsNumeric(Text1) ThenMsgBox "帐号有非数字字符错误"Text1.Text = ""Text1.SetFocuselseMsgBox "帐号正确"End IfEnd Sub当在text1文本框中输入数字123456之后，单击命令按钮，结果为(A)(单)A.显示对话框，提示信息为"帐号正确"B.显示对话框，提示信息为"帐号有非数字字符错误"C.程序出错D.没有任何提示6.在窗体中建立一个文本框text1和一个命令按钮command1，编写下面程序：Private Sub Command1_ClickDim I As IntegerIf Text1.Text <> "Gong" ThenI = MsgBox("密码错误", 5 + vbExclamation, "输入密码")If I <> 4 ThenEndElseText1.Text = ""Text1.SetFocusEnd IfElseMsgBox "密码帐号正确!"End IfEnd Sub若在text1中输入字符串"Gong"，则程序运行结果为(A)(单)A.显示对话框，提示"密码帐号正确!"B.显示对话框，提示"密码错误"C.程序出错D.没有任何提示7.在窗体中建立一个文本框text1和一个命令按钮command1，编写下面程序：Private Sub Command1_ClickDim I As IntegerIf Text1.Text <> "Gong" ThenI = MsgBox("密码错误", 5 + vbExclamation, "输入密码")If I <>4 ThenEndElseText1.Text = ""Text1.SetFocusEnd IfElseMsgBox "密码帐号正确!"End IfEnd Sub若在text1中输入字符串"gong"，则程序运行结果为(B)(单)A.显示对话框，提示"密码帐号正确!"B.显示对话框，提示"密码错误"C.程序出错D.没有任何提示8.在窗体中建立一个文本框text1和一个命令按钮command1，编写下面程序：Private Sub Command1_ClickDim I As IntegerIf Text1.Text <> "Gong" ThenI = MsgBox("密码错误", VbRetryCancle + vbExclamation, "输入密码")If I <> 4 ThenEndElseText1.Text = ""Text1.SetFocusEnd IfMsgBox "密码帐号正确!"End IfEnd Sub若在text1中输入字符串"123"，显示"密码错误"对话框，关于此对话框描述正确的是(A)(单)A.显示对话框中有“重试”按钮B.显示对话框中有“确定”按钮C.显示对话框中有“是”按钮D.以上说法都不正确9.在窗体中建立三个文本框，名称分别为text1、text2和text3，还有一个名称为label1的标签，一个名称为command1的命令按钮，编写如下代码：Private Sub Command1_ClickDim x, y, z, t!x = Text1y = Text2z = Text3If x < y Thent = xx = yy = tEnd IfIf y < z Thent = yz = tIf x< y Thent = xx = yy = tEnd IfEnd IfLabel1.Caption = x & "," & y & "," & zEnd Sub当在文本框text1、text2 和 text3 中分别输入5、3和8，则标签显示的结果为(C)(单)A.3,5,8B.5,3,8C.8,5,3D.3.8.510.以下程序段：Private Sub Form_LoadDim Nop As Integer, Op As String * 1Num1 = 3Num2 = 2Nop = val(Inputbox("请输入1-4之间的整数"))Select Case NopCase 1Op = "+"Result = Num1 + Num2Case 2Op = "-"Result = Num1 - Num2Case 3Op = "×"Result = Num1 * Num2Case 4Op = "÷"Result = Num1 / Num2End SelectLabel1= Num1 & Op & Num2 & "=" & ResultEnd Sub窗体运行后，输入1，则label1的标题显示结果为(A)(单)A.3+2=5B.3-2=1C.3×2=6D.3÷2=1.511.以下程序段：Private Sub Form_LoadDim Nop As Integer, Op As String * 1Num1 = 3Num2 = 2Nop = val(Inputbox("请输入1-4之间的整数"))Select Case NopCase 1Op = "+"Result = Num1 + Num2Case 2Op = "-"Result = Num1 - Num2Case 3Op = "×"Result = Num1 * Num2Case 4Op = "÷"Result = Num1 / Num2End SelectLabel1= Num1 & Op & Num2 & "=" & ResultEnd Sub窗体运行后，输入2，则label1的标题显示结果为(B)(单)A.3+2=5B.3-2=1C.3×2=6D.3÷2=1.512.以下程序段：Private Sub Form_LoadDim Nop As Integer, Op As String * 1Num1 = 3Num2 = 2Nop = val(Inputbox("请输入1-4之间的'整数"))Select Case NopCase 1Op = "+"Result = Num1 + Num2Case 2Op = "-"Result = Num1 - Num2Case 3Op = "×"Result = Num1 * Num2Case 4Op = "÷"Result = Num1 / Num2End SelectLabel1= Num1 & Op & Num2 & "=" & ResultEnd Sub窗体运行后，输入3，则label1的标题显示结果为(C)(单) A.3+2=5B.3-2=1C.3×2=6D.3÷2=1.513.以下程序段：Private Sub Form_LoadDim Nop As Integer, Op As String * 1Num1 = 3Num2 = 2Nop = val(Inputbox("请输入1-4之间的整数")) Select Case NopCase 1Op = "+"Result = Num1 + Num2Case 2Op = "-"Result = Num1 - Num2Case 3Op = "×"Result = Num1 * Num2Case 4Op = "÷"Result = Num1 / Num2End SelectLabel1= Num1 & Op & Num2 & "=" & ResultEnd Sub窗体运行后，输入4，则label1的标题显示结果为(D)(单)A.3+2=5B.3-2=1C.3×2=6D.3÷2=1.514.以下程序段的作用是(A)(单)Private Sub Picture1_ClickDim asci As Integer, i As Integeri = 0For asci = 32 To 126Picture1.Print Tab(7 * i + 2); Chr(asci); "="; asci;i = i + 1If i = 7 Then i = 0: Picture1.PrintNext asciA.打印ASCII码表，一行7个表达式B.打印九九乘法表，一行7个表达式C.打印ASCII码表，一行8个表达式D.以上说法都不正确15.我国现在人口有13亿，按人口增长0.8%计算，多少年后我国人口将超过26亿。
浙江省二级考试VB试题汇总
省二级考试VB试题汇总（2006年6月）前言：本辅导资料主要在于介绍省二级考试的基本题型和基本考点，所以建议大家在第一遍看本资料时，应认真做好每一题，在遇到不会或不懂的题时，立即到课本中找本题相关的知识点并弄懂这些知识点，然后再来分析此题，以达到对考点各各击破的目的，如此下去便可掌握省二级考试的几乎所有考点，从而可以应付千变万化的考题了。
本资料内的考题只是考试题库中的一小部分而已，切不可只做出本资料内各题的答案，而没掌握其考点知识，这将会导致后悔莫及的后果。
此外，建议大家在掌握考试题型和考点后，应上机实际操作，尤其对于能力测试题更应已上机练习为主，掌握做题步骤和基本技巧，方可取得理想的成绩。
最后预祝大家在省二级考试中取得优异的成绩！第一部分知识测试题一、选择题（每套试卷有20个选择题，每题1分）1 以下4种描述中，错误的是_______。
DA. 常量在程序执行期间其值不会发生改变B. 根据数据类型不同，常量可分为字符型常量、数值常量、日期/时间型常量和布尔型常量C. 符号常量是用一个标识符来代表一个常数，好象是为常数取一个名字，但仍保持常数的性质D. 符号常量的使用和变量的使用没有差别2 下面合法的常量是_______。
DA. 1/2B. 'abcd'C. 1.2*5D. False3 Visual Basic中可以用类型说明符来标识变量的 C类型，其中表示货币型的是_______。
dA. %B. #C.D. $4 以下关键字中，不能定义变量的是_______。
AA. DeclareB. DimC. PublicD. Private5 用十六进制表示Visual Basic的整型常数时，前面要加上的符号是_______。
AA) &H B) &O C) H D) O6 Visual Basic日期常量的定界符是_______。
AA. ##B.‘’C. ()D. {}7 数学关系3≤x<10表示成正确的VB表达式为_______。
浙江省二级考试VB精彩试题汇总情况
省二级考试VB试题汇总（2006年6月）前言：本辅导资料主要在于介绍省二级考试的基本题型和基本考点，所以建议大家在第一遍看本资料时，应认真做好每一题，在遇到不会或不懂的题时，立即到课本中找本题相关的知识点并弄懂这些知识点，然后再来分析此题，以达到对考点各各击破的目的，如此下去便可掌握省二级考试的几乎所有考点，从而可以应付千变万化的考题了。
本资料内的考题只是考试题库中的一小部分而已，切不可只做出本资料内各题的答案，而没掌握其考点知识，这将会导致后悔莫及的后果。
此外，建议大家在掌握考试题型和考点后，应上机实际操作，尤其对于能力测试题更应已上机练习为主，掌握做题步骤和基本技巧，方可取得理想的成绩。
最后预祝大家在省二级考试中取得优异的成绩！第一部分知识测试题一、选择题（每套试卷有20个选择题，每题1分）1 以下4种描述中，错误的是_______。
DA. 常量在程序执行期间其值不会发生改变B. 根据数据类型不同，常量可分为字符型常量、数值常量、日期/时间型常量和布尔型常量C. 符号常量是用一个标识符来代表一个常数，好象是为常数取一个名字，但仍保持常数的性质D. 符号常量的使用和变量的使用没有差别2 下面合法的常量是_______。
DA. 1/2B. 'abcd'C. 1.2*5D. False3 Visual Basic中可以用类型说明符来标识变量的 C类型，其中表示货币型的是_______。
dA. %B. #C. @D. $4 以下关键字中，不能定义变量的是_______。
AA. DeclareB. DimC. PublicD. Private5 用十六进制表示Visual Basic的整型常数时，前面要加上的符号是_______。
AA) &H B) &O C) H D) O6 Visual Basic日期常量的定界符是_______。
AA. ##B.‘’C. ()D. {}7 数学关系3≤x<10表示成正确的VB表达式为_______。
- 1、下载文档前请自行甄别文档内容的完整性，平台不提供额外的编辑、内容补充、找答案等附加服务。
- 2、"仅部分预览"的文档,不可在线预览部分如存在完整性等问题,可反馈申请退款(可完整预览的文档不适用该条件!)。
- 3、如文档侵犯您的权益，请联系客服反馈,我们会尽快为您处理(人工客服工作时间：9:00-18:30)。
2006年春浙江省高等学校计算机等级考试试卷（二级Visual Basic）说明: (1)考生将所有试题的答案填写在答卷上.其中题1～试题6,请在答卷上各小题正确选项的对应位置处填“√”；（2）请将你的准考证号的后五位填写在答卷右下角的指定位置内；（3）考试时间为90分钟；试题1（每小题3分，共15分）阅读下列程序和程序，在每小题提供的若干可选答案中，挑选一个正确答案。
【程序说明】界面设计如上图所示，程序运行时要求有以下功能：·按Commandl（出题）后随机生成两个两位正整数存入模块级变量a、b且a＞b，并分别在Labell Labe12中显示，此后Commandl不可用；·在Textl中输入结果、按回车后，以消息框显示运算正确与否、累计所完成题数以及做错的题数，Commandl恢复为可用；·按Command2(退出)后以消息框显示所完成题数以及做错的题数，退出。
【程序】Dim n As Integer, n_error As Integer(1)Private Sub Command1_Click()a = 10 + Rnd * 89:b = 10 + Rnd * 89If a < b Then (2)Label1.Caption = a: Label2.Caption = bn = n + 1: Text1.Text = "": Command1.Enabled = FalseEnd SubPrivate Sub Text1_ (3) (keyAscii As Integer)If keyAscii <> 13 Then (4) '回车键的ASCII 码值为13If a - b = Val(Text1.Text) ThenMsgBox ("回答正确")ElseMsgBox ("回答不正确")n_error = n_error + 1End IfCommand1.Enabled = TrueEnd SubPrivate Sub Command2_Click()MsgBox ( (5) )EndEnd Sub【供选择的答案】（1）A、’小学生两位数减法训练程序 B、a=0: b=0 : c=0C、n=0: n_error=0D、Dim a As Byte, b As byte, c As Byte(2) A、b=a: a=b B、c=a: a=b: b=cC、a=b: b=aD、c=a: b=a: a=c(3) A、KeyPress B、Change C、KeyDown D、KeyUp(4) A、Exit Sub B、KeyAscii=13 C、KeyAsecii=0 D、Exit Do(5) A、“共”＆ n ＆“题，错”＆ n_error ＆“题”B、“共n题，错n_error题”C、“共”+ n +“题，错”＋ n_error +“题”D、共＆ n“题，错”＆ n_error ＆“题”试题2（每小题3分，共12分）阅读下列程序说明和程序，在每小题提供的若干可选答案中，挑选一个正确答案。
【程序说明】输入n 后，再输入n 个数a 1,a 2,…，a n ,按照下列公式计算s 的值并显示。
v= s=【程序】 Private Function f( (6) ) As SingleDim i As IntegerFor i = 1 To n: f = f + x(i): Next iEnd FunctionPrivate Sub command1_Click()Dim n As Integer, a() As Single, i As IntegerDim V As Single, s As Singlen = InputBox("输入数据个数")（7）For i = 1 To na(i) = InputBox("a(" & i & ")=", "输入各数组元素")Next iV = f(a, n) / nFor i = 1 To n s = (8)Next i (9)End Sub【供选择的答案】（6）a 1+a 2+…a nn (a 1-v)2+(a 2-v)2+…+(a n -v) nA、x() As Single, n As IntegerB、x(n) As SingleC、a As Single,n As IntegerD、n As Integer,x() As Single（7）A、Dim a(n) As SingleB、ReDim a()C、Dim a (n)D、ReDim a(n) （8）A、(a(i)-v)*(a(i)-v)B、s+a(i)-v^2C、s+(a(i)-v)^2D、(a(i)-v)^2 （9）A、s=s^0.5/nB、Print s^0.5/nC、Print Sqr(s)D、Sqr(s)/n试题3（每小题3分，共15分）阅读下列程序说明和程序，在每小题提供的若干可选答案中，挑选一个正确答案。
【程序说明】·图片框控件P1、P2除Name属性外均取缺省值，将鼠标在P1拖动绘制矩形框（边框颜色通过用对话框指定）：鼠标按下处为矩形左上角，鼠标抬起处为矩形右下角；·鼠标抬起后，将P1中矩形区域内的图象在P2中重新绘制，如下图所示。
【程序】(10)Private Sub p1_MouseDown(Button As Integer, Shift As Integer, _X As Single, Y As Single) xl = X: y1 = YEnd SubPrivate Sub p1_MouseUp(Button As Integer, Shift As Integer, _X As Single, Y As Single)Dim j As Single, i As Single, jk As Single, ik As SingleDim (11)jk = P2.ScaleWidth / (X - xl): ik = P2.ScaleHeight / (Y - y1)CommonDialog1.Action = (12)P1.Line (xl, y1)-(X, Y), CommonDialog1.Color, BFor j = xl To XFor i = y1 To Yc = (13) '读取该点处的颜色值(14)Next i, jEnd Sub【供选择的答案】（10）A、Dim x As Single ,y As Single B、Dim x2 As Single,y2 As SingleC、Public xl As Single ,yl As SingleD、Dim xl As Single,y1 As Single （11）A、c As Long B、c As Integer C、c As Single D、c As Double （12）A、1 B、2 C、3 D、4（13）A、P1.Pset(j,i) B、P2.Pset(j,i) C、P1.Point(j,i) D、P1.Point(i,j) （14） A、P2.PSet ((j-xl)*jk,(i-y1)*ik),cB、P1.Pest((j-xl)*jk,(i-yl)*ik),cC、P2.PSet((i-yl)*ik,(j-xl)*jk),cD、P1.Pset((i-yl)*ik,(j-x1)*jk),c试题4（每小题3分，共9分）阅读下列程序并回答问题，在每小题提供的若干可选答案中，挑选一个正确答案。
【程序】Private Sub Form_Load()Text1.Text = "": List1.ClearEnd SubPrivate Sub Text1_Keypress(K As Integer)Dim n As Integer'If K>=Asc("0")And k<=Asc（"9"）Then K=0If K = 13 ThenList1.AddItem Text1.Text, nn = n + 1Text1.Text = ""End IfEnd Sub(15) 运行时在文本框控件Textl中依次输入3个以回车结束的字符串“abc34”、“xy12＄”、“+-*/”,列表框中各表项依次为：A、abc34B、+-*/ C 、abc D、+-*/xy12$ xy12$ xy$ xy$+-*/ abc34 +-*/ abc(16) 如果将语句Dim n As Integer 用Static n As Integer替换，运行时在文本框中依次输入3个以回车结束的字符串“abc34”、“xy12$”、“+-*/”.列表框中各表项依次为：A、abc34 B、+-*/ C、abc D、+-*/xy12$ xy12$ xy$ xy$+-*/ abc34 +-*/ abc(17) 如果将语名Dim n As Integer 后一条语句前的注释符删除，运行时在文本框中依次输入3个以回车结束的字符串“abc34”、“xy12$”、“+-*/”，列表中各表项依次为：A、abc34 B、+-*/ C、abc D、+-*/xy12$ xy12$ xy$ xy$+-*/ abc34 +-*/ abc试题5（每小题3分，共12分）阅读下列程序并回答问题，在每小题提供的若干可选答案中，挑选一正确答案。
【程序】Private Sub f(s As String)Dim i As Integer, n As Integer, c As Stringn = Len(s)If n Mod 2 = 1 Then c = Mid(s, n \ 2 + 1, 1)For i = 1 To Len(s) \ 2c = Mid(s, Len(s) + 1 - i, 1) + c + Mid(s, i, 1)Next is = cEnd SubPrivate Sub Command1_Click()Dim x As Stringx = InputBox("x=")Call f(x)Print xEnd Sub(18) 单击Commandl后输入“abc”，窗体上显示结果为：A、cbaB、bcaC、abcD、acb(19) 单击Commandl后输入“abcd”，窗体上显示结果为：A、abdcB、cdabC、abcdD、bcad(20) 如果将Sub过程f首句改为Private Sub f(Byval S As String),单击Commandl 后输入“abcd”，窗体上显示结果为：A、abdcB、cdabC、abcdD、bcad(21) 如果将Sub 过程f首句改为Private Sub f (Byref S As String),单击Commandl 后输入“abcd”，窗体上显示结果为：A、abdcB、cdabC、abcdD、bcad试题6（每小题3分，共9分）阅读下列程序并回答问题，在每小题提供的若干可选答案中，挑选一个正确答案。