全国计算机等级考试二级VB语言笔试试题及答案Word格式文档下载.docx

1、B一个Visual Basic工程可以含有多个窗体文件C标准模块文件可以属于某个指定的窗体文件D标准模块文件的扩展名是.bas（13）以下叙述中，错误的是 。A在Visual Basic中，对象所能响应的事件是由系统定义的B对象的任何属性既可以通过属性窗口设定，也可以通过程序语句设定CVisual Basic中允许不同对象使用相同名称的方法DVisual Basic中的对象具有自己的属性和方法（14）设有如下语句：Dim a，b As Integerc=VisualBasicd=#7202005#以下关于这段代码的叙述中，错误的是 。Aa被定义为Integer类型变量 Bb被定义为Intege

2、r类型变量Cc中的数据是字符串 Dd中的数据是日期类型（15）以下能从字符串中直接取出子字符串Basic的函数是 。ALeftBMidCString DInstr（16）设a=4，b=3，c=2，d=1，下列表达式的值是 。ab+1 Or c ATrueB1C-1D0（17）以下可以作为Visual Basic变量名的是 。AA#ABcounstAC3AD?AA（18）设x=4，y=6，则以下不能在窗体上显示出“A=10”的语句是 。APrint A=x+yBPrintA=;x+yCPrint +Str（x+y） DPrint&（19）假定有如下的命令按钮（名称为Command1）事件过程：P

3、rivate Sub Command1_Click（）x=InputBox（输入：，输入整数）MsgBox输入的数据是：，输入数据：+xEnd Sub程序运行后，单击命令按钮，如果从键盘上输入整数10，则以下叙述中错误的是 。Ax的值是数值10 B输入对话框的标题是“输入整数”C信息框的标题是“输入数据：10” D信息框中显示的是“输入的数据是：”（20）在窗体上画1个命令按钮（名称为Command1）和1个文本框（名称为Text1），然后编写如下事件过程：x=Val（Text1.Text） Select Case xCase 1，3y=x*xCase Is=10，Is90 Then Exit

4、 For对于该事件过程，以下叙述中错误的是 。Aa数组中的数据是30个100以内的整数B语句For Each arrItem In a有语法错误CIf arrItem Mod 7=0语句的功能是输出数组中能够被7整除的数DIf arrItem90语句的作用是当数组元素的值大于90时退出For循环（22）设有命令按钮Command1的单击事件过程，代码如下：Dim a（3，3）As IntegerFor i=1 To 3 For j=1 To 3 a（i，j）=i*j+i Next jNext iSum=0 Sum=Sum+a（i，4-i）Print Sum运行程序，单击命令按钮，输出结果是 。

5、A20B7C16 D17（23）在窗体上画1个名称为Command1的命令按钮，然后编写如下事件过程：a=0For i=1 To 2For j=1 To 4 If j Mod 20 Thena=a-1 End If a=a+1Next jPrint a程序运行后，单击命令按钮，输出结果是 。A0B2C3 D4（24）窗体上有名称分别为Text1、Text2的2个文本框，有一个由3个单选按钮构成的控件数组Option1，如图1所示。程序运行后，如果单击某个单选按钮，则执行Text1中的数值与该单选按钮所对应的运算（乘以1、10或100），并将结果显示在Text2中，如图2所示。为了实现上述功能，

6、在程序中的问号（?）处应填入的内容是 。 图1 图2 Private Sub Option1_Click（Index As Integer）If Text1.TextThenSelect Case ? Case 0 Text2.Text=Val（Text1.Text） Case 1 Text2.Text=Val（Text1.Text）*10 Case 2 Text2.Text=Val（Text1.Text）*100End SelectEnd IfAIndexBOption1.IndexCOption1（Index） DOption1（Index）.Value（25）在窗体上画1个命令按钮，其名

7、称为Command1，然后编写如下程序：Dim a（10）As IntegerDim x As Integer For i=1 To 10a（i）=8+ix=2Print a（f（x）+x）Function f（x As Integer）x=x+3f=xEnd Function程序运行后，单击命令按钮，输出结果为 。A12B15C17D18（26）以下关于过程的叙述中，错误的是 。A事件过程是由某个事件触发而执行的过程B函数过程的返回值可以有多个C可以在事件过程中调用通用过程D不能在事件过程中定义函数过程（27）在窗体上画3个标签、3个文本框（名称分别为Text1、Text2和Text3）和1

