在Form1,标题为“显示记录”的窗体上画1个名称为Text1的文本框,其初始内容为空

全国计算机等级考试二级VISUAL BASIC真题2010年3月(总分115, 做题时间120分钟)一、选择题(每小题2分，共70分) 下列各题四个选项中，有一个是正确的，请选择正确答案。

1.下列叙述中正确的是SSS_SINGLE_SELA 对长度为n的有序链表进行查找，最坏情况下需要的比较次数为nB 对长度为n的有序链表进行对分查找，最坏情况下需要的比较次数为(n/2)C 对长度为n的有序链表进行对分查找，最坏情况下需要的比较次数为(log2n)D 对长度为n的有序链表进行对分查找，最坏情况下需要的比较次数为(n log2n)该问题分值: 2答案:A2.算法的时间复杂度是指SSS_SINGLE_SELA 算法的执行时间B 算法所处理的数据量C 算法程序中的语句或指令条数D 算法在执行过程中所需要的基本运算次数该问题分值: 2答案:D3.软件按功能可以分为：应用软件、系统软件和支撑软件(或工具软件)。

下面属于系统软件的是SSS_SINGLE_SELA 编辑软件B 操作系统C 教务管理系统D 浏览器该问题分值: 2答案:B4.软件(程序)调试的任务是SSS_SINGLE_SELA 诊断和改正程序中的错误B 尽可能多地发现程序中的错误C 发现并改正程序中的所有错误D 确定程序中错误的性质该问题分值: 2答案:A5.数据流程图(DFD图)是SSS_SINGLE_SELA 软件概要设计的工具B 软件详细设计的工具C 结构化方法的需求分析工具D 面向对象方法的需求分析工具该问题分值: 2答案:C6.软件生命周期可分为定义阶段，开发阶段和维护阶段。

详细设计属于SSS_SINGLE_SELA 定义阶段B 开发阶段C 维护阶段D 上述三个阶段该问题分值: 2答案:B7.数据库管理系统中负责数据模式定义的语言是SSS_SINGLE_SELA 数据定义语言B 数据管理语言C 数据操纵语言D 数据控制语言该问题分值: 2答案:A8.在学生管理的关系数据库中，存取一个学生信息的数据单位是SSS_SINGLE_SELA 文件B 数据库C 字段D 记录该问题分值: 2答案:D9.数据库设计中，用E-R图来描述信息结构但不涉及信息在计算机中的表示，它属于数据库设计的SSS_SINGLE_SELA 需求分析阶段B 逻辑设计阶段C 概念设计阶段D 物理设计阶段该问题分值: 2答案:A10.有两个关系R和T如下：则由关系R得到关系T的操作是SSS_SINGLE_SELA 选择B 投影C 交D 并该问题分值: 2答案:A11.在VB集成环境中要结束一个正在运行的工程，可单击工具栏上的一个按钮，这个按钮是SSS_SIMPLE_SINA B C D该问题分值: 2答案:D12.设x是整型变量，与函数Ⅱf(x>0,-x,x)有相同结果的代数式是SSS_SINGLE_SELA |x|B -|x|C xD -x该问题分值: 2答案:B13.设窗体文件中有下面的事件过程：Private Sub Command1_Click()Dim sa%=100Print aEnd Sub其中变量a和s的数据类型分别是SSS_SINGLE_SELA 整型，整型B 变体型，变体型C 整型，变体型D 变体型，整型该问题分值: 2答案:C14.下面哪个属性肯定不是框架控件的属性SSS_SINGLE_SELA TextB CaptionC LeftD Enabled该问题分值: 2答案:A15.下面不能在信息框中输出“VB”的是SSS_SINGLE_SELA MsgBox "VB"B x=MsgBox("VB")C MsgBox("VB")D Call MsgBox "VB"该问题分值: 2答案:D16.窗体上有一个名称为Option1的单选按钮数组，程序运行时，当单击某个单选按钮时，会调用下面的事件过程Private Sub Option1_C1ick(Index As Integer)…End Sub下面关于此过程的参数Index的叙述中正确的是SSS_SINGLE_SELA Index为1表示单选按钮被选中，为O表示未选中B Index的值可正可负C Index的值用来区分哪个单选按钮被选中D Index表示数组中单选按钮的数量该问题分值: 2答案:C17.设窗体中有一个文本框Text1，若在程序中执行了Text1.SetFocus，则触发SSS_SINGLE_SELA Text1的SetFocus事件B Text1的GotFocus事件C Text1的LostFocus事件D 窗体的GotFocus事件该问题分值: 2答案:B18.VB中有3个键盘事件：KeyPress、KeyDown、KeyUp，若光标在Text1文本框中，则每输入一个字母SSS_SINGLE_SELA 这3个事件都会触发B 只触发KeyPress事件C 只触发KeyDown、KeyUp事件D 不触发其中任何一个事件该问题分值: 2答案:A19.下面关于标准模块的叙述中错误的是SSS_SINGLE_SELA 标准模块中可以声明全局变量B 标准模块中可以包含一个Sub Main过程，但此过程不能被设置为启动过程C 标准模块中可以包含一些Public过程D 一个工程中可以含有多个标准模块该问题分值: 2答案:B20.设窗体的名称为Form1，标题为Win，则窗体的MouseDown事件过程的过程名是SSS_SINGLE_SELA Form1_MouseDownB Win_MouseDownC Form_MouseDownD MouseDown_Form1该问题分值: 2答案:A21.下面正确使用动态数组的是SSS_SINGLE_SELA Dim arr() As Integer …ReDim arr(3,5)B Dim arr() As Integer …ReDim arr(50)As StringC Dim arr() …ReDim arr(50) As IntegerD Dim arr(50) As Integer …ReDim arr(20)该问题分值: 2答案:A22.下面是求最大公约数的函数的首部Function gcd(ByVal x As Integer, ByVal y As Integer) As Integer 若要输出8、12、16这3个数的最大公约数，下面正确的语句是SSS_SINGLE_SELA 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))该问题分值: 2答案:D23.有下面的程序段，其功能是按图1所示的规律输出数据Dim a(3,5) As IntegerFor i=1 To 3For j=1 To 5A(i,j)=i+jPrint a(i,j);NextPrintNext若要按图2所示的规律继续输出数据，则接在上述程序段后面的程序段应该是SSS_SINGLE_SELA For i=1 To 5 For j=1 To 3 Print a(j,i); Next Print NextB For i=1 To 3 For j=1 To 5 Print a(j,i); Next Print NextC For j=1 To 5 For i=1 To 3 Print a(j,i); Next Print NextD For i=1 To 5 For j=1 To 3 Print a(i,j); Next Print Next该问题分值: 2答案:A24.窗体上有一个Text1文本框，一个Command1命令按钮，并有以下程序Private Sub Commandl_Click()Dim nIf Text1.Text<>"23456" Thenn=n+1Print "口令输入错误" & n & "次"End IfEnd Sub希望程序运行时得到左图所示的效果，即：输入口令，单击“确认口令”命令按钮，若输入的口令不是“123456”，则在窗体上显示输入错误口令的次数。

