2009年9月全国计算机等级考试二级VB笔试试题及答案
浙江省09年春二级vb考试试卷及答案
浙江省2009年春二级VB考试试卷及答案2009年春浙江省高等学校计算机等级考试试卷(二级Visual Basic) 试题1 阅读下列程序说明和程序，在每小题提供的若干可选答案中，挑选一个正确答案。
【程序说明】输入n后，计算并显示下列表达式的值。
1?1111????? 234n运行时初始界面如下图左所示，输入10并按回车键后的界面如下图中所示，按“计算”按钮后的界面如下图右所示。
【程序】Dim n As Integer Private Sub Form_Load() Command1. (1)End Sub Private Sub Text1_(2)(K As Integer) If K 13 Then Exit Sub(3) If n > 0 Then = True= False Else = \ End If End Sub Private Sub Command1_Click() Dim yAs Single, i As Integer For i = 1 To n (4)Next i = y= False = True= \ 1 End Sub 【供选择的答案】(1) A、Enabled=True B、Enabled=False C、Visible=True D、Visible=False (2)A、KeyPressB、ClickC、Change(3) A、k=B、k = 13C、n = 13D、KeyDown D、n = (4) A、y = y + 1/n B、y = y + 1\\n C、y = y + 1/i D、y = y + 1\\i 试题2 阅读下列程序说明和程序，在每小题提供的若干可选答案中，挑选一个正确答案。
【程序说明】运行时输入10个数后，输出其中较小的5个数。
【程序】Private Sub Command1_Click() Dim a(10) As Single, t As Single, i As Byte, j As Byte, k As Byte For i = 1 To 10 a(i) = InputBox( (5)) Next i Fori = 1 To 9(6)For j = i +1 To 10 If (7)Then k = j Next j t = a(i): a(i) = a(k): a(k) = tNext i For i = (8)Print a(i) Next i End Sub 【供选择的答案】(5) A、\、\C、\、\(6) A、k = i B、i = k C、k = i + 1D、i = k + 1 (7) A、a(j) a(i)C、a(j) > a(k)D、a(j) D、5 To 10 试题3 阅读下列程序说明和程序，在每小题提供的若干可选答案中，挑选一个正确答案。
2009年全国计算机等级考试二级VB语言模拟试卷
2009年全国计算机等级考试二级VB语言模拟试卷（三）1 在窗体上有1个名为Cd1的通用对话框,为了在运行程序时打开保存文件对话框,则在程序总应使用的语句是A)Cd1.Action=2B)Cd1.Action=1C)Cd1.ShowSave=TureD)Cd1.ShowSave=02 下面关于菜单的叙述中错误的是A)各级菜单中的所有菜单项的名称必须唯一B)同一子菜单中的菜单项名称必须唯一,但不同子菜单中的菜单项名称可以相同C)弹出式菜单也用菜单编辑器编辑D)同一子菜单中的菜单项名称必须唯一,不同子菜单中的菜单项名称不可以相同3 已知有下面的过程Private Sub proc1(a As Integer,b As String,Optional x As Boolean)……End Sub正确调用此过程的语句是A)Call procl(5)B)Call proc1 5,”abc”,FalseC)proc1(12,”abc”,True)D)proc1 5, “abc4 在窗体上有一个文件名称为Text1的文本框和1个名称为Command1的命令按钮，要求在程序执行时，每单击命令按钮一次，文本框向右移动一定距离。
下面能够正确实现上述功能的程序是A)Private Sub Command1_Click()Text1.Left=100End SubB) Private Sub Command1_Click()Text1.Left= Text1.Left-100End SubC)Private Sub Command1_Click()Text1.Move.Text.Left+100End SubD) Private Sub Command1_Click()Text1.Move.Text.LeftEnd Sub5 某人创建了1个工程，其中的窗体名称为Form1;之后又添加了1个名为Form2的窗体，并希望程序执行时先显示Form2窗体，那么，他需要做的工作是A)在工程属性对话框中把“启动对象”设置为Form2B)在Form1的Load事件过程中加入语句Load Form2C)在Form2的Load事件过程中加入语句Form2.ShowD)在Form2的TabIndex属性设置为１，把Form1的TabIndex属性设置为２6 计算1+3+5+……+99的值，某人编程如下k=1s=0While k<=99k=k+2 : s=s+kWendPrint s在调试时发现运行结果有错误，需要修改。
全国计算机二级VB试题及答案
下面的138道题目，在二级考试中命中率极高。
一、选择题(1) 下面叙述正确的是(C)A. 算法的执行效率与数据的存储结构无关B. 算法的空间复杂度是指算法程序中指令（或语句）的条数C. 算法的有穷性是指算法必须能在执行有限个步骤之后终止D. 以上三种描述都不对(2) 以下数据结构中不属于线性数据结构的是(C)A. 队列B. 线性表C. 二叉树D. 栈(3) 在一棵二叉树上第5层的结点数最多是(B) 注：由公式2k-1得A. 8B. 16C. 32D. 15(4) 下面描述中，符合结构化程序设计风格的是(A)A. 使用顺序、选择和重复（循环）三种基本控制结构表示程序的控制逻辑B. 模块只有一个入口，可以有多个出口C. 注重提高程序的执行效率D. 不使用goto语句(5) 下面概念中，不属于面向对象方法的是 (D) 注：P55-58A. 对象B. 继承C. 类D. 过程调用(6) 在结构化方法中，用数据流程图（DFD）作为描述工具的软件开发阶段是(B)A. 可行性分析B. 需求分析C. 详细设计D. 程序编码(7) 在软件开发中，下面任务不属于设计阶段的是(D)A. 数据结构设计B. 给出系统模块结构C. 定义模块算法D. 定义需求并建立系统模型(8) 数据库系统的核心是(B)A. 数据模型B. 数据库管理系统C. 软件工具D. 数据库(9) 下列叙述中正确的是(C)A.数据库是一个独立的系统，不需要操作系统的支持B.数据库设计是指设计数据库管理系统C.数据库技术的根本目标是要解决数据共享的问题D.数据库系统中，数据的物理结构必须与逻辑结构一致(10) 下列模式中，能够给出数据库物理存储结构与物理存取方法的是(A) 注：P108A. 内模式B. 外模式C. 概念模式D. 逻辑模式(11) 算法的时间复杂度是指(C)A. 执行算法程序所需要的时间B. 算法程序的长度C. 算法执行过程中所需要的基本运算次数D. 算法程序中的指令条数(12) 算法的空间复杂度是指(D)A. 算法程序的长度B. 算法程序中的指令条数C. 算法程序所占的存储空间D. 算法执行过程中所需要的存储空间(13) 设一棵完全二叉树共有699个结点，则在该二叉树中的叶子结点数为(B) 注：利用公式n=n0+n1+n2、n0=n2+1和完全二叉数的特点可求出A. 349B. 350C. 255D. 351(14) 结构化程序设计主要强调的是(B)A.程序的规模B.程序的易读性C.程序的执行效率D.程序的可移植性(15) 在软件生命周期中，能准确地确定软件系统必须做什么和必须具备哪些功能的阶段是(D) 注：即第一个阶段A. 概要设计B. 详细设计C. 可行性分析D. 需求分析(16) 数据流图用于抽象描述一个软件的逻辑模型，数据流图由一些特定的图符构成。
计算机二级考试VB考试题及答案
计算机二级考试VB考试题及答案计算机二级考试VB考试题及答案为了使广大考生在备战计算机等级考试时，更快的掌握相应知识点，下面是店铺搜索整理的计算机二级考试VB考试题及答案，供参考练习，预祝考生们考出自己理想的成绩!计算机二级考试VB考试题及答案1、窗体中有一个名称为txtSpeed的文本框，一个名称为hsbSpeed的滚动条。
以下程序：Private Sub hsbSpeed_Change( )txtSpeeD.Text = hsbSpeeD.ValueEnd Sub当单击滚动条hsbSpeed右端的箭头时，以下说法不正确的是(B) (单)A.此时会触发change事件B.此时不会触发change事件C.在文本框中显示了滚动条滑块所在位置的值D.此时不会触发scroll事件2.利用窗体中的滚动条HScroll1改变窗体的背景色，可以这样编写代码：Private Sub HScroll1_Change( )R= HScroll1.Valueform1.BackColor = RGB(R，int(Rnd*256)，int(Rnd*256))End Sub以下说法不正确的是(C) (单)A.窗体的背景色是一个随机的颜色B.RGB函数取得到的颜色有256*256*256种C.表达式int(Rnd*256)取得随机数的范围为0-256之间的整数D.表达式int(Rnd*256)取得随机数的范围为0-255之间的整数3.窗体中有一个名称为Slider1的可选择性刻度滑块控件，一个名称为text1的文本框，如下程序：Private Sub Slider1_change( )Text1.FontSize =【Slider1.value】End Sub当拖动滑块时，以上程序实现用Slider控件设置文本框中的字体大小的功能。
4.窗体中有一个名称为Slider1的可选择性刻度滑块控件，一个名称为text1的文本框，如下程序：Private Sub Slider1_change( )Text1.【Fontsize】 = slider1.valueEnd Sub当拖动滑块时，以上程序实现用Slider控件设置文本框中的字体大小的功能。
09年春浙江省高校VB二级计算机等级考试真题试卷(含答案)
2009年春浙江省高等学校【程序说明】输入n 后，计算并显示下列表达式的值。
n 14131211+++++ 运行时初始界面如下图左所示，输入10并按回车键后的界面如下图中所示(输入数若小于1则清空文本框，需重新输入)，按“计算”按钮后的界面如下图右所示。
【程序】Dim n As IntegerPrivate Sub Form_Load()Command1. Enabled=False 1End SubPrivate Sub Text1_KeyPress 2 (K As Integer)If K <> 13 Then Exit Sub n=Text1.Text 3If n > 0 ThenCommand1.Enabled = TrueText1.Enabled = FalseElseText1.Text = ""End IfEnd SubPrivate Sub Command1_Click()Dim y As Single, i As IntegerFor i = 1 To ny=y+1/i （4）Next iLabel3.Caption = yCommand1.Enabled = FalseText1.Enabled = TrueText1.Text = " "Text1.SetFocusEnd Sub【程序说明】运行时输入10个数后，输出其中较小的5个数。
【程序】Private Sub Command1_Click()Dim a(10) As Single, t As Single, i As Byte, j As Byte, k As ByteFor i = 1 To 10a(i) = InputBox("a(" & i & ")=" （5）)Next iFor i = 1 To 9k=i （6）For j = i + 1 To 10If a(j)<a(k) （7）Then k = jNext jt = a(i): a(i) = a(k): a(k) = tNext iFor i = 1 To 5 （8）Print a(i)Next iEnd Sub【（每小题3分，共12分）阅读下列程序说明和程序，在每小题提供的若干可选答案中，挑选一个正确答案。
计算机二级VB语言程序设计考试题及答案
计算机二级VB语言程序设计考试题及答案不管从事何种工作，如果要想做出高效、实效，务必先从自身的开始。
有了方案，才不致于使自己思想迷茫、头脑空洞，不知从哪里着手开展工作。
下面是搜索的计算机二级VB语言程序设计考及答案，供大家参考学习！1.以下程序段运行的结果为(B)(单)Private Sub FormClick( )MyDate = #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 FormClick( )MyTime = #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 FormClick( )MyDate = #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和一个命令按钮mand1，编写下面程序：Private Sub Text1LostFocus( )If Not IsNumeric(Text1) ThenMsgBox "帐号有非数字字符错误"Text1.Text = ""Text1.SetFocuselseMsgBox "帐号正确"End IfEnd Sub当在text1文本框中输入字符"abc"之后，单击命令按钮，结果为(B)(单)A.显示对话框，提示信息为"帐号正确"B.显示对话框，提示信息为"帐号有非数字字符错误"C.程序出错D.没有任何提示5.在窗体中建立一个文本框text1和一个命令按钮mand1，编写下面程序：Private Sub Text1LostFocus( )If Not IsNumeric(Text1) ThenMsgBox "帐号有非数字字符错误"Text1.Text = ""Text1.SetFocuselseMsgBox "帐号正确"End IfEnd Sub当在text1文本框中输入数字123456之后，单击命令按钮，结果为(A)(单)A.显示对话框，提示信息为"帐号正确"B.显示对话框，提示信息为"帐号有非数字字符错误"C.程序出错D.没有任何提示6.在窗体中建立一个文本框text1和一个命令按钮mand1，编写下面程序：Private Sub Command1Click( )Dim 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和一个命令按钮mand1，编写下面程序：Private Sub Command1Click( )Dim 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和一个命令按钮mand1，编写下面程序：Private Sub Command1Click( )Dim I As IntegerIf Text1.Text <> "Gong" ThenI = MsgBox("密码错误", VbRetryCancle + vbExclamation, "输入密码")If I <> 4 ThenEndElseText1.Text = ""Text1.SetFocusElseMsgBox "密码帐号正确!"End IfEnd Sub假设在text1中输入字符串"123"，显示"密码错误"对话框，关于此对话框描述正确的选项是(A)(单)A.显示对话框中有“重试”按钮B.显示对话框中有“确定”按钮C.显示对话框中有“是”按钮D.以上说法都不正确9.在窗体中建立三个文本框，名称分别为text1、text2和text3，还有一个名称为label1的标签，一个名称为mand1的命令按钮，编写如下代码：Private Sub Command1Click( )Dim x!, y!, z!, t!x = Text1y = Text2z = Text3If x < y Thent = xx = yy = tEnd IfIf y < z Theny = zz = 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 FormLoad( )Dim 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 FormLoad( )Dim 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 FormLoad( )Dim 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 FormLoad( )Dim 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 Picture1Click( )Dim 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笔试真题及公共基础知识。txt其实全世界最幸福的童话，不过是一起度过柴米油盐的岁月。一个人愿意等待，另一个人才愿意出现。感情有时候只是一个人的事，和任何人无关.爱，或者不爱，只能自行了断.全国计算机等级考试二级笔试试卷 Visual Basic语言程序设计 2005年4月 参 考 答 案 一、选择题(每小题2分，共70分) （1) D (2） B (3） D （4) C （5) A （6) C (7） B （8) D (9) D （10) C （11） A （12） B (13) B （14） C (15） D (16） C （17) D （18) A （19） B (20） D （21) A （22) B (23) C （24） D （25） B (26） C （27) D (28） B (29） B (30） A (31) C (32） D (33） D （34） D (35) A 二 填空题（每空2分，共30分） （1）【1】19 （2）【2】对象 （3）【3】调试 (4)【4】关系 (5）【5】算法 （6）【6】12345。68 （7）【7】VB程序设计 【8】VB Programming （8）【9】10 （9）【10】计算8+7+……+1 【11】36 （10)【12】arr1(1） 【13】Min=arr1（i） （11）【14】EOF(1) 【15】Text1.Text
全国计算机等级考试二级笔试试卷 Visual Basic语言程序设计 2005年9月 参 考 答 案 一、选择题（每小题2分，共70分） （1） C （2) A (3) C （4 103f ） D （5） C （6） D (7) A （8) A (9) B (10） B （11） B (12) C （13） C （14） D （15） C (16) C (17） A （18) B （19） B (20) A （21） D (22） A (23) A （24) D (25) C （26） A （27） D (28） B (29） A (30) C (31） C （32） C （33) D （34) A （35） B 二、填空题 （1） 【1】数据库系统阶段 （2) 【2】空间 （3) 【3】驱动模块 （4） 【4】 32 （5） 【5】存储 （6） 【6】 30 （7) 【7】 s+c 【8】 -1 (8) 【9】 n—r 【10】t=1 （9） 【11】Text1(0) 【12】1 【13】sum—max—min (10） 【14】Text1。Text 【15】List1.List(k)
全国计算机二级《VB》练习题及答案2
全国计算机二级《VB》练习题及答案(2)12.在窗体上有若干控件，其中有一个名称为Text1的文本框。
影响Text1的Tab顺序的属性是(D)(单)A.TabStopB.EnabledC.VisibleD.TabIndex13.在窗体上画一个名称为List1的列表框，为了对列表框中的每个项目都能进行处理，应使用的循环语句为(A)(单)A.For i=0 To List1.ListCount-1 ...... Next iB.For i=0 To ListCount-1 ...... Next iC.For i=1 To List1.listCount ...... Next iD.For i=1 To ListCount ...... Next i14.以下Case语句中错误的是(C)(单)A.Case 0 To 10B.Case Is>10C.Case Is>10 And Is<50D.Case 3,5,Is>1015.以下关于图片框控件的说法中，错误的是(D)(单)A.可以通过Print方法在图片框中输出文本B.清空图片框控件中图形的方法之一是加载一个空图形C.图片框控件可以作为容器使用D.用图片框控件的Stretch属性可以自动调整图片框中图形的大小16.执行语句s=Len(Mid("VisualBasic",1,6))后，s的值是(A)(单)A.VisualB.BasicC.6D.1117.以下叙述中错误的是(D)(单)A.下拉式菜单能用菜单编辑器建立B.在多窗体程序中，每个窗体都可以建立自己的菜单系统C.能够对菜单项的Click事件编程D.如果把一个菜单项的Enabled属性设置为False，则该菜单项不可见18.在窗体上画一个命令按钮，其名称为Command1，然后编写如下事件过程：Private Sub Command1_Clicka = "12345"Print Format$(a, "000.00")End Sub程序运行后，单击命令按钮，窗体上显示的是(B)(单)A.123.45B.12345.00C.12345D.00123.4519.以下关于函数过程的叙述中，正确的是(A)(单)A.函数过程形参的类型与函数返回值的类型没有关系B.在函数过程中，过程的返回值可以有多个C.当数组作为函数过程的参数时，既能以传值方式传递，也能以传址方式传递D.如果不指明函数过程参数的类型，则该参数不能有数据类型的参数20.以下关于变量作用域的叙述中，正确的是(C)(单)A.用dim定义变量是静态变量B.静态变量必须在标准模块中声明C.用public定义变量是全局变量D.Static类型变量的作用域范围是它所在的窗体或模块文件21.确定一个控件在窗体上的位置的属性是(C)(单)A.Width和HeightB.Width或HeightC.Top和LeftD.Top或Left22.在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮，然后编写如下事件过程：Private Sub Command1_ClickText1.Text = "Visual"Me.Text1 = "Basic"Text1 = "Program"End Sub程序运行后，如果单击命令按钮，则在文本框中显示的是(C)(单)A.VisualB.BasicC.Program23.以下关系表达式中，其值为False的是(A)(单)A."ABC">"AbC"B."the"<>"they"C."VISUAL"=UCase("Visual")D."Integer">"Int"24.语句Print int(5/4*65) Mod 2的输出结果是(B)(单)A.0B.1C.2D.325.在窗体上画一个文本框、一个标签和一个命令按钮，其名称分别为Text1、Label1和Command1，然后编写如下两个事件过程：Private Sub Command1_ClickstrText = InputBox("请输入")Text1.Text = strTextEnd SubPrivate Sub Text1_ChangeLabel1.Caption = Right(Trim(Text1.Text), 3)End Sub程序运行后，单击命令按钮，如果在输入对话框中输入abcdef，则在标签中显示的内容是(D)(单)A.空B.abcdefD.def26.在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程：Private Sub Command1_Clickx = -5If x >0 Theny = x ^ 2Elsey = xEnd IfPrint yEnd Sub程序运行后，单击命令按钮，窗体上显示的是(A)(单)A.-5B.25C.1D.-127.一个工程中含有窗体Form1、Form2和标准模块Model1，如果在Form1中有语句Pubilc X AsInteger，在Model1中有语句Pubilc Y As Integer，则以下叙述中正确的是(A)(单)A.变量X、Y的作用域相同B.Y的作用域是Model1C.在Form1的任何地方中可以直接使用YD.在Form2中可以直接使用X和Y28.在窗体上画一个名称为Drive1的驱动器列表框，一个名称为Dir1的目录列表框。
全国计算机二级VB考试练习题及答案
全国计算机二级VB考试练习题及答案全国计算机二级VB考试练习题及答案想要顺当通过全国计算机二级VB考试，那么就要多做习题，下面我为大家带来了全国计算机二级VB考试练习题及答案，欢迎大家阅读!全国计算机二级VB考试练习题及答案1.以下程序是求最大公约数和最小公倍数的程序，在处填写合适的关系运算符。
Private Sub Form_Click( )Dim m1, n1, m, n, r As Integern1 = InputBox(输入自然数n, 输入数)m1 = InputBox(输入自然数m, 输入数)n = n1m = m1If mt = m: m = n: n = tEnd Ifr = m Mod nDo While r 0m = nn = rr = m Mod nLoopPrint 最大公约数=, nPrint 最小公倍数= , m1 * n1 / nEnd Sub2.下面是求100以内素数的程序。
Private Sub Command1_Click( )Dim i As Integer, m As Integer, tag As Boolean For m = 2 To 100tag = TrueFor i = 2 To m - 1If m Mod = 0 Then tag = FalseNext iIf tag Then Print mNext mEnd Sub3.下面是求100以内素数的程序，下面说法正确的是(A)(单) Private Sub Command1_Click( )Dim i As Integer, m As Integer, tag As BooleanFor m = 2 To 100tag = TrueFor i = 2 To m - 1If m Mod i = 0 Then tag = FalseNext iIf tag=true Then Print mNext mEnd SubA.tag为true时，表示m是素数B.tag为false时，表示m是素数C.语句m Mod i = 0，说明m是素数D.以上说法都不正确4.百元买百鸡问题：假定小鸡每只5角,公鸡每只2元，母鸡每只3元。
全国计算机二级VB操作试题及答案
全国计算机二级VB操作试题及答案全国计算机二级VB操作试题及答案现如今,我们最熟悉的就是试题了,试题是考核某种技能水平的标准。
什么样的试题才能有效帮助到我们呢?下面是店铺带来的.全国计算机二级VB操作试题及答案，希望对你有帮助。
一、选择题（每小题1分，共40小题，共40分。
）1数据库系统的三级模式不包括（）。
A.概念模式B.内模式C.外模式D.数据模式2下列描述中正确的是（）。
A.VisualBasic只能通过过程调用执行通用过程B.可以在Sub过程的代码中包含另一个Sub过程的代码C.可以像通用过程一样指定事件过程的名字D.Sub过程和Function过程都有返回值3下列数据结构中，能够按照“先进后出”原则存取数据的是（）。
A.循环队列B.栈C.队列D.二叉树4在窗体上面画一个命令按钮和一个标签，其名称分别为Command1和Label1，然后编写如下代码：SubS(XAsInteger，yAsInteger)StaticzAsIntegery=x*x+Zz=yEndSubPrivateSubCommand1Click（）DimiAsInteger．zAsIntegerm=0z=0Fori=1T03Si，Zm=m+zNextiLabel1．Caption=Str(m)程序运行后，单击命令按钮，在标签中显示的内容是（）。
A.50B.20C.14D.75下列关于文件的叙述中，错误的是（）。
A.使用Append方式打开文件时，文件指针被定位于文件尾B.当以Input打开文件时，如果文件不存在，则自动建立一个新文件C.顺序文件的各个记录的长度可以不同D.随机文件打开后．既可以进行读操作，也可以进行写操作【全国计算机二级VB操作试题及答案】。
- 1、下载文档前请自行甄别文档内容的完整性，平台不提供额外的编辑、内容补充、找答案等附加服务。
- 2、"仅部分预览"的文档,不可在线预览部分如存在完整性等问题,可反馈申请退款(可完整预览的文档不适用该条件!)。
- 3、如文档侵犯您的权益，请联系客服反馈,我们会尽快为您处理(人工客服工作时间：9:00-18:30)。
http://www.514t.com 免费提供各种资格考试真题、模拟题、练习题、精选题及答案 http://www.514t.com 免费提供各种资格考试真题、模拟题、练习题、精选题及答案 2009年9月全国计算机等级考试二级VB笔试试题及答案
一、选择题（每小题2分，共70分） 一、选择题 1．下列数据结构中，属于非线性结构的是（ ）。 A. 循环队列 B.带链队列C.二叉树 D.带链栈 答案 C 解析 树均是非线性结构 2. 下列数据结构中,能够按照”先进后出”原则存取数据的是（ ）。 A. 循环队列 B.栈 C.队列 D.二叉树 答案 B 解析:栈是先进后出或后进先出的线性表 3. 对于循环队列,下列叙述中正确的是（ ）。 A.队头指针是固定不变的 B.队头指针一定大于队尾指针 C.队头指针一定小于队尾指针 D.队头指针可以大于队尾指针，也可以小于队尾指针 答案 D 解析:如果队头指针大于队尾指针说明队列已经循环存放数据了,如果队头指针小于队尾指针说明没有进行循环存放 4. 算法的空间复杂度是指（ ）。 A.算法在执行过程中所需要的计算机存储空间 B.算法所处理的数据量 C.算法程序中的语句或指令条数 D.算法在执行过程中所需要的临时工作单元数 答案 A 解析:算法的空间复杂度是指执行算法所需要的内存空间,包括算法程序所占空间,输入的初始数据所占空间和执行过程中所需要的额外空间. 5. 软件设计中划分模块的一个准则是（ ）。 A. 低内聚低耦合 B. 高内聚低耦合 C. 低内聚高耦合 D. 高内聚高耦合 http://www.514t.com 免费提供各种资格考试真题、模拟题、练习题、精选题及答案 http://www.514t.com 免费提供各种资格考试真题、模拟题、练习题、精选题及答案 答案 B 解析:模块内部各元素之间的联系要紧密,高内聚,模块间的连接的紧密程度要低,低耦合,这样可以提高模块的独立性. 6. 下列选项中不属于结构化程序设计原则的是（ ）。 A.可封装 B.自顶向下 C.模块化 D.逐步求精 答案 A 7.软件详细设计产生的图如下
该图是( ). A.N-S图 B. PAD图 C. 程序流程图 D.E-R图 答案 C 8.数据库管理系统是（ ）。 A. 操作系统的一部分 B.在操作系统支持下的系统软件 C.一种编译系统 D.一种操作系统 答案 B 9.在E-R图中，用来表示实体联系的图形是（ ）。 A.椭圆形 B.矩形 C.菱形 D .三角形 答案 C 10.有三个关系R,S,T 如下： R A B C a 1 2 b 2 1 c 3 1 S http://www.514t.com 免费提供各种资格考试真题、模拟题、练习题、精选题及答案 http://www.514t.com 免费提供各种资格考试真题、模拟题、练习题、精选题及答案 A B C d 3 2 T A B C a 1 2 b 2 1 c 3 1 d 3 2
其中关系T由关系R和S通过某种操作得到，该操作称为（ ）。 A.选择 B.投影 C. 交 D. 并 答案 D 解析:T是由S表或R表中的元素组成的 （11）以下变量名中合法的是 C）str_n （12）把数学表达式表示为正确的VB表达式应该是 D）(x*5+3)/(y*2-6) （13）下面有关标准模块的叙述中，错误的是 A）标准模块不完全由代码组成，还可以有窗体 （14）下面控件中，没有Caption属性的是 C）组合框 （15）用来设置文字字体是否斜体的属性是 D）FontItalic （16）若看到程序有如下事件过程，则可以肯定的是，当程序运行时 Private SubClick_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single) Print "VB Program" End Sub D）用鼠标左键或右键单击名称为“Click”的控件时，执行此过程 http://www.514t.com 免费提供各种资格考试真题、模拟题、练习题、精选题及答案 http://www.514t.com 免费提供各种资格考试真题、模拟题、练习题、精选题及答案 （17）可以产生30-50（含30到50）之间的随机整数的表达式是 A）Int(Rnd*21+30) （18）在程序运行时，下面的叙述中正确的是 C）只装入而不显示窗体，也会执行窗体的Form_Load事件过程 （19）窗体有名称为Command1的命令按钮和名称为Text1的文本框 Private Sub Command1_Click() Text1.Text = "程序设计" Text1.SetFocus End Sub Private Sub Text1_GotFocus() Text1.Text = "等级考试" End Sub 运行以上程序，单击命令按钮后 B）文本框中显示的是“等级考试”，且焦点在文本框中 （20）设窗体上有名称为Option1的单选按钮，且程序中有语句： If Option.Value=True Then 下面语句中与该语句不等价的是 C）If Value=True Then （21）设窗体上有1个水平滚动条，已经通过属性窗口把它的Max属性设置为1，Min属性设置为100，下面叙述中正确的是 A）程序运行时，若使滚动条向左移动，滚动条的Value属性值就增加 （22）有如下过程代码： Sub var_dim() Static numa As Integer Dim numb As Integer numa = numa + 2 numb = numb + 1 Print numa; numb End Sub http://www.514t.com 免费提供各种资格考试真题、模拟题、练习题、精选题及答案 http://www.514t.com 免费提供各种资格考试真题、模拟题、练习题、精选题及答案 连续3次调用var_dim过程，第3次调用时的输出是 C）6 1 （23）在窗体上画1个命令按钮，并编写如下事件过程： Private Sub Command1_Click() For i = 5 To 1 Step -0.8 Print Int(i); Next i End Sub 运行程序，单击命令按钮，窗体上显示的内容为 A）5 4 3 2 1 1 （24）在窗体上画1个命令按钮，并编写如下事件过程： Private Sub Command1_Click() Dim a(3, 3) For m = 1 To 3 For n = 1 To 3 If n = m Or n = 4 - m Then a(m, n) = m + n Else a(m, n) = 0 End If Print a(m, n); Next n Print Next m End Sub B）2 0 4 0 4 0 4 0 6 （25）设有如下函数过程： http://www.514t.com 免费提供各种资格考试真题、模拟题、练习题、精选题及答案 http://www.514t.com 免费提供各种资格考试真题、模拟题、练习题、精选题及答案 Function fun(a As Integer, b As Integer) Dim c As Integer If a < b Then c = a: a = b: b = c End If c = 0 Do c = c + a Loop Until c Mod b = 0 fun = c End Function 若调用函数fun时的实际参数都是自然数，则函数返回的是 B）a、b的最小公倍数 （26）窗体上有1个名称为Text1的文本框；1个名称为Timer1的计时器控件，其Interval属性为5000，Enabled属性值是True。Timer1的事件过程如下： Private Sub Timer1_Timer() Static flag As Integer If flag = 0 Then flag = 1 flag = -flag If flag = -1 Then Text1.ForeColor = &HFF& '&HFF&为红色 Else Text1.ForeColor = &HC000& '&HC000&为绿色 End If End Sub 以下叙述中正确的是 C）程序执行后，文本框的文字每5秒改变一次颜色 （27）为计算1+2+2^2+2^3+2^4+…+2^10的值，并把结果显示在文本框Text1中，若编写如下事件过程： http://www.514t.com 免费提供各种资格考试真题、模拟题、练习题、精选题及答案 http://www.514t.com 免费提供各种资格考试真题、模拟题、练习题、精选题及答案 Private Sub Command1_Click() Dim a%, s%, k% s = 1 a = 2 For k = 2 To 10 a = a * 2 s = s + a Next k Text1.Text = s End Sub 执行此事件过程后发现结果是错误的，为能够得到正确结果，应做的修改是 D）同时进行B）、C）两种修改 （28）标准模块中有如下程序代码： Public x As Integer, y As Integer Sub var_pub() x = 10: y = 20 End Sub 在窗体上有1个命令按钮，并有如下事件过程： Private Sub Command1_Click() Dim x As Integer Call var_pub x = x + 100 y = y + 100 Print x; y End Sub B）100 120 （29）设a，b都是自然数，为求a除以b的余数，默认编写了以下函数： Function fun(a As Integer, b As Integer) While a > b