2011春vb上机2

合集下载

福建省计算机二级vb试题及答案

福建省计算机二级vb试题及答案一、选择题（每题2分，共20分）1. Visual Basic是一种______。

A. 操作系统B. 编程语言C. 数据库管理系统D. 办公软件答案：B2. 在Visual Basic中，下列哪个关键字用于声明变量？A. DimB. SubC. FunctionD. End答案：A3. 如果要在Visual Basic中创建一个窗体，应该使用哪个控件？A. LabelB. TextBoxC. FormD. Button答案：C4. 在Visual Basic中，哪个函数用于将字符串转换为大写？A. StrConvB. UCaseC. LCaseD. Trim5. 下列哪个选项不是Visual Basic的事件？A. ClickB. LoadC. OpenD. Change答案：C6. 在Visual Basic中，如何表示一个数组？A. Dim numbers(5) As IntegerB. Dim numbers As IntegerC. Dim numbers(5)D. Dim numbers As Integer(5)答案：A7. Visual Basic中，哪个控件用于显示文本，但不能编辑？A. TextBoxB. LabelC. ComboBoxD. CheckBox答案：B8. 在Visual Basic中，哪个关键字用于循环遍历数组？A. ForB. WhileC. DoD. If答案：A9. Visual Basic中，哪个函数用于获取当前日期？B. DateC. TimeD. Today答案：D10. 在Visual Basic中，下列哪个选项用于创建一个单选按钮？A. CheckBoxB. RadioButtonC. OptionButtonD. ToggleButton答案：B二、填空题（每题2分，共20分）1. 在Visual Basic中，使用________关键字可以定义一个函数。

2011-2019年全国计算机二级VB考试真题及答案

2011年9月全国计算机等级考试二级VB 笔试试卷及参考答案2011年 9月全国计算机等级考试二级笔试试卷Visual Basic语言程序设计（考试时间90 分钟，满分100分）一、选择题（每小题2分，共70分）下列各题A）、B）、C）、D）四个选项中，只有一个选项是正确的。

请将正确选项填涂在答题卡相应位置上，答在试卷上不得分。

（1）下列叙述中正确的是（）。

A）算法就是程序B）设计算法时只需要考虑数据结构的设计C）设计算法时只需要考虑结果的可靠性D）以上三种说法都不对（2）下列关于线性链表的叙述中，正确的是A）各数据结点的存储空间可以不连续，但它们的存储顺序与逻辑顺序必须一致B）各数据结点的存储顺序与逻辑顺序可以不一致，但它们的存储空间必须连续C）进行插入与删除时，不需要移动表中的元素D）以上三种说法都不对（3）下列关于二叉树的叙述中，正确的是A）叶子结点总是比度为2的结点少一个B）叶子结点总是比度为2的结点多一个C）叶子结点数是度为2的结点数的两倍D）度为2的结点数是度为1的结点数的两倍（4）软件按功能可以分为应用软件、系统软件和支撑软件（或工具软件）。

下面属于应用软件的是A）学生成绩管理系统B）C语言编译程序C）UNIX操作系统D）数据库管理系统（5）某系统总体结构图如下图所示：该系统总体结构图的深度是A）7 B）6 C）3 D）2（6）程序调试的任务是A）设计测试用例B）验证程序的正确性C）发现程序中的错误D）诊断和改正程序中的错误（7）下列关于数据库设计的叙述中，正确的是A）在需求分析阶段建立数据字典B）在概念设计阶段建立数据字典C）在逻辑设计阶段建立数据字典D）在物理设计阶段建立数据字典（8）数据库系统的三级模式不包括A）概念模式B）内模式C）外模式D）数据模式（9）有三个关系R、S和T如下：则由关系R和S得到关系T的操作是A）自然连接B）差C）交D）并（10）下列选项中属于面向对象设计方法主要特征的是A）继承B）自顶向下C）模块化D）逐步求精（11）以下描述中错误的是A）窗体的标题通过其Caption属性设置B）窗体的名称（Name属性）可以在运行期间修改C）窗体的背景图形通过其Picture属性设置D）窗体最小化时的图标通过其Icon属性设置（12）在设计阶段，当按Ctrl+R键时，所打开的窗口是A）代码窗口B）工具箱窗口C）工程资源管理器窗口D）属性窗口（13）设有如下变量声明语句：Dim a, b As Boolean则下面叙述中正确的是A）a和b都是布尔型变量B）a是变体型变量，b是布尔型变量C）a是整型变量，b是布尔型变量D）a和b都是变体型变量（14）下列可以作为Visual Basic变量名的是A）A#A B）4ABC C）?xy D）Print_Text（15）假定一个滚动条的LargeChange属性值为100，则100表示A）单击滚动条箭头和滚动框之间某位置时滚动框位置的变化量B）滚动框位置的最大值C）拖动滚动框时滚动框位置的变化量D）单击滚动条箭头时滚动框位置的变化量（16）在窗体上画一个命令按钮，然后编写如下事件过程：Private Sub Command1_Click()MsgBox Str(123 + 321)End Sub程序运行后，单击命令按钮，则在信息框中显示的提示信息为A）字符串“123+321”B）字符串“444”C）数值“444”D）空白（17）假定有以下程序：Private Sub Form_Click()a = 1:b = aDo Until a >= 5x = a * bPrint b; xa = a + bb = b + aLoopEnd Sub程序运行后，单击窗体，输出结果是A） 1 1 B） 1 1 C） 1 1 D） 1 12 3 2 4 3 8 3 6（18）在窗体上画一个名称为List1的列表框，列表框中显示若干城市的名称。