一、基本操作题1．在名称为Forml的窗体上画一个文本框，其名称为Text1，然后通过“属性”窗口设置窗体和文本框的属性，实现如下功能：在文本框中可以显示多行文本，显示垂直滚动条，显示的初始信息为“程序设计”，字体为三号规则黑体；窗体的标题为“设置文本框属性”。

要求：不编写任何代码。

2．在名称为Form1的窗体上画两个命令按钮，其名称分别为Cmd1和Cmd2。

编写适当的事件过程，要求程序运行后，如果单击Cmd1命令按钮，则可使该按钮移到窗体的左上角(只允许通过修改属性的方式实现)；如果单击Cmd2命令按钮，则可使该按钮在长度和宽度上各扩大到原来的2倍。

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

二、简单应用题1．在考生文件夹下有一个工程文件1.vbp，相应的窗体文件为1.frm。

其功能是产生30个0～1000的随机整数放入一个数组中，并输出其中的最大值。

程序运行后，单击命令按钮(名称为Command1，标题为“输出最大值”，)，即可求出其最大值，并在窗体上显示出来。

这个程序不完整，请把它补充完整，并能正确运行。

要求：删除程序中的注释符(即“'”)，把程序中的“?”改为正确的内容，使其实现上述功能，但不能修改程序中的其他部分。

最后把修改后的文件按原文件名保存。

2．在考生文件夹下有一个工程文件kt4．vbp，相应的窗体文件为kt4.frm，窗体上有一个命令按钮和一个文本框。

程序运行后，单击命令按钮，即可计算出0～1000范围内能被5或7整除的整数个数，并在文本框中显示出来。

在窗体的代码窗口中，已给出了部分程序，其中计算能被5或7整除的整数个数的操作在通用过程Fun中实现，请编写该过程的代码。

要求：请勿改动原程序中的任何内容，只在Function Fun()和End Function之间填入你编写的若干语句。

最后把修改后的文件按原文件名保存。

二、简单应用题1．在有工程文件2.vbp及其窗体文件2.frm，该程序是不完整的，请在有“?”号的地方填入正确内容，然后删除“?”及所有注释符(即“'’号)，但不能修改其他部分。

《vb期中测试》试卷一、单选题（每题1.5分，共45分）1、下列程序段的执行结果为______。

K = 0For I = 1 To 3A = I ^ I ^ KPrint A;Next IA、 1 1 1B、 1 4 9C、 1 2 3D、 0 0 0您的答案：A 参考答案：A您的得分：1.5 题分：1.52、设执行以下程序段时依次输入1、3、5，执行结果为______。

Dim a(4) As Integer, b(4) As IntegerFor K = 0 To 2a(K + 1) = Val(InputBox("请输入数据"))b(3 - K) = a(K + 1)Next KPrint b(K)A、 1B、 5C、 3D、 0您的答案：A 参考答案：A您的得分：1.5 题分：1.53、设a=5,b=10，则执行c = Int((b - a) * Rnd + a) + 1后，c值的范围为______。

A、6~10B、6~9C、5~10D、5~9您的答案：C 参考答案：A您的得分：0 题分：1.54、若设置了文本框的属性PasswordChar="$"，则运行程序时向文本框中输入8个任意字符后，文本框中显示的是______。

A、8个"*"B、1个"$"C、8个"$"D、无任何内容您的答案：B 参考答案：C您的得分：0 题分：1.55、下列程序段的执行结果为______。

A = 0:B = 0For I = -1 To -2 Step -1For J = 1 To 2B = B + 1Next J A = A + 1Next IPrint A; BA、 4 2B、-2 2C、 2 4D、 2 3您的答案：C 参考答案：C您的得分：1.5 题分：1.56、确定一个控件在窗体上的位置的属性是______。

无纸化真考题库试题（8）1.下列叙述中正确的是()。

【2013年3月考试真题】A) 循环队列是队列的一种链式存储结构 B) 循环队列是队列的一种顺序存储结构C) 循环队列是非线性结构 D) 循环队列是一种逻辑结构参考答案：B 【解析】在实际应用中，队列的顺序存储结构一般采用循环队列的形式。

