2012年3月vb真题
12年春VB试题
12年春VB试题2012年春二级VB试卷第一部分程序阅读与填空（24小题，每小题3分，共72分）1．阅读下列程序说明和程序，在每小题提供的若干可选答案中，挑选一个正确答案。
【程序说明】用下列近似公式求自然对数的底数e．累加过程到末项小于10-12为止。
【程序】Private Sub Commandl_Click()Dim __(1)__Dim i As Integere = 2__(2)__While __(3)__t = t / i__(4)__i = i + lWendPrint eEnd Sub【供选择的答案】(1) A、e As Double, t As Double B、e As Single, t As SingleC、e As Double, t As SingleD、e As Single, t As Double(2) A、t=l: i=2 B、t=2: i=l C、t=l: i=l D、t=2: i=2(3) A、t<le-12 B、t>=le-12 C、e>=le-12 D、e<le-12(4) A、e = e+l/t B、e = e+l\t C、e = e+t/i D、a = p + t2．阅读下列程序说明和程序，在每小题提供的若干可选答案中，挑选一个正确答案。
【程序说明】单击Commandl后，生成一个5至100之间的随机整数n，计算下列表达式的值并显示。
【程序】Private Sub Commandl_Click()Dim s As Single, i As Integer, n As Integern = __(5)__s = __(6)__For i= __(7)__s=__(8)__Next iPrint sEnd Sub[供选择的答案:】(5) A、Rnd*10 B、5+Rnd*100 C、5+Rnd*95 D、5*Rnd(95)(6) A、n-l B、1 C、n D、0(7) A、l To n B、n To 1 Step -1 C、n To 1 D、l To n-1(8) A、s+Sqr(i) B、Sqr(s+i) C、i+Sqr(s) D、n+Sqr(s)3．阅读下列程序说明和程序，在每小题提供的若干可选答案中，挑选一个正确答案。
2012年江苏高中信息技术学业水平测试vb操作题带答案
Vb专项练习第一套题目1、打开“考生文件夹\96\工程1.vbp”，完善程序并保存。
实现功能：假设有一个5位数密码。
只记得密码为67□□8，其中百位和十位的数字记不清了，但知道该密码能够被78整除，也能被67整除。
请完善算法帮忙找出这个密码。
''请不要更改源程序的结构，删除原题里的①、②、③。
填写正确的代码，使程序完善Private Sub Command1_Click()Dim x As LongFor x = ① To 67998 Step 10If (x Mod 67 = 0) And (x Mod 78 = 0) ThenPrint ②End If③End Sub2、“考生文件夹\51\工程1.vbp”是采用“穷举法”求出所有水仙花数的程序，请完善程序并保存。
说明：若一个三位数abc，满足：abc=a3+b3+c3，则称abc为水仙花数。
如三位数153满足：13+53+33=1+125+27=153，则153是水仙花数。
'请不要更改源程序的结构，删除原题里的①、②、③。
填写正确的代码，使程序完善Private Sub Command1_Click()Dim i, a, b As IntegerFor i = 100 To ①a = i \ 100b = (i - a * 100) \ 10c = ②If a * a * a + b * b * b + c * c * c = i ThenPrint CStr(i)③Next iEnd Sub3、打开“考生文件夹\12\工程1.vbp”，完善程序并保存。
实现功能：在Text1中输入一个代表秒数的整数后，单击“计算”按钮后，在Label1、Label2、Label3中显示对应的小时、分钟和秒数。
如在Text1中输入“3672”，Label1、Label2、Label3中分别显示“1”、“1”、“12”，即1小时1分12秒。
2012年vb计算机考试试题及答案
2012年vb计算机考试试题及答案第一部分：选择题（共40题，每题2分，总分80分）1. VB是以下哪种类型的编程语言？A. 解释性编程语言B. 面向对象编程语言C. 编译型编程语言D. 结构化编程语言2. 在VB中，以下哪个符号用于表示不等于？A. !=B. <>C. ==D. =3. 下列关于VB的说法中，不正确的是：A. VB可以用于开发Windows应用程序B. VB是Visual Basic的缩写C. VB可以与数据库进行交互D. VB只能运行在Windows操作系统上4. 在VB中，以下哪个选项用于声明整数变量？A. DimB. IntC. IntegerD. String5. 以下哪个是VB中的逻辑运算符？A. +B. /C. &&D. >6. VB中的控件是用来进行什么操作的？A. 数据存储B. 用户界面交互C. 网络通信D. 文件操作7. 在VB中，以下哪个控件用于接收用户输入的文本？A. LabelB. ButtonC. TextBoxD. ComboBox8. 以下哪个事件是在VB窗体加载时触发的？A. MouseClickB. KeyPressC. LoadD. FormOpen9. VB中用于执行特定任务的代码块被称为什么？A. 函数B. 过程C. 类D. 对象10. 在VB中，以下哪个函数可以将字符串转换为整数？A. CInt()B. CStr()C. CDbl()D. CBool()11. VB中的数组是用来存储什么类型的数据？A. 字符串B. 整数C. 浮点数D. 所有以上类型的数据12. 在VB中，以下哪个选项用于打开一个对话框来选择文件？A. OpenFileDialogB. MessageBoxC. InputBoxD. SaveFileDialog13. VB中的Do While循环是什么类型的循环结构？A. 前测试循环B. 后测试循环C. 无限循环D. 选择循环14. 在VB中，以下哪个选项用于释放对象所占用的资源？A. UsingB. FreeC. DisposeD. End15. VB中的Try...Catch语句用于处理什么类型的错误？A. 语法错误B. 逻辑错误C. 运行时错误D. 编译时错误...（继续撰写剩余试题及答案）第二部分：主观题（共3题，每题40分，总分120分）请根据以下问题进行简答：问题一：请解释VB中的常用数据类型及其区别。
2012届毕业班VB清考试卷
东莞理工学院（本科）试卷（2012届清考卷）2011 --2012 学年第二学期《Visual Basic程序设计》试卷开课单位：计算机学院，考试形式：闭卷，允许带笔入场注意：请务必将答案填写在答题卷上，否则视为答题无效。
一、单选题(30小题，每小题1.5分，共45分)1、以下不属于Visual Basic系统的文件类型是____________。
A、.frmB、.batC、.vbpD、.vbg2、Visual Basic 是一种面向对象的程序设计语言，_________不是面向对象系统所包含的三要素。
A、属性B、变量C、事件D、方法3、在VB中通过____________属性来设置字体颜色。
A、FontColorB、ForeColorC、BackColorD、ShowColor4、若要使命令按钮不可操作，要对________属性设置。
A、EnabledB、VisibleC、BackcolorD、Caption5、"x是小于100的非负数"，用VB表达式表示正确的是____________。
A、0 <= x 0r x < 100B、0 <= x < 100C、0 <= x And x < 100D、0 <=x , x < 1006、设a=21，b=75，则执行c=Int((b-a)*rnd+a)+1后，c的值为_______。
A、1～76之间B、22～75之间C、22～76之间D、1～95之间7、设a=2，b=3，c=4，d=5，下列表达式a>b AND c<=d OR 2*a>c的值是_______。
A、TrueB、FalseC、-1D、18、用于获得字符串S从第5个字符开始的3个字符的函数是_______。
A、Mid$(S,5,3)B、Middle(S,5,3)C、Right$(S,5,3)D、Left$(S,5)9、字符串“东莞News Center”的长度是_______。
2012年3月VB试卷和答案
2012年3月全国计算机等级考试二级笔试试卷Visual Basic 语言程序设计（考试时间90分钟，满分100分）一、选择题（每小题2分，共70分）下列各题A ）、B ）、C ）、D ）四个选项中，只有一个选项是正确的。
请将正确选项填涂在答题卡相应位置上，答在试卷上不得分。
（1）下列叙述中正确的是A ）循环队列是队列的一种链式存储结构B ）循环队列是队列的一种顺序存储结构C ）循环队列是非线性结构D ）循环队列是一种逻辑结构（2）下列叙述中正确的是A ）栈是一种先进先出的线性表B ）队列是一种后进先出的线性表C ）栈与队列都是非线性结构D ）以上三种说法都不对（3）一棵二叉树共有25个结点，其中5个是叶子结点，则度为1的结点数为A ）16B ）10C ）6D ）4（4）在下列模式中，能够给出数据库物理存储结构与物理存取方法的是A ）外模式B ）内模式C ）概念模式D ）逻辑模式（5）在满足实体完整性约束的条件下A ）一个关系中应该有一个或多个候选关键字B ）一个关系中只能有一个候选关键字C ）一个关系中必须有多个候选关键字D ）一个关系中可以没有候选关键字（6）有三个关系R 、S 和T 如下：R S T则由关系R 和S 得到关系T 的操作是 A ）自然连接 B ）并 C ）交D ）差 （7）软件生命周期中的活动不包括 A ）市场调研 B ）需求分析C ）软件测试D ）软件维护 （8）下面不属于需求分析阶段任务的是A ）确定软件系统的功能需求B ）确定软件系统的性能需求C ）需求规格说明书评审 A B Ca 1 2b 2 1c 3 1 A B C a 1 2d 2 1 A B C b 2 1 c 3 1D ）制定软件集成测试计划 （9）在黑盒测试方法中，设计测试用例的主要根据是A ）程序内部逻辑B ）程序外部功能C ）程序数据结构D ）程序流程图（10）在软件设计中不适用的工具是A ）系统结构图B ）PAD 图C ）数据流图（DFD 图） D ）程序流程图（11）以下合法的VB 变量名是A ）caseB ）name10C ）t-nameD ）x*y（12）设x 是小于10的非负数。
2012年3月计算机二级VB笔试真题文字word版+详细答案解析,木泉论坛首发
2012年3月全国计算机等级考试二级笔试试卷Visual Basic 语言程序设计（考试时间90分钟，满分100分）一、选择题（每小题2分，共70分）下列各题A)、B)、C)、D)四个选项中，只有一个选项是正确的，请将正确选项涂在答题卡相应位置上，答在试卷上不得分。
（1） 下列叙述正确的是A) 循环队列是队列的一种链式存储结构 B ）循环队列是队列的一种顺序存储结构 C ）循环队列是非线性结构 D ）循环队列是一种逻辑结构 （2）下列叙述正确的是A) 栈是一种先进先出的线性表 B ）队列是一种后进后出的线性表 C ）栈和队列都是非线性结构 D ）以上三种说法都不对（3）一棵二叉树共有25个结点，其中5个是叶子结点，则度为1的结点数为A ）16B ）10C ）6D ）4 （4）在下列模式中，能够给出数据库物理存储结构与物理存取方法的是A ）外模式B ）内模式C ）概念模式D ）逻辑模式（5）在满足实体完整性约束的条件下A ）一个关系中应该有一个或多个候选关键字B ）一个关系中只能有一个候选关键字C ）一个关系中不许有多个候选关键字D ）一个关系中可以没有候选关键字 （6）有三个关系R 、S 和T 如下：R S T则由关系R 和S 得到关系T 的操作时A) 自然连接 B ）并 C ）交 D ）差（7）软件生命周期中的活动不包括A）市场调研B）需求分析C）软件测试D）软件维护（8）下面不属于需求分析阶段任务的是A）确定软件系统的功能需求B）确定软件系统的性能需求C）需求规格说明书评审D）制定软件集成测试计划（9）在测试方法中，设计测试用例的主要根据是A）程序内部逻辑B）程序外部功能C）程序数据结构D）程序流程图（10）在软件设计中不使用的工具是A）系统结构图B）PAD图C）数据流图（DFD图）D）程序流程图（11）以下合法的VB变量名是A）case B）name10 C）t-name D）x*y （12）设x是小于10的非负数。
2012年计算机二级VB上机试题及解题思路第47套
2012年计算机二级VB上机试题及解题思路第47套2012年计算机二级VB上机试题及解题思路第47套1. 基本操作(2小题，每小题15分，共计30分)注意：下面出现的“考生文件夹”均为%USER%请根据以下各小题的要求设计Visual Basic应用程序(包括界面和代码)。
(1)在名称为Form1、标题为“标签”的窗体上画一个名称为Label1的标签，并设置适当属性以满足以下要求：1)标签的内容为“计算机等级考试”;2)标签可根据显示内容自动调整其大小;3)标签带有边框，且标签内容显示为三号字。
运行后的窗体如图所示。
注意存盘时必须存放在考生文件夹下，工程文件名为sjt1.vbp，窗体文件名为sjt1.frm。
解题思路：启动Visual Basic系统，创建一个Form1窗体。
在该窗体上画一个标签控件，通过其属性窗口将名称设为Label1，标题(Caption属性)设为“计算机等级考试”，AutoSize属性设为True，边框(BorderStyle属性)设为1，点击Font属性，在弹出的“字体”对话框中，在字体大小下选择“三号”。
激活Form1窗体，通过其属性窗口将标题(Caption属性)设为“标签”。
参考文件：c:\wexam\26990001\hlpsys\参考答案\sjt1.vbp、sjt1.frm、sjt1.vbw请把这些文件复制到c:\wexam\26990001中，然后打开sjt1.vbp 文件并运行。
(2)在名称为Form1的窗体上画一个名称为Hscroll1的水平滚动条，其刻度范围为1-100;再画一个名称为Text1的文本框，初始内容为1。
程序开始运行时，焦点在滚动条上。
请编写适当的事件过程，使得程序运行时，文本框中实时显示滚动框的当前位置。
运行情况如图所示。
注意：要求程序中不得使用变量，每个事件过程中只能写一条语句。
存盘时必须存放在考生文件夹下，工程文件名为sjt2.vbp，窗体文件名为sjt2.frm。
2012vb笔试外A带参考答案-共享
一、填空题（共10个空，每空2分，共20分）1. 弹出名称为“Menu ”的菜单的语句为 PopUpMenu Main 。
2. 在VB 中，声明静态变量的关键字是 Static 。
3. 在Visual Basic 中，所有控件都应具有的属性是___Name __。
4. 显示打开文件对话框的方法是：___ShowOpen ____。
5. 以下程序的功能是：找出数组a 中的第一次出现的最小值。
要求在任何情况下都能正确运行，请完善之。
Dim a%(), Mini%, i%, n%n = Val(InputBox("请输入整数个数")) '假设输入的 n 值一定大于零 ReDim a(1 To n) For i = 1 To na(i) = Rnd * 100 Next i Mini = 1For i = 2 To nIf a(i) > a(Mini) Then Mini = i Next i Print "最小值首次出现在下标为" & Mini & "的数组元素中，值为" & a(Mini)6. 以下程序的功能是循环产生“a ” 到“z ”之间的小写英文字母，并以每行显示10个字符的形式在窗体上显示出来，当出现字母”y ”时退出循环。
请完善程序。
(小写英文字母a 的ASCII 码值为97)Private Sub Form_Click() Dim a as string * 1,i as integer Doa =_chr(int(rnd()*26+97))_ i=i+1 Print a;If _i mod 10 = 0_ then Print Loop Until _a=”y ”_ End Sub1.VB是一种面向对象的可视化程序设计语言，它采用了 A 的编程机制。
A)事件驱动B) 从主程序开始执行C)按过程顺序执行D) 按模块顺序执行2.函数Format(9876.567, "00000.00")的返回值是 B 。
- 1、下载文档前请自行甄别文档内容的完整性，平台不提供额外的编辑、内容补充、找答案等附加服务。
- 2、"仅部分预览"的文档,不可在线预览部分如存在完整性等问题,可反馈申请退款(可完整预览的文档不适用该条件!)。
- 3、如文档侵犯您的权益，请联系客服反馈,我们会尽快为您处理(人工客服工作时间：9:00-18:30)。
2012年3月全国计算机等级考试二级笔试试卷Visual Basic语言程序设计（考试时间90分钟，满分100分）一、选择题（每小题2分，共70分）下列各题A)、B)、C)、D)四个选项中，只有一个选项是正确的，请将正确选项涂在答题卡相应位置上，答在试卷上不得分。
（1）下列叙述正确的是（）。
A) 循环队列是队列的一种链式存储结构B．循环队列是队列的一种顺序存储结构C．循环队列是非线性结构D．循环队列是一种逻辑结构（2）下列叙述正确的是（）。
A) 栈是一种先进先出的线性表B．队列是一种后进后出的线性表C．栈和队列都是非线性结构D．以上三种说法都不对（3）一棵二叉树共有25个结点，其中5个是叶子结点，则度为1的结点数为（）。
A．16 B．10 C．6 D．4（4）在下列模式中，能够给出数据库物理存储结构与物理存取方法的是（）。
A．外模式B．内模式C．概念模式D．逻辑模式（5）在满足实体完整性约束的条件下（）。
A．一个关系中应该有一个或多个候选关键字B．一个关系中只能有一个候选关键字C．一个关系中不许有多个候选关键字D．一个关系中可以没有候选关键字（6）有三个关系R、S和T如下：（）。
则由关系R和S得到关系T的操作时A．自然连接B．并C．交D．差（7）软件生命周期中的活动不包括（）。
A．市场调研B．需求分析C．软件测试D．软件维护（8）下面不属于需求分析阶段任务的是（）。
A．确定软件系统的功能需求B．确定软件系统的性能需求C．需求规格说明书评审D．制定软件集成测试计划（9）在测试方法中，设计测试用例的主要根据是（）。
A．程序内部逻辑B．程序外部功能C．程序数据结构D．程序流程图（10）在软件设计中不使用的工具是（ ）。
A ．系统结构图 B ．PAD 图 C ．数据流图（DFD 图） D ．程序流程图 （11）以下合法的VB 变量名是（ ）。
A ．case B ．name10 C ．t-nameD ．x*y（12）设x 是小于10的非负数。
对此陈述，以下正确的VB 表达式是（ ）。
A ．0≤x<10 B ．0<=x<10 C ．x>=0 and x<10 D ．x>=0 or x<=10 （13）以下关于窗体的叙述中错误的是（ ）。
A ．窗体的Name 属性用于标识一个窗体B ．运行程序时，改变窗体大小，能够触发窗体的Resize 事件C ．窗体的Enabled 属性为False 时，不能响应单击窗体的事件D ．程序运行期间，可以改变Name 属性值（14）下面定义窗体级变量a 的语句中错误的是（ ）。
A ．Dim a% B ．private a% C ．Private a As Integer D ．Static a%（15）表达式Int(Rnd(0)*50)所产生的随机数范围是（ ）。
A ． （0，50） B ． （1，50） C ． （0，49）D ． （1，49）（16）设x=5，执行语句Print x=x+10，窗体上显示的是（ ）。
A ．15 B ．5 C ．True D ．False （17）设有如下数组声明语句： Dim arr （-2 to 2,0 to 3）AS Integer该数组所包含的数组元素个数是（ ）。
A ．20 B ．16 C ．15 D ．12（18）现有由多个单选按钮构成的控件数组，用于区别该控件数组中各控件的属性是（ ）。
A ．Name B ．Index C ．Caption D ．Value （19）设有分段函数：A ．Select Case x Case Is<0 Y=5Case Is <=5,Is>0 Y=2*x Case else End selectB ．If x<0 Then y=5Elseif x<=5 then y=2*x Elsey=x*x+1 End ifC．y=iif｛x<0.5，iif(x<=5.2*x，x*x+1) ｝D．If x<0 Then y=5If x<=5 and x>=0 then y=2*xIf x>5 then y=x*x+1（20）设程序中有如下语句：X=inputbox(“输入”,“数据”,100)Print X运行程序，执行上述语句，输入5并单击输入对话框上的“取消“按钮，则窗体上输出（）。
A．0 B．5 C．100 D．空白（21）现有如下一段程序：Option Base 1Private Sub Command1_Click() Dim aa=Array(3,5,7,9)x=1For i=4 to 1 Step -1 S=s+a ( i )*x x=x*10 NextPrint sEnd Sub执行程序，单击Command1命令按钮，执行上述事件过程，输出结果是（）。
A．9753 B．3579 C．35 D．79（22）设有一个命令按钮Commsand1的事件过程以及一个函数过程。
程序如下：Private Sub Command1_Click(0Static x As Integerx=f(x+5)ClsPrint xEnd SubPrivate Funtion f(x As integer)As IntegerF=x+xEnd Funtion连续单击命令按钮3次，第3次单击命令按钮后，窗体上显示的计算结果是（）。
A．10 B．30 C．60 D．70（23）以下关于菜单设计的叙述中错误的是（）。
A．各菜单项可以构成控件数组B．每个菜单项可以看成是一个控件C．设计菜单是，菜单项的“有效”表选，即‟□有效(E)‟,表示该菜单项不显示D．菜单项只响应单击事件（24）以下关于多窗体的叙述中，正确的是（）。
A．任何时刻，只有一个当前窗体B．向一个工程添加多个窗体，存盘后生成一个窗体文件C．打开一个窗体时，其他窗体自动关闭D．只有第一个建立的窗体才是启动窗体（25）窗体上有一个名称为CommonDialog1的通用对话框，一个名称为Command1的命令按钮，并有如下事件过程：Private Sub Command1_Click()CommandDialog1.DefaultExt=”doc”CommandDialog1.FileName=”VB.txt”CommandDialog1.FileName=”All(*.*)|*.*|Word|*.Doc|”CommandDialog1.FileName=1CommandDialog1.ShowSaveEnd Sub运行上述程序，如下叙述正确的是（）。
A．打开的对话框中文件“保存类型”框中显示“All(*.*)”B．实现保存文件的操作，文件名是VB.txtC． DefaultExt属性与FileName属性所指明的文件类型不一致，程序出错D．对话框的Filter属性没有指出txt类型，程序运行出错（26）设程序中有如下数组定义和过程调用语句：Dim a(10) As Integer……Call p(a)如下过程定义中，正确的是（）。
A． Private Sub p(a As Integer) B． Private Sub p(a() As Integer)C． Private Sub p(a(10) As Integer) D． Private Sub p(a(n) As Integer)（27）若要获得组合框中输入的数据，可使用的属性是（）。
A．Listindex B．Caption C．Text D．List（28）在窗体上画两个名称分别为Text1、Text2的文本框。
Text1的Text属性为“Database”，如图所示。
现有如下事件过程： Private Sub Text1_Change()Text2.Text=Mid(Text1,1,1)End Sub运行程序，在文本框Text1中原有字符之前输入a，Text2中显示的是：（）。
A． DataA B． DataB C． aData D． aBase（29）有如下程序：Option Base !Private Sub Command1_Click() Dim arr(10)arr=Array(10,35,28,90,54,68,72,90)For Each a In arr If a>50 Then Sum=Sun+a End If Next a End Sub运行上述程序时出现错误，错误之处是（）。
A．数组定义语句不对，应改为Dim arr B．没有指明For循环的终值C．应在For语句之前增加Sum=0 D． Next a应改为Next（30）要求产生10个随机整数，存放在数组arr中，从键盘输入要删除的数组元素的下标，将该元素中的数组删除，后面元素中的数据依次前移，并显示删除后剩余的数据，现有如下程序：Option Base 1Private Sub Command1_Click()Dim arr(10) AS IntegerFor i=1 to 10arr(i)=int (Rnd*100)Print arr(i);Nextx=inputbox(“输入1到10的一个整数：”) For i=x+1 to 10 …循环2 arr(i-1)=arr(i)NextFor i=1 to 10 …循环3 Print arr(i);NextEnd Sub程序运行后发现显示的结果不正确，应该进行的修改是（）。
A．产生随机数时不使用Int函数B．循环2的初始值应为i=xC．数组定义改为Dim a(11) as integer D．循环3是循环终值应改为9（31）使用驱动器列表框Drive1、目录列表框Fiel1时，需要设置控件的同步，以下能够正确设置两个同步的命令是（）。
A．Dir1.path=Drive.pate B．File1.path=Dir1.pateC．File1.path=Drive1.pate D．Drive1.Drive=Dir1.pate（32）以下关于弹出式菜单的叙述中，错误的是（）。
A．一个窗体只能有一个弹出式菜单B．弹出式菜单在菜单编辑器中建立C．弹出式菜单的菜单名（主菜单项）的“可见”属性通常设置为FalseD．弹出式菜单通过窗体的PopupMenu方法显示（33）有如下程序：Private Type stuX As StringY As IntegerEnd TypePrivate Sub Command1_Click() Dim a As stu a.x=”ABCD”a.y=12345 Print aEnd Sub程序运行时出现错误，错误的原因是（）。