国家二级VB机试(上机操作)模拟试卷123(题后含答案及解析)

国家二级VB机试（上机操作）模拟试卷123(题后含答案及解析) 题型有：1. 基本操作题 2. 简单应用题 3. 综合应用题基本操作题1．在名称为Form1的窗体上添加一个名称为Command1的命令按钮，标题为“打开文件”，再添加一个名称为CD1的通用对话框。

程序运行后，如果单击命令按钮，则弹出打开文件对话框，请按下列要求设置属性和编写代码：①设置适当属性，使对话框的标题为“打开文件”；②设置适当属性，使对话框的“文件类型”下拉式组合框中有两项可供选择：“文本文件”、“所有文件”(如图所示)，默认的类型是“所有文件”；③编写命令按钮的事件过程，使得单击按钮可以弹出“打开文件”对话框。

要求：程序中不得使用变量，事件过程中只能写入一条语句。

注意：存盘时必须存放在考生文件夹下，工程文件名保存为sjt1．vbp，窗体文件名保存为sjt1．frm。

正确答案：[操作步骤]步骤1：新建一个窗体，按照要求建立控件并设置其属性，如图3．21所示。

程序中用到的控件及属性见表3．13。

步骤2：打开代码编辑窗口，在指定位置编写如下代码。

参考代码Private Sub Command1_Slick( )CD1．ShowOpen’显示打开文件对话框End Sub步骤3：调试并运行程序，关闭程序后按题目要求存盘。

2．在名称为Form1的窗体上添加一个名称为Command1的命令按钮，其标题为“移动本按钮”，如图所示。

要求编写适当的事件过程，使得程序运行时，每单击按钮一次，按钮向左移动100。

要求：程序中不得使用变量，事件过程中只能写入一条语句。

注意：存盘时必须存放在考生文件夹下，工程文件名保存为sjt2．vbp，窗体文件名保存为sjt2．frm。

正确答案：[操作步骤]步骤1：新建一个窗体，按照要求建立控件并设置相应属性如表3．14所示。

步骤2：打开代码编辑窗口，在指定位置编写如下代码。

参考代码Private sub Command1_Click( )Command1．Left=Command1．Left—100End Sub步骤3：调试并运行程序，关闭程序后按题目要求存盘。

国家二级VB机试(上机操作)模拟试卷432(题后含答案及解析)

国家二级VB机试（上机操作）模拟试卷432(题后含答案及解析) 全部题型 2. 基本操作题 3. 简单应用题 4. 综合应用题基本操作题1．(1)在名称为Form1、标题为“输入”、最大化按钮失效的窗体上画一个名称为Labe11的标签控件，其标题为“输人密码”；再向窗体内画一个名称为Text1的文本框控件，并清空其中的文本。

程序执行时，用户在文本框中最多可输入由6个字符组成的密码，密码字符在文本框中显示为“*”，其画面如图所示，请设置相应属性。

注意：存盘时必须存放在考生文件夹下，工程文件名为sjt1．vbp，窗体文件名为sjt1．frm。

(2)在名称为Form1的窗体上，画一个名称为Shapel的形状控件，将其形状设置为圆、背景样式设置为不透明；再向窗体上画一个名称为HScrol11的水平滚动条控件，并将滚动条所能表示的最小值设置为0、所能表示的最大值设置为255。

要求：编写适当的事件过程，使得程序运行时，当单击水平滚动条HScroll1两端的箭头时，能将Shape1中的背景颜色设置为由红、绿、蓝三原色组合形成的一种颜色，其中，红色的分量值为滚动条中滚动框当前位置所表示的值，绿色、蓝色的分量值都为0。

程序运行示意图如图所示。

提示：系统库函数RGB可将红、绿、蓝三原色组合，并返回组合后的颜色值。

注意：要求程序中不能使用变量，每个事件过程中只能写一条语句(不得使用选择语句或循环语句)。