2.下列关于线性链表的叙述中，正确的是()。

【2013年3月考试真题】A) 各数据结点的存储空间可以不连续，但它们的存储顺序与逻辑顺序必须一致B) 各数据结点的存储顺序与逻辑顺序可以不一致，但它们的存储空间必须连续C) 进行插入与删除时，不需要移动表中的元素 D) 以上说法均不正确参考答案：C【解析】一般来说，在线性表的链式存储结构中，各数据结点的存储序号是不连续的，并且各结点在存储空间中的位置关系与逻辑关系也不一致。

线性链表中数据的插入和删除都不需要移动表中的元素，只需改变结点的指针域即可3.一棵二叉树共有25个结点，其中5个是叶子结点，则度为1的结点数为()。

【2013年3月考试真题】A) 16 B) 10 C) 6 D) 4参考答案：A【解析】根据二叉树的性质3：在任意一棵二叉树中，度为0的叶子结点总是比度为2的结点多一个，所以本题中度为2的结点是5－1＝4个，所以度为1的结点的个数是25－5－4＝16个。

4.在下列模式中，能够给出数据库物理存储结构与物理存取方法的是()。

【2013年3月考试真题】A) 外模式 B) 内模式 C) 概念模式 D) 逻辑模式参考答案：B【解析】数据库系统的三级模式是概念模式、外模式和内模式。

概念模式是数据库系统中全局数据逻辑结构的描述，是全体用户公共数据视图。

外模式也称子模式或用户模式，它是用户的数据视图，给出了每个用户的局部数据描述。

内模式又称物理模式，它给出了数据库物理存储结构与物理存取方法，所以选择B)。

5.在满足实体完整性约束的条件下()。

【2013年3月考试真题】A) 一个关系中应该有一个或多个候选关键字 B) 一个关系中只能有一个候选关键字C) 一个关系中必须有多个候选关键字 D) 一个关系中可以没有候选关键字参考答案：A 【解析】实体完整性约束要求关系的主键中属性值不能为空值，所以选择A)。

基本题(1) 【解题思路】MaxLength属性设置文本框中输入的字符串长度是否有限制。

默认值为0，表示该单行文本框中字符串的长度只受操作系统内存的限制；若设置为大于0的数，则表示能够输入的最大字符数目。

【操作步骤】步骤1：建立界面，并设置控件的属性。

程序中用到的控件及属性见表3.162。

表3.162步骤2：调试并运行程序，关闭程序后按题目要求存盘。

基本题(2) 【解题思路】按照题目要求设置标签和命令按钮的属性，在命令按钮的Click事件过程中，通过设置标签的FontSize属性值实现标签内容字体的放大和还原。

【操作步骤】步骤1：建立界面，并设置控件的属性。

程序中用到的控件及属性见表3.163和表3.164。

表3.163表3.164步骤2：编写程序代码。

参考答案Private Sub Command1_Click()Label1.FontSize = Label1.FontSize + 2End SubPrivate Sub Command2_Click()Label1.FontSize = 12End Sub步骤3：调试并运行程序，关闭程序后按题目要求存盘。

简单题(1) 【解题思路】在Cmd Click 事件过程中，通过Select Case语句判断选择命令按钮数组的Index属性值，Case 0表示单击"开始"按钮，计时器Timer1和"暂停"按钮的Enabled属性为True，状态变为可用，且如果Cmd(0)的Caption属性是"开始"按钮，那么Cmd(0)的Caption属性变为"继续"，且Cmd(0)为不可用，单击"继续"按钮，则Timer1接着开始工作，"继续"按钮变为不可用，"暂停"按钮变为可用。