8、个命令按钮（名称为Command1），外观如图所示。编写如下程序：Private Sub Form_Load（）Text1.Text=Text2.Text=Text3.Text=x=Val（Text1.Text）y=Val（Text2.Text）Text3.Text=f（x，y）Function f（ByVal x As Integer,ByVal y As Integer）Do While yx Then请重新输入!ATextBSelTextCControlDForm（29）在窗体上画1个文本框，其名称为Text1，然后编写如下过程：Private Sub Text1_KeyDown（Key

9、Code As Integer,Shift As Integer）Print Chr（KeyCode）Private Sub Text1_KeyUp（KeyCode As Integer，Shift As Integer）Print Chr（KeyCode+2）程序运行后，把焦点移到文本框中，此时如果敲击“A”键，则输出结果为 。A）AB）AC）AD）AA B C D（30）为了使列表框中的项目呈多列显示，需要设置的属性为 。AColumnsBStyleCListDMultiSelect（31）在窗体上画1个命令按钮，名称为Command1，然后编写如下程序：Dim Flag As Boole

10、anDim intNum As IntegerintNum=InputBox（请输入：If Flag ThenPrint f（intNum）Function f（X As Integer）As IntegerIf X10 ThenY=XElseY=X+10f=YPrivate Sub Form_MouseUp（Button As Integer,Shift As Integer,X As Single,Y As Single）Flag=True运行程序，首先单击窗体，然后单击命令按钮，在输入对话框中输入5，则程序的输出结果为 。A0B5C15D无任何输出（32）在菜单编辑器中建立1个名称为Me

11、nu0的菜单项，将其“可见”属性设置为False，并建立其若干子菜单，然后编写如下过程：Private Sub Form_MouseDown（Button As Integer,Shift As Integer,X As Single,Y As Single）If Button=1 ThenPopupMenu Menu0则以下叙述中错误的是 。A该过程的作用是弹出一个菜单B单击鼠标右键时弹出菜单CMenu0是在菜单编辑器中定义的弹出菜单的名称D参数X、Y指明鼠标当前位置的坐标（33）窗体上有1个名称为CD1的通用对话框，1个名称为Command1的命令按钮。命令按钮的单击事件过程如下：CD1.

12、FileName=CD1.Filter=All Files|*.*|（*.DoC）|*.Doc|（*.Txt）|*.txtCD1.FilterIndex=2CD1.Action=1关于以上代码，错误的叙述是 。A执行以上事件过程，通用对话框被设置为“打开”文件对话框B通用对话框的初始路径为当前路径C通用对话框的默认文件类型为*.TxtD以上代码不对文件执行读写操作（34）以下叙述中错误的是 。A用Shell函数可以执行扩展名为.exe的应用程序B若用Static定义通用过程，则该过程中的局部变量都被默认为Static类型CStatic类型的变量可以在标准模块的声明部分定义D全局变量必须在标准模

13、块中用Public或Global声明（35）以下关于文件的叙述中，错误的是 。A使用Append方式打开文件时，文件指针被定位于文件尾B当以输入方式（Input）打开文件时，如果文件不存在，则建立一个新文件C顺序文件各记录的长度可以不同D随机文件打开后，既可以进行读操作，也可以进行写操作二、填空题（每空2分，共30分）请将每空的正确答案写在答题卡【1】【15】序号的横线上，答在试卷上不得分。（1）对长度为10的线性表进行冒泡排序，最坏情况下需要比较的次数为 【1】 。（2）在面向对象方法中， 【2】 描述的是具有相似属性与操作的一组对象。（3）在关系模型中，把数据看成是二维表，每一个二维表称为

14、一个 【3】 。（4）程序测试分为静态分析和动态测试。其中 【4】 是指不执行程序，而只是对程序文本进行检查，通过阅读和讨论，分析和发现程序中的错误。（5）数据独立性分为逻辑独立性与物理独立性。当数据的存储结构改变时，其逻辑结构可以不变，因此，基于逻辑结构的应用程序不必修改，称为 【5】 。（6）下列语句的输出结果是 【6】 。Print Format（Int（12345.6789*100+0.5）100，0000，0.00（7）在窗体上画1个命令按钮，其名称为Command1，然后编写如下事件过程：Dim arr（1 To 100）As IntegerFor i=1 To 100arr（i）

15、=Int（Rnd*1000）Max=arr（1）Min=arr（1）If 【7】 ThenMax=arr（i）If 【8】 ThenMin=arr（i）PrintMax=；Max，Min=Min程序运行后，单击命令按钮，将产生100个1000以内的随机整数，放入数组arr中，然后查找并输出这100个数中的最大值Max和最小值Min，请填空。（8）在窗体上画1个名称为Command1的命令按钮和2个名称分别为Text1、Text2的文本框，如图所示，然后编写如下程序：Function Fun（x As Integer,ByVal y As Integer）As Integerx=x+yIf xF

