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

1、A PDL（ 过程设计语言 ）B PAD 图C N-S 图 D DFD 图（7）下列叙述中正确的是A 软件交付使用后还需要进行维护B软件一旦交付使用就不需要再进行维护C软件交付使用后其生命周期就结束D软件维护是指修复程序中被破坏的指令（8）数据库设计的根本目标是要解决A 数据共享问题B数据安全问题C大量数据存储问题 D 简化数据维护（9）设有如下关系表 :RSTB123则下列操作中正确的是 B 。ATRS BTRS C TRS DTR/S（10）数据库系统的核心是 B 。A 数据模型 B 数据库管理系统 C数据库 D数据库管理员（11）假定一个 Visual Basic 应用程序由一个窗体模块

2、和一个标准模块构成。为了保存该应用程序，以下正确的操作是 B 。A 只保存窗体模块文件 B 分别保存窗体模块、标准模块和工程文件C只保存窗体模块和标准模块文件 D 只保存工程文件（12）为了清除窗体上的一个控件，下列正确的操作是 C 。A 按回车键B按 Esc 键C选择（单击）要清除的控件，然后按 Del 键D选择（单击）要清除的控件，然后按回车键（13）以下叙述中错误的是 C 。A 打开一个工程文件时，系统自动装入与该工程有关的窗体、标准模块等文件B当程序运行时，双击一个窗体，则触发该窗体的 DblClick 事件C Visual Basic 应用程序只能以解释方式执行D事件可以由用户引发，

3、也可以由系统引发（14）设 a=2, b=3, c=4, d=5, 下列表达式的值是 D 。Not a=c Or 4*c=b2 And ba+cA -1 B 1 C True D False（15）设 a = 5，b = 10 ，则执行 c = Int（b - a） * Rnd + a） + 1 后，c 值的范围为 C 。A 510 B 69 C 6 10 D 5 9（16）在窗体上画一个命令按钮，名称为 Command1 ，然后编写如下事件过程：Private Sub Command1_Click（）a$ = software and hardwareb$ = Right（a$, 8）c$

4、= Mid（a$, 1, 8）MsgBox a$, b$, c$, 1End Sub运行程序，单击命令按钮，则在弹出的信息框的标题栏中显示的是A software and hardwareB softwareC hardwareD -1（17）在窗体上画一个命令按钮和一个文本框，其名称分别为Command1和Text1，把文本框的 Text 属性设置为空白，然后编写如下事件过程：a = InputBox（Enter an integer）b = InputBox（Text1.Text = b + a程序运行后，单击命令按钮，如果在输入对话框中分别输入容是A。8 和10，则文本框中显示的内A10

5、8B 18C810D出错（18）在窗体上画两个文本框，其名称分别为Text1 和Text2，然后编写如下程序：Private Sub Form_Load（）ShowText1.Text = Text2.Text = Text1.SetFocusPrivate Sub Text1_Change（）Text2.Text = Mid（Text1.Text, 8）程序运行后，如果在文本框 Text1 中输入 BeijingChina ，则在文本框 Text2 中显示的内容是B 。A BeijingChina B China C Beijing D BeijingC（19）在窗体上画一个列表框和一个命令

6、按钮，其名称分别为List1Command1，然后编写如下事件过程：List1.AddItem Item 1Item 2Item 3List1.List（List1.ListCount） = AAAA程序运行后，单击命令按钮，其结果为A 把字符串“ AAAA ”添加到列表框中，但位置不能确定B把字符串“ AAAA ”添加到列表框的最后（即“ Item 3”的后面）C把列表框中原有的最后一项改为“ AAAA ”D把字符串“ AAAA ”插入到列表框的最前面（即“ Item 1”的前面）（20）假定有如下事件过程：Private Sub Form_Click（）Dim x As Integer,

7、n As Integerx = 1n = 0Do While x 28x = x * 3n = n + 1LoopPrint x, n程序运行后，单击窗体，输出结果是 A 。A81 4 B56 3 C 28 1 D243 5（21）有如下程序：Dim Check, CounterCheck = TrueCounter = 0DoDo While Counter 20Counter = Counter + 1If Counter = 10 ThenCheck = FalseExit DoEnd IfLoop Until Check = FalsePrint Counter, Check程序运行后

8、，单击窗体，输出结果为 D 。A 15 0 B 20 -1 C 10 True D 10 False（22）有如下程序：Dim i As Integer, sum As Integersum = 0For i = 2 To 10If i Mod 2 0 And i Mod 3 = 0 Thensum = sum + iNext iPrint sum4程序运行后，单击窗体，输出结果为A12B 30C24D 18（23）在窗体上画一个名称为Text1的文本框和一个名称为的命令按钮， 然后编Dim array1（10, 10） As IntegerDim i As Integer, j As Int

9、egerFor i = 1 To 3For j = 2 To 4array1（i, j） = i + jNext jText1.Text = array1（2, 3） + array1（3, 4）程序运行后，单击命令按钮，在文本框中显示的值是B 13C14D 15（24）在窗体上画一个命令按钮，其名称为Command1 ，然后编写如下事件过程：Dim a1（4, 4）, a2（4, 4）For i = 1 To 4For j = 1 To 4a1（i, j） = i + ja2（i, j） = a1（i, j） + i + jPrint a1（3, 3）; a2（3, 3）程序运行后，单击命令

10、按钮，在窗体上输出的是A 66B 105C 721D 612（25）有如下程序：Option Base 1Dim arr, SumSum = 0arr = Array（1, 3, 5, 7, 9, 11, 13, 15, 17, 19）For i = 1 To 10If arr（i） / 3 = arr（i） 3 ThenSum = Sum + arr（i）Print Sum程序运行后，单击窗体，输出结果为 C 。A 25 B 26 C27 D 28（26）在窗体上画一个命令按钮，然后编写如下事件过程：Dim a（5） As StringFor i = 1 To 5a（i） = Chr（Asc

11、（A） + （i - 1）For Each b In aPrint b;Next程序运行后，单击命令按钮，输出结果是 A 。A ABCDE B 1 2 3 4 5 C abcde D出错信息（27）以下关于函数过程的叙述中，正确的是 D 。A 如果不指明函数过程参数的类型，则该参数没有数据类型B函数过程的返回值可以有多个C当数组作为函数过程的参数时，既能以传值方式传递，也能以引用方式传递D函数过程形参的类型与函数返回值的类型没有关系（28）函数过程 F1 的功能是：如果参数 b 为奇数，则返回值为 1，否则返回值为 0。以下能正确实现上述功能的代码是 B 。A Function F1（b As

12、 Integer）If b Mod 2 = 0 ThenReturn 0ElseReturn 1End FunctionB Function F1（b As Integer）F1=0F1=1C Function F1（b As Integer）D Function F1（b As Integer）If b Mod 2 = If InStr（str, c） = 0 Thens = 【 7】c = Chr$（Asc（c） 【 8】 ）WendIf s ThenText1 = s（8） 在 n 个运动员中选出任意 r 个人参加比赛，有很多种不同的选法，选法的个数可以用公式 计算。下图窗体中 3 个文本框的名称依次是 Text1、 Text2、Text3。程10序运行时在 T