同理Case 1表示单击"暂停"按钮，则Timer1停止工作，"暂停"按钮变为不可用，"继续"按钮变为可用；Case 2表示单击"结果"按钮，则结束程序运行。

一、基本操作题（1）在名为Form1的窗体上绘制一个名为Fra1的框架，标题为"框架示例"，高度为2000，宽度为3500；在框架中绘制一个文本框。

名为Txt1，高度为600，宽度为2000，其位置距框架的左边框和上边框均为800，文本框中的初始内容设置为"文本框示例"，如图1-1所示。

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

（2）在名为Form1的窗体上，绘制一个名为Txt1的文本框。

设置文本框属性，在文本框中显示"请单击命令按钮"；再建立一个名为Cmd1，标题为"清除"的命令按钮，如图1-2所示。

编写适当的事件过程，使程序运行后，若单击"清除"命令按钮，则清除文本框中所显示的信息。

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

图1-1 图1-2二、简单应用题（1）在考生文件夹中有一个工程文件vbsj3.vbp及其窗体文件vbsj3.frm。

在名为Form1的窗体上有一个单选按钮数组，含3个单选按钮，均没有标题。

程序功能：在运行时，如果选中一个单选按钮后，单击"显示"按钮，则根据单选按钮的选中情况，在窗体上显示"你所在的城市是北京"、"你所在的城市是上海"或"你所在的城市是天津"。

要求：①请利用属性窗口，为单选按钮依次添加标题："北京"、"上海"和"天津"，设初始选取中的是"北京"，再添加一个标题为"显示"的命令按钮，如图1-3所示。

②删除程序中语句前面的注释符"'"，把程序中的问号"？"改为正确的内容，使其实现上述功能，但不得修改程序的其他部分，也不得修改控件的其他属性。

基础题(1)【解题思路】文本框控件的MultiLine属性用于设置文本框是否能以多行显示文本，值为True表示允许，值为False表示不允许；Font属性用于设置控件标题中文本的字体、字号和字型等。

Text属性用于设置文本框中显示的文本。

窗体标题通过其Caption属性设置。

【操作步骤】步骤1：建立界面，并设置控件的属性。

程序中用到的控件及属性见表3.110和表3.111。

表3.110步骤2：调试并运行程序，关闭程序后按题目要求存盘。

基础题(2)【解题思路】在窗体上建立控件后，先设置控件的属性，再编写事件过程。

单击命令按钮触发Click事件。

利用按钮的Height和Width属性来改变按钮的大小；利用按钮的Left和Top属性来改变按钮的位置。

【操作步骤】步骤1：建立界面，并设置控件的属性。

程序中用到的控件及属性见表3.112。

表3.112步骤2：编写程序代码。

参考答案Option ExplicitPrivate Sub Cmd1_Click()Cmd1.Left = 0Cmd1.Top = 0End Sub简单题(1)【解题思路】Rnd()函数用于产生一个小于1但大于或等于0的随机数。

本题程序用变量Max记录最大数，最初把数组的第一个元素的值赋给Max，然后通过For循环语句将其后的元素依次与之比较，如果其值大于Max则将其赋值给Max，依次类推，最终Max 的值就是数组各元素中的最大值。

【操作步骤】步骤1：打开本题工程文件。

步骤2：分析并编写程序代码。

程序提供代码Option Base 1Private Sub Command1_Click()Dim arrN(30) As IntegerDim Max As IntegerRandomizeFor i = 1 To 30'arrN(i) = Int(Rnd * ？)Next i'? = arrN(1)For i = 2 To 30'If ? ThenMax = arrN(i)End IfNext iPrint MaxEnd Sub程序结束参考答案第1个？处填入：1000第2个？处填入：Max第3个？处填入：arrN(i) > Max或Max < arrN(i)简单题(2)【解题思路】本题要求的是1000以内能被5或7整除的数的个数。

【解题思路】文本框控件的MultiLine属性用于设置文本框是否能以多行显示文本，值为True表示允许，值为False表示不允许；Font属性用于设置控件标题中文本的字体、字号和字型等。

Text属性用于设置文本框中显示的文本。

窗体标题通过其Caption属性设置。

【操作步骤】步骤1：建立界面，并设置控件的属性。

程序中用到的控件及属性见表3.110和表3.111。

表3.110控件窗体属性Name Caption设置值Form1设置文本框属性步骤2：调试并运行程序，关闭程序后按题目要求存盘。

基础题(2)【解题思路】在窗体上建立控件后，先设置控件的属性，再编写事件过程。

单击命令按钮触发Click事件。

利用按钮的Height和Width属性来改变按钮的大小；利用按钮的Left和Top属性来改变按钮的位置。

【操作步骤】步骤1：建立界面，并设置控件的属性。