保存时必须存放在考生文件夹下，工程文件名为sjt2．vbp，窗体文件名为sjt2．frm。

正确答案：(1)【操作步骤】步骤1：新建一个窗体，根据表4．8设置窗体的相关属性步骤2：向窗体中添加一个标签控件，根据表4．9设置控件的相关属性步骤3：向窗体中添加一个文本框控件，根据表4．10设置控件的相关属性，设置后窗体的效果如图4．8所示步骤4：调试并运行程序，关闭程序后按题目要求存盘。

(2)【操作步骤】步骤1：新建一个窗体，在窗体上添加一个Shape控件，并按照表4．11设置控件的相关属性。

计算机二级VB(2)

T
上机真题
【例】捷成31-5 窗体上有两个标签L1和L2，标题分别为“口令”和“允许次数”；一个命令按钮C1，标题为“确定”；两个文本框名称分别为Text1和 Text2。其中 Text1用来输入口令（输入时，显示“*”），无初始内容； Text2的初始内容为3。程序运行时，在 Text1中输入口令后，单击“确定”，如果输入的是“123456”则在 Text1中显示“口令正确”；如果输入其他内容，单击“确定”后，弹出如图所示的错误提示对话框，并且Text2中的数字减1。最多可输入3次口令，若3次都输入错误，则禁止再次输入。
考点4 MsgBox函数和MsgBox语句
MsgBox函数 1. 格式
MsgBox(msg,[, type][, title][, helpfile,context])
2. 返回值对话框标题显对话框中显示的对话框类型，确定对话框 MsgBox 函数的返回值是一个整数，这个整数提示信息，为一示的信息，为的图标和按钮，为一个整与所选择的按钮有关。一字符串
Str1
Visual Basic 6.0
Num
2
变量/属性名＝表达式/属性值
将“=”右边的值赋值给左边的变量或对象的属性 1.赋值号左边只能是变量，不能是常量、常数符号或表达式
赋值语句
sin(x) = x + y 5 = sqr(s) + x + y x + y = 3

2.不能在一句赋值语句中给多个变量赋值
第六章 VB控制结构
1 2 3
顺序结构
选择结构
循环结构
顺序结构
顺序结构：无控制结构，程序按语句出现先后顺序依次执行语句 VB中默认一行为一条语句多条语句写一行之间用冒号“ : ”分隔。一条语句在多行显示，使用续行符“ _”。

二级VISUAL BASIC机试真题2011年03月含答案

二级VISUAL BASIC机试真题2011年03月1 基本操作题请根据以下各个小题的要求设计Visual Basic应用程序(包括界面和代码)。

1. 在名称为Form1的窗体上画两个标签(名称分别为Label1和Label2，标题分别为“书名”和“作者”)、两个文本框(名称分别为Text1和Text2，Text属性均为空白)和一个命令按钮(名称为Command1，标题为“显示”)，如图1所示。

然后编写命令按钮的Click事件过程。

程序运行后，在两个文本框中分别输入书名和作者，然后单击命令按钮，则在窗体的标题栏上先后显示两个文本框中的内容，如图2所示。

要求程序中不得使用任何变量。

注意：存盘时必须存放在考生文件夹下，工程文件名为sjt1.vbp，窗体文件名为sjt1.frm。

答案：第一步：建立工程和添加窗体单击考试界面的“功能”选项，从弹出的菜单中选择“启动应用程序”选项。

启动Visual Basic后，在“新建工程”对话框中选择“新建”项目中的“标准EXE”，然后单击“打开”按钮，建立一个新的工程文件，里面会同时自动建立一个名为Form1的窗体文件。

第二步：设计窗体在窗体上画出两个文本框、两个标签和一个命令按钮，并分别将它们的Caption 属性按照试题要求的内容进行设置。

第三步：编写代码1 Private Sub Command1_Click( )2 Form1.Caption= Form1.Text1.Text &"，作者" & Text2 Text3 End Sub第四步：保存对程序进行调试，确定无误后，把程序存放在考生文件夹下。

[解答] 首先按试题要求在窗体上画出两个文本框、两个标签和一个命令按钮，并分别将它们的Caption属性按照试题要求的内容进行设置。

由于试题中要求不能使用任何变量，那么可以将“Text1.Text”和“Text2.Text”视为变量来处理，将其与其他字符串用“&”或者“+”连接起来。

计算机等级考试二级vb大纲

计算机等级考试二级vb大纲计算机等级考试二级VB（Visual Basic）大纲是针对计算机编程语言Visual Basic的考试标准，它涵盖了VB编程的基础知识和应用技能。