16、un=xFun=yDim a As Integer,b As Integera=-10：b=5Text1.Text=Fun（a，b）Text2.Text=Fun（a，b）程序运行后，单击命令按钮，Text1和Text2文本框显示的内容分别是 【9】 和 【10】 。（9）在窗体上画1个命令按钮和1个文本框，其名称分别为Command1和Text1，然后编写如下代码：Dim SaveAll As StringText1.Text=Left（UCase（SaveAll），4）Private Sub Text1_KeyPress（KeyAscii As Integer）SaveAll=SaveAll

17、+Chr（KeyAscii）程序运行后，在文本框中输入abcdefg，单击命令按钮，则文本框中显示的内容是 【11】 。（10）在窗体上画1个命令按钮和1个通用对话框，其名称分别为Command1和CommonDialog1，然后编写如下事件过程：CommonDialog1. 【12】 =打开文件CommonDialog1.Filter=All Files（*.*）|*.*CommonDialog1.InitDir=C：CommonDialog1.ShowOpen该程序的功能是，程序运行后，单击命令按钮，将显示“打开”文件对话框，其标题是“打开文件”，在“文件类型”栏内显示“AIl Files

18、（*.*）”，并显示C盘根目录下的所有文件，请填空。（11）在窗体上画1个文本框，名称为Text1，然后编写如下程序：Opend：tempdat.txt For Output As#1If 【13】 =13 ThenIf UCase（Text1.Text）= 【14】 ThenClose 1EndWrite#1， 【15】 以上程序的功能是，在D盘temp目录下建立1个名为dat.txt的文件，在文本框中输入字符，每次按回车键（回车符的ASCII码是13）都把当前文本框中的内容写入文件dat.txt，并清除文本框中的内容；如果输入“END”，则结束程序。请填空。2006年4月全国计算机等级考试

19、二级VB语言笔试试题答案一、选择题（1）【答案】 D）【解析】结构化程序设计方法的主要原则是：自顶向下、逐步求精、模块化及限制使用goto语句。可复用性是指软件元素不加修改和稍加修改可在不同的软件开发过程中重复使用的性质。软件可复用性是软件工程追求的目标之一，是提高软件生产效率的最主要方法。面向对象的程序设计具有可复用性的优点。（2）【答案】 A）【解析】模块的独立程度可以由两个定性标准度量：内聚性和耦合性。耦合性衡量不同模块彼此间互相依赖（连接）的紧密程度；内聚性衡量一个模块内部各个元素彼此结合的紧密程度。一般来说，要求模块之间的耦合尽可能地弱，而模块的内聚程度要尽可能地高。（3）【解析】因

20、为测试的目的在于发现错误，由程序的编写者自己进行测试是不合适的，为了达到好的测试效果，应该由独立的第三方进行测试工作，所以选项A）错误；程序调试，修改一个错误的同时可能引入了新的错误，解决的办法是在修改了错误之后，必须进行回归测试，所以选项B）错误；所谓软件维护，就是在软件已经交付使用之后，为了改正错误或满足新的需要而修改软件的过程，可见选项C）也是错误的。（4）【答案】 B）【解析】栈的特点是栈顶元素总是最后被插入的元素，也是最早被删除的元素；栈底元素总是最早被插入的元素，也是最晚才能被删除的元素，即栈的修改原则是“后进先出”（Last In First Out，简称LIFO） 或“先进后出

21、”（First In Last Out，简称FILO）。（5）【解析】所谓线性链表，就是指线性表的链式存储结构，简称链表。线性表链式存储结构的基本单位称为存储结点，每个存储结点包括数据域和指针域两个组成部分。栈、队列和双向链表是线性结构，二叉树是非线性结构。线性结构和非线性结构是从数据的逻辑结构角度来讲的，与该数据结构中有多少个元素没有关系，即使是空的二叉树也是非线性结构。（6）【解析】后序遍历可以描述为：若二叉树为空，则空操作；否则：后序遍历左子树；后序遍历右子树；访问根结点。对于后序遍历，第一个访问的结点一定是最左下的结点，最后一个访问的结点一定是根结点，如果知道这个小技巧，可以迅速确定本题的答案为选项D）。（7）【答案】 C）【解析】满二叉树是指除最后一层外，每一层上的所有结点都有两个子结点的二叉树。满二叉树在其第i层上有2i-1个结点，即每一层上的结点数都是最大结点数。对于深度为7的满二叉树，叶子结点所在的是第7层，一共有27-164个叶子结点。（8）【解析】两个实体集之间的联系实际上是实体集间的函数关系，主要有3种：一对一的联系、一对多的联系、多对多的联