程序中用到的控件及属性见表3.112。

表3.112步骤2：编写程序代码。

参考答案Option ExplicitPrivate Sub Cmd1_Click()Cmd1.Left = 0Cmd1.Top = 0End Sub【解题思路】Rnd()函数用于产生一个小于1但大于或等于0的随机数。

本题程序用变量Max记录最大数，最初把数组的第一个元素的值赋给Max，然后通过For循环语句将其后的元素依次与之比较，如果其值大于Max则将其赋值给Max，依次类推，最终Max的值就是数组各元素中的最大值。

【操作步骤】步骤1：打开本题工程文件。

步骤2：分析并编写程序代码。

程序提供代码Option Base 1Private Sub Command1_Click()Dim arrN(30) As IntegerDim Max As IntegerRandomizeFor i = 1 To 30 'arrN(i) = Int(Rnd * ？)Next i'? = arrN(1)For i = 2 To 30 'If ? Then Max = arrN(i)End IfNext iPrint MaxEnd Sub程序结束参考答案第1个？处填入：1000第2个？处填入：Max第3个？处填入：arrN(i) > Max或Max < arrN(i)简单题(2)【解题思路】本题要求的是1000以内能被5或7整除的数的个数。

**（1）在名称为Form1的窗体中画一个名称为L1的标签，其标题为"0"，BorderStyle属性为1；再添加一个名称为Timer1的计时器。

请设置适当的控件属性，并编写适当的事件过程，使得在运行时，每隔一秒钟标签中的数字加1。

如图所示的是程序刚启动时的情况。

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

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

**********************************************************************（2）在考生文件夹下有一个工程文件sjt6.vbp，要求程序运行后，如果多次单击列表框中的项，则可同时选择这些项。

而如果单击"显示"按钮，则在窗体上输出所有选中的列表项（如图所示）。

要求：修改列表框的适当属性，使得运行时可以多选，并去掉程序中的注释符，把程序中的？改为正确的内容，使其实现上述功能，但不得修改程序中的其他部分。

最后把修改后的程序以原来的文件名存盘。

*第1小题标签控件的BorderStyle属性返回或设置标签控件的边框样式。

可以取0和1两种值，取值为0时，标签控件无边框；取值为1时，标签控件有边框。

其语法为：控件名.BorderStyle= 0或1计时器控件的Interval属性返回或设置计时器事件之间的间隔，以毫秒为单位，取值范围是0到65535解题方法：新建一个名为Form1的窗体，点击工具箱中的Timer控件图标，然后在窗体上拖拉出一个计时器，通过属性窗口设置其Interval属性为1000。

点击工具箱中的Label控件图标，然后在窗体上拖拉出一个标签控件，通过属性窗口设置其Name属性为"L1"，Caption属性为"0"，BorderStyle属性为1。

打开代码窗口，输入如下的代码：Private Sub Timer1_Timer()L1.Caption = L1.Caption + 1End Sub按要求保存文件即完成本题。

第一章一选择题1 Visual Basic采用了()的编程机制(A) 面向过程（B）面向对象（C）事件驱动（D）可视化2 以下不属于Visual Basic 版本的是（）（A）学习版（B）企业版（C）专业版（D）工程版3 Visual Basic从（）版本开始推出中文版（A）2.0 （B）3.0 （C）4.0 （D）5.04 Visual Basic6.0是一个（）位应用程序的开发工具（A）8 （B）16 （C）32 （D）645 退出Visual Basic集成开发环境的快捷键是（）（A）Ctrl+Q （B）Alt+Q （C）Alt+A （D）Ctrl+A6 Visual Basic集成开发环境由种工作状态，不属于3种工作状态之一的是（）（A）设计状态（B）运行状态（C）中断状态（D）编写代码状态7 在Visual Basic集成开发环境下不能激活属性窗口的操作是（）(A) 在执行“工程”菜单中的“属性窗口”菜单命令(B)执行“视图”菜单中的“属性窗体”菜单命令(C)在对象上右击，从弹出的快捷菜单中选择“属性窗口”菜单命令(D) 按下快捷键F48 在设计阶段，当双击窗体设计器中窗体上的某个控件时，所打开的窗口是（）（A）工具箱窗口（B）属性窗口（C）工程资源管理器窗口（D）代码编辑窗口9 当新建一个工程并启动Visual Basic后，工具箱中的控件是（）（A）内部控件（B）ActiveX控件（C）内部控件和ActiveX控件（D）内部控件或ActiveX控件10 下列可以打开立即窗口的操作的是（）（A）Ctrl+R （B）Ctrl+C （C）Ctrl+O （D）Ctrl+G11 在新建一个“标准EXE”工程后,不在工具箱中出现的控件是（）（A）通用对话框（B）列表框（C）文本框（D）命令按钮12 如果要向工具箱中加入ActiveX控件，可以执行“工程”菜单中的（）命令（A）引用（B）部件（C）工程属性（D）添加窗体13 Visual Basic规定窗体文件的扩展名是（）（A）.fom （B）.vbp （C）.bas （D）.frm14 Visual Basic规定标准模块文件的扩展名是（）（A）.frm （B）.vbp （C）.bas （D）.vbg15 下列不能打开工具箱窗口的操作是（）(A) 按下F8快捷键(B)按下Alt键不放开，先按下V键再按下X键(C)执行“视图”菜单中的“工具箱”菜单命令按钮(D)单击“工具箱”上的“工具箱”按钮16 以下可以产生工程组文件（.vbg）的情况是（）（A）当一个程序中包含了两个以上的窗体时（B）当一个程序中包含了两个以上的标准模块时(C) 当一个程序中包含了两个以上的工程时(D)当一个程序中包含了两个以上的类模块时。