以下是计算机等级考试二级VB的大纲内容：# 一、VB编程基础1. VB语言概述- VB的发展历史- VB的特点与应用领域2. VB开发环境- VB集成开发环境（IDE）的介绍- 项目和解决方案的概念3. VB语法基础- 基本数据类型- 变量和常量- 运算符和表达式4. 控制结构- 顺序结构- 分支结构（If...Then...Else, Select Case）- 循环结构（For...Next, While...Wend, Do...Loop）# 二、VB程序设计1. 过程与函数- Sub过程的定义与调用- Function函数的定义与调用- 参数传递2. 数组- 一维数组与多维数组- 数组的声明与使用3. 字符串处理- 字符串的基本概念- 字符串函数（如Len, Mid, Left, Right等）4. 集合与字典- 集合的基本概念- 字典的创建与使用# 三、VB界面设计1. 窗体- 窗体的属性、方法和事件- 窗体的布局与设计2. 控件- 标准控件（如Label, TextBox, Button等）- 列表控件（如ListBox, ComboBox等）- 容器控件（如Panel, Frame等）3. 菜单与工具栏- 菜单的创建与事件处理- 工具栏的设计4. 对话框- 标准对话框（如Open, Save, Print等）- 自定义对话框的设计# 四、VB高级编程1. 文件操作- 文件的打开、读取、写入和关闭- 文件系统操作（如目录操作）2. 数据库访问- 数据库的基本概念- ADO（ActiveX Data Objects）的使用- 数据绑定控件3. 错误处理- 错误处理机制- Try...Catch...Finally结构4. 多线程编程- 线程的基本概念- 线程的创建与控制# 五、VB项目实践1. 项目需求分析- 需求收集与分析- 项目规划与设计2. 项目开发流程- 编码规范- 版本控制3. 项目测试- 单元测试- 集成测试4. 项目部署与维护- 部署策略- 维护与升级# 六、VB考试要求1. 考试内容- 理论知识测试- 编程实践测试2. 考试形式- 笔试- 上机操作3. 考试标准- 考试时间- 评分标准4. 考试准备- 学习资料- 模拟考试计算机等级考试二级VB大纲为考生提供了一个全面的学习框架，帮助考生系统地掌握VB编程的基础知识和应用技能，为通过考试打下坚实的基础。

2011春VB02上机答案

2011年（春）上机 Visual Basic （VB02）答案一、改错【题目】本程序的功能是，找出使用公式412+-m m （m=1~100）生成的一个数据序列中的所有非素数，分别输出这些非素数的全部真因子。

所谓数据n 的真因子是指除1和n 之外的因子。

Option ExplicitPrivate Sub Command1_Click()Dim m As Integer, p As LongDim st1 As String'st1 = "" 'err 位置错For m = 1 To 100p = m * m - m + 41st1 = ""If Not prime(p) ThenCall fac(p, st1)List1.AddItem "第" & m & "项 " & p & ":" & st1End IfNext mEnd SubPrivate Function prime(n As Long) As BooleanDim k As IntegerFor k = 2 To Sqr(n)If n Mod k = 0 Then Exit Function 'err ForNext kprime = TrueEnd FunctionPrivate Sub fac(n As Long, st As String)Dim i As IntegerFor i = 2 To n \ 2If n Mod i = 0 Thenst = st & i & ","End IfNext ist = Left(st, Len(st) - 1) 'err RightEnd Sub二、编程题【题目】编写程序，在一个数组中找出比第一个数组元素值大的数组元素中最小的元素值。

2011年全国计算机等级考试二级VB模拟试卷（四）参考答案

2011年全国计算机等级考试二级VB模拟试卷（四）参考答案2011年全国计算机等级考试二级VB模拟试卷(四)参考答案一、选择题：35题，2分/题，共70分下列各题A)、B)、C)、D)四个选项中，只有一个选项是正确的，请将正确选项涂写在答题卡相应位置上，答在试卷上不得分。