2013年3月全国计算机等级考试二级VB上机题库—1—第一套上机题题干166一、基本操作题请根据以下各小题的要求设计Visual Basic应用程序(包括界面和代码)。

(1)在名称为Form1的窗体上建立一个名称为Command1的命令按钮数组，含三个命令按钮，它们的Index 属性分别为0、1、2，标题依次为"是"、"否"、"取消"，每个按钮的高、宽均为300、800。

窗体的标题为"按钮窗口"。

运行后的窗体如图1所示。

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

图1(2)在名称为Form1的窗体上画一个名称为Sha1的形状控件，然后建立一个菜单，标题为"形状"，名称为shape0，该菜单有两个子菜单，其标题分别为"正方形"和"圆形"，其名称分别为shape1和shape2，如图2所示，然后编写适当的程序。

程序运行后，如果选择"正方形"菜单项，则形状控件显示为正方形；如果选择"圆形"菜单项，则窗体上的形状控件显示为圆形。

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

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

图2二、简单应用题(1)在考生文件夹下有一个工程文件sjt3.vbp，窗体上已经有两个文本框，名称分别为Text1、Text2；一个命令按钮，名称为C1，标题为"确定"；请画两个单选按钮，名称分别为Op1、Op2，标题分别为"男生"、"女生"；再画两个复选框，名称分别为Ch1、Ch2，标题分别为"体育"、"音乐"。

基础题(1)【解题思路】通过文本框的Name、Text、Width和Height属性设置文本框的名称、文本、宽和高，通过设置ScrollBars属性使文本框有水平滚动条，MultiLine属性设置为TRUE ，可以多行显示，设置FontItalic属性使字体样式为斜体，最后通过窗体的Caption属性设置窗体的标题。

【操作步骤】步骤1：建立界面，并设置控件的属性。

程序中用到的控件及属性见表3.115。

表3.115步骤2：调试并运行程序，关闭程序后按题目要求存盘。

基础题(2) 【解题思路】通过列表框的Name和List属性设置列表框的名称，并输入4个列表项："数学"、"物理"、"化学"、"语文"，Form Load事件过程中将List1.List(3)设置为"英语"，把最后一个列表项自动改为"英语"；Form Click事件过程中，将List1，List(3)内容清空，点击窗体后则清空最后一个列表项，在这里要注意列表框的列表项数组Tndex属性值是从0开始的，所以第四个也就是最后一个的Index属性值为3。

【操作步骤】步骤1：建立界面，并设置控件的属性。

程序中用到的控件及属性见表3.116。

表3.116步骤2参考答案Private Sub Form_Click()List1.List(3) = ""End SubPrivate Sub Form_Load()List1.List(3) = "英语"End Sub步骤3：调试并运行程序，关闭程序后按题目要求存盘。

简单题(1)【解题思路】通过框架的Name、Caption属性设置框架，通过单选按钮的Name、Caption属性设置单选按钮的名称和标题，文本框的Alignment属性用于设置文本框中文本的对齐方式，0为左对齐，1为右对齐，2为居中。

基础题(1)【解题思路】根据题意，须在命令按钮的Click事件过程中，将标签和文本框的Visible属性值设置为False，并用Print方法将文本框的内容输出到窗体上。

【操作步骤】步骤1：建立界面，并设置控件的属性。

程序中用到的控件及属性见表3.99。

表3.99步骤2：编写程序代码。

参考答案Private Sub Command1_Click()Form1.Print Text1.TextLabel1.Visible = FalseText1.Visible = FalseEnd Sub步骤3：调试并运行程序，关闭程序后按题目要求存盘。

基础题(2)【解题思路】FontSize属性可用来设置文本框中字体的大小。

Value属性用于设置滚动条滑块的当前位置值，当滚动框的位置改变时，触发Change事件。

【操作步骤】步骤1：建立界面，并设置控件的属性。

程序中用到的控件及属性见表3.100。

表3.100步骤2：编写程序代码。

参考答案Private Sub HScroll1_Change()Text1.FontSize = HScroll1.ValueEnd Sub步骤3：调试并运行程序，关闭程序后按题目要求存盘。

简单题(1)【解题思路】通过InpatBox函数接收用户输入信息，在"添加项目"单击事件过程中，运用AddItem方法添加列表框内容，在"删除项目"单击事件中运用RemaneItem方法移除列表框内容。

【操作步骤】步骤1：打开本题工程文件，添加一个名称为List1列表框和一个名称为Text1文本框，然后建立一个菜单，其属性见表3.101。

表3.101标题控件项目添加项目删除项目名称Item Add Delete内缩符号011步骤2：分析并编写程序代码。

程序提供代码Private Sub Add_Click() Text1.Text = InputBox("请输入要添加的项目") 'List1.AddItem ?End SubPrivate Sub Delete_Click()Text1.Text = InputBox("请输入要删除的项目")'For i = 0 To ? 'If List1.List(i) = ? Then 'List1.RemoveItem ? End IfNext iEnd Sub程序结束参考答案第1个？处填入：Text1.Text第2个？处填入：List1.ListCount - 1第3个？处填入：Text1.Text第4个？处填入：i步骤3：调试并运行程序，关闭程序后按题目要求存盘。

第二次习题一、选择题：1. 在窗体（名称为Form1）上画一个名称为Text1 的文本框和一个名称为Command1 的命令按钮，然后编写一个事件过程。

程序运行后，如果在文本框中输入一个字符，则把命令按钮的标题设置为“计算机等级考试”。

下列能实现上述操作的事件过程是（）。

A）Private Sub Text1_Change( ) B）Private Sub Command1_Click( )Command1.Caption="计算机等级考试" Caption="计算机等级考试"End Sub End SubC）Private Sub Form1_Click( ) D）Private Sub Command1_Click( )Text1.Caption="计算机等级考试" Text1.Text="计算机等级考试"End Sub End Sub2.以下关于窗体的描述中，错误的是( )。

A）执行Unload Form1语句后，窗体Form1消失，但仍在内存中B）窗体的Load事件在加载窗体时发生C）当窗体的Enabled属性为False时通过鼠标和键盘对窗体的操作都被禁止D）窗体的Height、Width属性用于设置窗体的高和宽3. 在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮，然后编写如下事件过程：Private Sub Command1_Click()Text1.Text="Visual"Me.Text1="Basic"Text1="Program"End Sub程序运行后，如果单击命令按钮，则在文本框中显示的是( )。

A）Visual B）Basic C）Program D）出错4. 要使文本框获得输入焦点，则应采用文本控件的哪个方法( )。

1.在窗体form1上画一名为Lab1的标签，具有边框；建立一个名为menu_1的主菜单，标题为“操作”，含有两个子菜单，名称分别为menu_11 和menu_12，标题分别为“显示”和“隐藏”。

编写适当的事件过程，程序运行后，若单击“操作”菜单中的“显示”命令，则在标签中显示“计算机考试”；如果单击“隐藏”命令，则隐藏标签。

答案：本题主要考查菜单与标签的综合应用。

显示标签内容：lab1.caption="计算机考试"隐藏标签：lab1.visible=false2.在窗体form1上画一个名为Txt1的文本框；再画一个名为Cmd1的命令按钮，其标题为“输出”。

要求程序运行后，在文本框中任意输入一些字符，再单击“输出”按钮，则将文本框中的字符显示在窗体上。

答案：本题主要考查print命令的使用方法。

显示文本框的内容：print txt1.text3.在窗体form1上画一个名为Txt1的文本框；画一个名为Cmd1的命令按钮，其标题为“计算”。

要求程序运行后，若单击“计算”按钮，则求出1-30之间所有能被7整除的数的乘积，并显示在文本框中。

答案：本题主要考查利用for循环，判断某范围内的整数是否被整除的算法。

S=1for i=1 to 30if I mod 7 =0 then s=s*Inexttxt1.text=s4.在窗体form1上建立一个单选按钮数组，名称为opt，含3个单选按钮，标题分别为“中专生”、“大专生”和“本科生”；画一名称为cmd1的命令按钮，标题为“显示”。

程序在运行时，若点中一个单选按钮再单击“显示”按钮，则在窗体上显示相应的信息。

例如，选中“大专生”单选钮，则在窗体上显示“我是大专生”。

答案;本题主要考查利用for循环，判断某范围内的整数是否被整除的算法。

S=1for i=1 to 30if I mod 7 =0 then s=s*Inexttxt1.text=s5.在窗体form1上画一个名为Txt1的文本框；再画两个名称分别Cmd1、Cmd2 的命令按钮，其标题分别为“计算”和“保存”。

VB1以下叙述中正确的是______。

选B在窗体上画一个命令按钮，其名称为Command1，然后编写如下事件过程：Private Sub Command1_Click()a=12345Print Format$(a,"000.00")End Sub程序运行后，单击命令按钮，窗体上显示的是______。