1.执行以下程序段后,变量c的值为( )a = " Visual Basic Programing"b = "Quick"c =b & UCase (Mid(a,7,6) & Right(a,11)A)Visual BASIC ProgramingB)Quick Basic ProgramingC)QUICK Basic ProgramingD)Quick BASIC Programing分析:2.不能正确表示条件“两个整型变量A和B之一为0，但不能同时为0”的布尔表达式是（）A)A*B=0 and A+B<>0B)(A=0 or B=0)and (A<>0 OrB<>0)C)not(A=0 And B=0) and (A=0 or B=0)D)A*B=0 and (A=0 or B=0)分析:3. 下面子过程语句说明合法的是（）A)Function fl(ByVal n%)B)Sub fl (n%)As IntegerC)Function fl%(fl%)D)Sub fl(ByVal n%())分析:4.对窗体编写如下代码：Option Base 1Private Sub Form _KeyPress(KeyAscii As Integer) a=Array (237,126,587,48,498)ml=a(1)m2=1If KeyAscii=13ThenFor i=2 To 5If a (i)>ml Thenml=a (i)m2=iEnd IfNext iEnd IfPrint ml;print m2End Sub程序运行后，按回车键，输出结果为（）A)48 4B)237 1C)587 3D)498 4分析:5.Visual Basic 中没有提供下列（）事件A)MouseDownB)MouseUpC)MouseMoveD)MouseExit分析:6.执行下面对面的程序后，X的值为（）x=50Fox i=1 To 20 Step 2Next iA)66B)67C)68D)69分析:7.为了防止用户随意将光标置于控件之上，需做的工作是（）A)将控件的Enabled属性设置为FalseB)将控件的TabStop属性设置为FalseC)将控件的TabStop属性设置为TrueD)将控件的TabIndex属性设置为0分析:8.表达式String(2,"Shanghai")的值是（）A) ShB) ShanghaiC) ShanghaiShanghaiD) SS分析:9.为了在按回车键时执行某个命令按钮的事件过程，需要把该命令按钮的一个属性设置为True,这个属性是（）A) valueB) DefaulC) CancelD) Enabed分析:10.visual Basic 提供的缺省窗体包含（）A) 标题栏B)菜单栏C)工具条分析:11.假定有一个菜单项，名为MenuItem,为了在运行时该菜单项失效（变灰），应使用的语句为（）A)MenuItem.Enabled=FalseB)MenuItem.Enabled=TrueC)MenuItem.Visible=TrueD)MenuItem.Visible=False分析:12.下列不能打开菜单编辑器的操作是（）A)按Ctrl+EB)单击工具栏中的“菜单编辑器”按钮C)执行“工具”菜单中的“菜单编辑器”命令D)按Shift+Alt+M分析:13.列表框（如图2-6所示）经过下列操作后，剩余的项目是（）Listl.RemoveItem lListl.RemoveItem 2Listl.RemoveItem lA)aaB)bbC)ccD)dd分析:14.要暂时关闭计时器，应把计时器的某个属性设置为False，这个属性是（）A)VisibleB)TimerC)EnabledD)Interval分析:15.InputBox函数返回值的类型为（）A)数值B)字符串C)变体D)数值或字符串（视输入的数据而定）分析:16.当窗体的AutoRedraw属性采用默认值时，若在窗体装入时使用绘图方法绘制图形，则应将程序放在（）A)Paint事件B)Load事件C)Initilize事件D)Click事件分析:17.下列可以打开立即窗口的操作是（）A)Ctrl+DB)Ctrl+EC)Ctrl+FD)Ctrl+G分析:18.如是要向工具箱中加入控件和部件，可以利用“工程”的菜单中的（）命令A)引用B)部件C)工程属性D)添加窗体分析:19.若要清除列表框的所有内容，可用来实现的方法是（）A)RemoveitemB)ClsC)ClearD)以上均不可以分析:20.假定有下面的过程：Function Func(a As Integer,b As Integer)As IntegerStatic m As Integer, i As Integerm = 0i = 2i = i + m +1m = i + a + bFunc = mEnd Function在窗体上画一个命令按钮，然后编写如下事件过程：Private Sub Commandl_Click()Dim k As Integer, m As IntegerDim p As Integerk=4m=1p=Func(k,m)Print p;p=Func(k,m)Print pEnd Sub程序运行后，单击命令按钮，输出结果为（）。

国家二级计算机vb考试试题及答案

国家二级计算机vb考试试题及答案一、单项选择题（每题1分，共10分）1. 在VB中，用于定义变量的关键字是（）。

A. DimB. SubC. FunctionD. Const答案：A2. 下列哪个选项不是VB中的控制结构？（）A. 顺序结构B. 选择结构C. 循环结构D. 函数结构答案：D3. VB中，用于声明一个子程序的关键字是（）。

A. FunctionB. SubC. DimD. Const答案：B4. 在VB中，用于表示逻辑“与”运算符的是（）。

A. AndB. OrC. NotD. Xor答案：A5. VB中，用于表示逻辑“或”运算符的是（）。

A. AndB. OrC. NotD. Xor答案：B6. 在VB中，用于声明一个数组的关键字是（）。

A. DimB. SubC. FunctionD. Const答案：A7. VB中，用于声明一个常量的关键字是（）。

A. DimB. SubC. FunctionD. Const答案：D8. 在VB中，用于表示逻辑“非”运算符的是（）。

A. AndB. OrC. NotD. Xor答案：C9. VB中，用于声明一个函数的关键字是（）。

A. FunctionB. SubC. DimD. Const答案：A10. 在VB中，用于表示逻辑“异或”运算符的是（）。

A. AndB. OrC. NotD. Xor答案：D二、填空题（每题2分，共10分）1. 在VB中，使用____关键字可以定义一个全局变量。

答案：Public2. 当需要在VB中定义一个私有变量时，应使用____关键字。

答案：Private3. 在VB中，使用____关键字可以定义一个局部变量。

答案：Dim4. VB中，使用____关键字可以定义一个过程。

答案：Sub5. VB中，使用____关键字可以定义一个函数。

答案：Function三、简答题（每题5分，共20分）1. 请简述VB中事件驱动编程的概念。

计算机二级VB上机操作练习题及答案

计算机二级VB上机操作练习题及答案计算机二级VB上机操作练习题及答案Visual Basic（简称VB）是Microsoft公司开发的一种通用的基于对象的程序设计语言，下面店铺为为大家带来计算机二级VB上机操作练习题及答案，希望大家喜欢！一、基本操作题(1)在名称为Forml、标题为“球类项目”且没有最大化和最小化按钮的窗体上画1个名称为Combol的组合框。

组合框中的文本内容为空，表项内容有“乒乓球”、“羽毛球”和“网球”3项。

运行后的窗体如图所示。

注意：存盘时必须存放在考生文件夹下，工程文件名为sjtl.vbp，窗体文件名为sjtl.frm。

(2)在名称为Forml、标题为“转换”的窗体上，画1个名称为Shapel、边框宽度为3的形状。

再画两个标题分别为“椭圆”和“圆”的命令按钮。

如下图所示。

要求：编写适当的事件过程，使得单击“椭圆”按钮时，Shapel 的形状变换为椭圆;单击“圆”按钮时，Shapel的形状变换为圆。

程序中不得使用变量，每个事件过程中只能写一条语句。

注意：存盘时必须存放在考生文件夹下，工程文件名为sjr2.vbp，窗体文件名为sjr2.frm。

二、简单应用题(1)考生文件夹中有工程文件sjt3.vbv。

窗体上显示有一个列表框和一个文本框，且列表框中已有若干列表项。

程序的功能是，程序运行时，当用户在列表框中单击并选中某个列表项时，该项的内容将显示到文本框中，用户可以在文本框中对相关内容进行编辑，按回车键后，能够用编辑好的内容替换被选中的列表项，并自动清空文本框;当双击某个列表项时，则从列表框中删除该列表项;当用户直接在文本框中键入文本并按回车键后，则把该文本添加为列表框的一个新列表项，添加完成后，将文本框清空。

运行窗体如图所示。

要求：程序已经给出，但不完整，请将其中的注释符去掉，把“?”改为正确的内容，以实现上述程序功能。

注意：考生不得修改窗体文件中已经存在的控件和程序。

最后程序按原文件名存盘。

(完整word版)2011春江苏省二级VB上机1真题及答案

2011春江苏省二级VB上机1真题及答案江苏省二级Visual Basic上机试卷1(本试卷完成时间为70分钟)考试说明:1.改错题的界面不作要求,主要用来调试程序,若题目中有参考界面,则仅作参考。

2.考试结束后,文件必须存放在指定位置,否则适当扣分；考试盘中若无指定文件,则不予评分。

3.程序代码书写应呈锯齿形。

一、改错题(14分)【题目】本程序的功能是:找出100～999之间的十进制数为升序数,且其对应的八进制数也是升序数的整数。

所谓升序数,是指该数的十位数字值大于个位数字值,百位数字值大于十位数字值。

Option ExplicitPrivate Sub CmdFind_Click()Dim n As Integer,s8 As StringFor n=100 To 999s8=d2Q(n)If sx(n) And sx(Val(s8)) ThenList1.AddItem n & "D==>" & s8 & "Q"End IfNext nEnd SubPrivate Function d2Q(n As Integer) As String Dim p As IntegerDop=n Mod 8d2Q=d2Q & CStr(P)n=n\8Loop Until n=0End FunctionPrivate Function sx(ByVal n As Integer)As Boolean Dim num() As Integer,k As Integer,t As Integer Dim i As Integert=Len(CStr(n))ReDim num(t)For k=1 To tnum(k)=Val(Mid(CStr(n),k,1))next kFor i=1 To UBound(num)-1If num(i)>=num(i+1) Then Exit ForNext isx=TrueEnd Function【要求】1.新建工程,输入上述代码,改正程序中的错误。

2011年春江苏省计算机二级VB考试笔试真题-推荐下载

VB2011春第 4 页第二部分 Visual Basic 程序设计一、选择题（用答题卡答题，答案依次填在21～30答题号内）21．以下说法中，正确的是 21 。

A. 属性是对象的特征，所有的对象都有相同的属性B. 属性值只能在属性窗口中设置C. 在程序中可以用赋值语句给对象的任何一个属性赋值D. 对象的运行时属性不出现在对象属性窗口中22．下面4个语句中，错误的是 22。