VB中窗体文件的扩展名是______。

A.FRMB.VBPC.VBWD.PDM图像框有一个属性，可以自动调整图像框的大小，以适应图像的尺寸，这个属性是__B____。

在窗体上画一个文本框(其名称为Text1)和一个标签(其名称为Label1)，程序运行后，如果在文本框中输入指定的信息，则立即在标签中显示相同的内容。

以下可以实现上述操作的事件过程是______。

选A执行语句s=Len(Mid("VisualBasic",1,6))后，s的值是______。

选D设x=4，y=6，则以下不能在窗体上显示出"A=10"的语句是______。

选D在窗体上画一个名称为TxtA的文本框，然后编写如下的事件过程：Private Sub TxtA_KeyPress(KeyAscii As Integer)......End Sub假定焦点已经位于文本框中，则能够触发KeyPress事件的操作是______。

用下面语句定义的数组的元素个数是______。

选Bdim A(-3 to 5) as integerA.8B.9C.7D.6某人在窗体上画了一个名称为Timer1的计时器和一个名称为Label1的标签，计时器的属性设置为Enabled=True，Interval=0，并编程如下。

希望在程序运行时，可以每2秒在标签上显示一次系统当前时间。

Private Sub Timer1_Timer()Label1.Caption=Time$End Sub在程序执行时发现未能实现上述目的，那么，他应做的修改是______。

属性。

【解题思路】命令按钮的名称和标题分别由其Name、Caption属性设置；文本框的名称、初始内容和字体分别由其Name、Text、Font属性设置。

在命令按钮的Click事件中，将Text1.Font值设为"宋体"。

【操作步骤】步骤1：建立界面，添加控件并设置控件的属性。

程序中用到的控件及属性见表3.185。

步骤2：编写程序代码。

参考答案Private Sub C1_Click()Text1.Font = "宋体"End Sub步骤3：调试并运行程序，关闭程序后按题目要求存盘。

基础题（2）【考点分析】本题考点有：图片框的Name、Height、Width、Picture属性和窗体的DblClick 事件。

【解题思路】通过图片框的Name、Height、Width、Picture属性分别设置其名称、高、宽和添加图片。

双击窗体为DblClick事件，图片的消失用LoadPicture()方法来实现。

【操作步骤】步骤1：建立界面，添加控件并设置控件的属性。

程序中用到的控件及属性见表3.186。

步骤2：编写程序代码。

参考答案Private Sub Form_DblClick()P1.Picture = LoadPicture()End Sub步骤3：调试并运行程序，关闭程序后按题目要求存盘。

简答题（1）【考点分析】本题考点有：标签的Name、Caption、BorderStyle属性，计时器的Interval 属性和Timer事件。

【解题思路】标签的BorderStyle属性可以取两个值，当取0值时表示标签无边框，这是默认情况；当取1值时标签有边框。

在计时器的Timer事件，将标签的Caption属性值加1，实现程序运行后每隔一秒钟标签中的数字加1。

【操作步骤】步骤1：建立界面，添加控件并设置控件的属性。

程序中用到的控件及属性见表3.187。

步骤2：分析并编写程序代码。

二级VISUAL BASIC模拟题2018年(37)(总分92,考试时间90分钟)一、选择题1. 设a=2，b=3，c=4，d=5，下列表达式的值是______。

Not a＜=c Or 4*c=b^2 And b＜＞a+cA. -1B. 1C. TrueD. False2. 软件设计包括软件的结构、数据接口和过程设计，其中软件的过程设计是指______。

A. 模块间的关系B. 系统结构部件转换成软件的过程描述C. 软件层次结构D. 软件开发过程3. 以下变量名中，______是不符合Visual Basic的命名规范的。

A. Abc901B. mnu Open 234C. priceD. .K4. 有如下的程序。

Private Sub Commandl_Click( )Dim k As Integer, m As IntegerDim P As Integerk=4: m=1P=Fun(k, m) : Print P;P = Fun ( k, m) : Print PEnd SubPrivate Function Fun( a As Integer, b As Integer)Static m As Integer, i As Integerm=5:i=2i=i+m+1m=i + a + bFun=m\2End Function单击命令按钮后，输出结果为A. 2 2B. 4 4C. 5 5D. 65. 在利用菜单编辑器设计菜单时，为了把组合键“Alt+X”设置为“退出(X)”菜单项的访问键，可以将该菜单项的标题设置为______。

A. 退出(X&)B. 退出(&X)C. 退出(X#)D. 退出(#X)6. 以下叙述中错误的是______。

A. 在通用过程中，多个形式参数之间可以用逗号作为分隔符B. 在Print方法中，多个输出项之间可以用逗号作为分隔符C. 在Dim语句中，所定义的多个变量可以用逗号作为分隔符D. 当一行中有多个语句时，可以用逗号作为分隔符7. 为了用键盘打开菜单和执行菜单命令，第一步应按的键是______。