A ．N = InputBox("输入N ：", , 5)B ．InputBox ("输入N ：", , 5)C ．MsgBox "请回答"D ．K = MsgBox("请回答")23．若设X=1，Y=2，则不能在窗体上显示出“A= 3”的语句是 23 。

A ．Print A = X + YB ．Print "A="; X + YC ．Print "A=" + Str(X + Y)D ．Print "A= " & X + Y 24．表达式InStr(4, "abcabca", "c") + Int(2.5)的值为24。

A. 7B. 8C. 5D. 925．以下有关数组的说法中，错误的是 25 。

A. 用ReDim 语句重新定义动态数组时，其下标的上下界可以使用赋了值的变量B. 用ReDim 语句重新定义动态数组时，不能改变已经说明过的数组的数据类型C. 使用ReDim 语句一定可以改变动态数组的上下界D. 定义数组时，数组维界值可以不是整数26．以下有关过程的说法中，错误的是 26 。

A ．不论在Function 过程中是否给函数名赋过值，都会返回一个值B ．不能在Function 与Sub 过程内部，再定义Function 或Sub 过程C ．Function 过程与Sub 过程，都可以是无参过程D ．过程名可以和主调过程的局部变量同名27．下列关于菜单的说法中，错误的是 27 。

vb二级计算机考试试题及答案

vb二级计算机考试试题及答案一、单选题（每题2分，共20分）1. VB中，用于声明变量的关键字是：A. DimB. DeclareC. ConstD. Type答案：A2. 下列哪个选项不是VB中的控制结构？A. 顺序结构B. 选择结构C. 循环结构D. 函数结构答案：D3. 在VB中，用于定义类模块的关键字是：A. ClassB. ModuleC. FormD. Interface答案：A4. VB中，用于读取文件内容的函数是：A. DirB. FileGetC. FileOpenD. FilePut答案：C5. 在VB中，下列哪个选项不是数组的声明方式？A. Dim arr(5) As IntegerB. Dim arr() As Integer = New Integer(5)C. Dim arr(5 To 10) As IntegerD. Dim arr As Integer = New Integer(5)答案：D6. VB中，用于创建一个窗体的关键字是：A. FormB. DialogC. WindowD. Frame答案：A7. VB中，用于实现事件驱动编程的关键字是：A. EventB. SubC. FunctionD. Property答案：B8. 在VB中，下列哪个选项不是字符串函数？A. LeftB. RightC. MidD. Round答案：D9. VB中，用于定义常量的关键字是：A. DimB. ConstC. StaticD. Private答案：B10. VB中，下列哪个选项不是循环结构？A. For EachB. ForC. Do WhileD. If答案：D二、填空题（每题2分，共20分）1. VB中，用于声明全局变量的关键字是________。

答案：Public2. VB中，用于定义一个过程的关键字是________。

答案：Sub3. 在VB中，用于定义一个函数的关键字是________。

国家二级VB机试(上机操作)模拟试卷2(题后含答案及解析)

国家二级VB机试（上机操作）模拟试卷2(题后含答案及解析) 全部题型 2. 基本操作题 3. 简单应用题 4. 综合应用题基本操作题1．请根据以下各小题的要求设计Visual Basic应用程序(包括界面和代码)。

在名称为Forml的窗体上画两个名称分别为Frame1、Frame2的框架，标题分别为”字号”、”修饰”；在Frame1中画两个单选按钮，名称分别为Optionl、Option2，标题分别为”10号字”、”20号字”，且标题显示在单选按钮的左边；在Frame2中画一个名称为Checkl的复选框，标题为”下划线”。

运行后的窗体如图2-34所示。

注意：存盘时必须存放在考生文件夹下，工程文件名为sjtl．vbp，窗体文件名为sjt1．frm。

正确答案：步骤1：新建一个”标准EXE”工程，如表3-18在窗体中画出控件并设置其相关属性。

步骤2：按要求将文件保存至考生文件夹中。

2．在名称为Forml的窗体上从上到下画两个文本框，名称分别为Textl、Text2；再画一个命令按钮，名称为Commandl，标题为”选中字符数是”。

程序运行时，在Textl中输入若干字符，选中部分内容后，单击”选中字符数是”按钮，则在Text2中显示选中的字符个数(如图2-35所示)。

请编写按钮的Click事件过程。

要求：程序中不得使用变量，事件过程中只能写一条语句。

注意：存盘时必须存放在考生文件夹下，工程文件名为sjt2．vbp，窗体文件名为sjt2．frm。

正确答案：步骤1：新建一个”标准EXE”工程，如表3-19所列在窗体Forml 中画出控件并设置它们的属性。

步骤2：打开代码编辑窗口，编写以下事件过程：参考代码：Private Sub Commandl_Click( )Text2．Text=Forml．Textl．SelLengthEnd Sub简单应用题3．在考生文件夹下有一个工程文件sjt3．vbp。

程序运行后，单击”读入数据”按钮，可把考生文件夹下in3．txt文件中的所有英文单词读入，并显示在Textl文本框中；单击”插入列表框”按钮，则按顺序把每个单词作为一项添加到Listl列表框中(如图2-36所示)。

(完整word版)2011秋江苏计算机二级VB上机试题

2011秋(VB02）一、改错题(14分）【题目】本程序的功能是从一个包含有数字的字符串中,将连续出现的数字提取出来作为一个整数，在把这些整数转换为8位二进制数。

（输入的字符串的末尾不得是数字，且连续出现的数字组成的整数不超过255) Option ExplicitPrivate Sub Command1_Click()Dim sn() As Integer，i As Integer，st As StringDim p As String * 1, q As String，k As Integerst = Text1：k = 1Dop = Mid(st，k，1)If p 〈= ”9” And p 〉= "0" Then q = q & pElseIf q 〈〉"” Theni = i + 1ReDim sn(i)sn(i）= Val（q)q = ””End Ifk = k + 1Loop Until k 〉Len（st）For i = 1 To UBound(sn)st = sn（i) ＆”-—" & Right(”0000000" ＆d2b（sn(i）)，8)List1.AddItem stNext iEnd SubPrivate Function d2b（n As Integer）As StringDim p As StringDop = n Mod 2d2b= d2b & pn = n \ 2Loop Until n = 0End Function二、编程题（26分）【题目】编写程序，找出给定数据范围内所有的盈余数.所谓盈余数是指除自身以外的因子之和大于其自身的整数。

例如:12的因子有1、2、3、4、6，1+2+3+4+6=16〉12，所以12就是一个盈余数。

【编程要求】1．程序参考界面如图所示，编程时不得增加或减少界面对象或改变对象的种类，窗体及界面元素大小适中,且均可见;2．运行程序，在“A"文本框中输入数据范围的起始值,在“B:”文本框中输入数据范围的结束值,按“查找”按钮，则将数据范围内的盈余数按参考界面中的格式输出到列表框中；按“清除"按钮，将文本框和列表框清空，焦点置于“A:”文本框上;按“结束”按钮,结束程序运行;3．程序中应至少定义一个通用过程,用于求一个整数的因子及所有因子之和,或用于判断一个整数是否为盈余数。

国家二级VB机试(上机操作)模拟试卷232(题后含答案及解析)

国家二级VB机试（上机操作）模拟试卷232(题后含答案及解析) 全部题型 2. 基本操作题 3. 简单应用题 4. 综合应用题基本操作题1．请根据以下各小题的要求设计Visual．Basic应用程序(包括界面和代码)。

(1)在名称为Forml的窗体上画一个名称为C1、标题为“改变颜色”的命令按钮，窗体标题为“改变窗体背景色”。

编写程序，使得单击命令按钮时，将窗体的背景颜色改为红色(&HFF&)。

运行程序后的窗体如图2-21所示。

要求：程序中不得使用变量，每个事件过程中只能写一条语句。

存盘时必须存放在考生文件夹下，工程文件名为sitl．vbp，窗体文件名为sjtl．frm。

(2)在名称为Forml 的窗体上画一个名称Shapel的形状控件，在属性窗口中将其设置为圆形。

画一个名称为Listl的列表框，并在属性窗口中设置列表项的值分别为1、2、3、4、5。

将窗体的标题设为“图形控件”。

单击列表框中的某一项，则将所选的值作为形状控件的填充参数。

例如，选择3，则形状控件中被竖线填充。

如图2．22所示。

要求：程序中不得使用变量，每个事件过程中只能写一条语句。

存盘时必须存放在考生文件夹下，工程文件名为sjt2．vbp，窗体文件名为sjt2．frm。

正确答案：【操作步骤】步骤1：新建一个“标准EXE”工程，在窗体Form1中画一个命令按钮，设置相关属性，其属性及值如表3．14所示。

步骤2：打开代码编辑窗口，编写按钮的Click事件过程中。

参考代码：Private Sub C1一C1ick( ) Forml．BackColor=＆HFF& End Sub 步骤3：按要求将文件保存至考生文件夹中。

第2小题【操作步骤】步骤1：新建一个“标准EXE”工程。

步骤2：在窗体Form1中加入一个列表框和。

个形状控件，并分别如表3-15设置它们的相关属性。

步骤3：打开代码编辑窗口，编写列表框的Click事件过程：参考代码：Private Sub Listl—Click( ) Shapel．FiliStyle=Listl．Text End Sub 步骤4：按要求将文件保存至考生文件夹中。