【计算机类职业资格】二级VISUAL+BASIC笔试40及答案解析.doc

《【计算机类职业资格】二级VISUAL+BASIC笔试40及答案解析.doc》由会员分享，可在线阅读，更多相关《【计算机类职业资格】二级VISUAL+BASIC笔试40及答案解析.doc（14页珍藏版）》请在麦多课文档分享上搜索。

1、二级 VISUAL+BASIC 笔试 40 及答案解析(总分：94.00，做题时间：90 分钟)一、B选择题/B(总题数：35，分数：70.00)1.数据结构中，与所使用的计算机无关的是数据的 _。（分数：2.00）A.存储结构B.物理结构C.逻辑结构D.物理和存储结构2.以下叙述中错误的是 _。（分数：2.00）A.在工程资源管理器窗口中只能包含一个工程文件及属于该工程的其他文件B.以.BAS 为扩展名的文件是标准模块文件C.窗体文件包含该窗体及其控件的属性D.一个工程中可以含有多个标准模块文件3.栈底至栈顶依次存放元素 A、B、C、D，在第五个元素 E 入栈前，栈中元素可以出栈，则出栈序列

2、可能是 _。（分数：2.00）A.ABCEDB.DBCEAC.CDABED.DCBEA4.如果要在菜单中渤口一个分隔线，则应将其 Caption 属性设置为 _。（分数：2.00）A.=B.*C.&D.-5.下列有关数据库的描述，正确的是 _。（分数：2.00）A.数据库是一个 DBF 文件B.数据库是一个关系C.数据库是一个鲒构化的数据集合D.数据库是一组文件6.软件设计包括软件的结构、数据接口和过程设计，其中软件的过程设计是指 _。（分数：2.00）A.模块间的关系B.系统结构部件转换成软件的过程描述C.软件层次结构D.软件开发过程7.线性表的顺序存储结构和线性表的链式存储结构分别是 _。

3、（分数：2.00）A.顺序存取的存储结构、顺序存取的存储结构B.随机存取的存储结构、顺序存取的存储结构C.随机存取的存储结构、随阢存取的存储结构D.任意存取的存储结构、任意存取的存储结构8.设有如下程序： Private Sub Command1_Click() Dim sum As Double，x As Double sum=0 n=0 For i=1 To 5 x=n/i n=n+1 sum=sum+x Next End Sub 该程序通过 For 循环计算一个表达式的值，这个表达式是 _。（分数：2.00）A.1+1/2+2/3/4+4/5B.1+1/2+2/3+3/4C.1/2+2/

4、3+3/4+4/5D.1+1/2+1/3+1/4+1/59.在循环体中，可以使程序转主控制权，以便让操作系统处理其他的事件的语句是 _。（分数：2.00）A.Exit DoB.DoEventsC.EndD.Unload10.在窗体上画一个名称为 Command1 的命令按钮和两个名称分别为 Text1、Text2 的文本框，然后编写如下事件过程： Private Sub Command1_Click() n=Text1.Text Select Case n Case 1 To 20 x=10 Case 2,4,6 x=20 Case Is10 x=30 Case 10 x=40 End Sel

5、ect Text2.Text=x End Sub 程序运行后，如果在文本框 Text1 中输入 10，然后单击命令按钮，则在 Text2 中显示的内容是 _。（分数：2.00）A.10B.20C.30D.4011.以下能判断是否到达文件尾的函数是 _。（分数：2.00）A.BOFB.LOCC.LOFD.EOF12.需求分析阶段的任务是确定 _。（分数：2.00）A.软件开发方法B.软件开发工具C.软件开发费用D.软件系统功能13.设 a=10，b=5，c=1，执行语句 Print abc 后，窗体上显示的是 _。（分数：2.00）A.TrueB.FalseC.1D.出错信息14.执行语句 Op

6、en “Tel.dat“ For Random As# 1 Len=50 后，对文件 Tel.dat 中的数据能够执行的操作是 _。（分数：2.00）A.只能写，不能读B.只能读，不能写C.既可以读，也可以写D.不能读，不能写15.在窗体上画个名称为 Text1 的文本框，并编写如下程序： Private Sub Form_Load() Show Text1.Text=“ “ Text1.SetFocus End Sub Private Sub Form_MouseUp(Button As Integer,Shift As Integer,X As Single，Y As Single) Pr

7、int“程序设计” End Sub Private Sub Text1_KeyDown(KeyCode As Integer, Shift As Integer) Print “VisualBasic“； End Sub 程序运行后，如果按 A 键，然后单击窗体，则在窗体上显示的内容是 _。（分数：2.00）A.Visual BasicB.程序设计C.A 程序设计D.Visual Basic 程序设计16.程序运行后，在窗体上单击鼠标，此时窗体不会接收到的事件是 _。（分数：2.00）A.MouseDownB.MouseUpC.LoadD.Click17.设组合框 Combol 中有 3 个项

8、目，则以下能删除最后一项的语句是 _。（分数：2.00）A.ComboRemoveItem TextB.ComboRemoveItem 2C.ComboReanoveItem3D.ComboRemoveItem ComboListcount18.设有以下循环结构 Do 循环体 Loop While条件 则以下叙述中错误的是 _。（分数：2.00）A.若“条件”是一个为 0 的常数，则一次也不执行循环体B.“条件”可以是关系表达式、逻辑表达式或常数C.循环体中可以使用 Exit Do 语句D.如果“条件”总是为 True，则不停地执行循环体19.在窗体上画个名称为 Command1 的命令按钮，

9、然后编写如下事件过程： Private Sub Command1_Click_() For n=1 To 20 If n Mod 30 Then m=m+n/3 Next n print n End Sub 程序运行后，如果单击命令按钮，则窗体上显示的内容是 _。（分数：2.00）A.15B.18C.21D.2420.在单链表中，增头结点的目的是 _。（分数：2.00）A.方便运算的实现B.使单链表至少有一个结点C.标识表结点中首结点的位置D.说明单链表是线性表的链式存储实现21.数据处理的最小单位是 _。（分数：2.00）A.数据B.数据元素C.数据项D.数据结构22.在窗体上画一今名称为

10、Command1 的命令按钮，然后编写如下代码： Option Base 1 Private Sub Command1_Click() d=0 c=10 x=Array(10，12，21，32，24) For i=1 To 5 If x(i)c Then d=d+x(i) c=x(i) Else d=d-c End If Next I Print d End Sub 程序运行后，如果单击命令按钮，则窗体上输出的内容为 _。（分数：2.00）A.89B.99C.23D.7723.单个用户使用的数据视图的描述称为 _。（分数：2.00）A.外模式B.概念模式C.内模式D.逻辑模式24.往窗体 Fo

11、rm1 上励口个列表框控件 List1，并编写如下代码： Private Sub Form_Load() For i=0 To 6 List1.AddItem i Next i End Sub 为了在程序运行时，按住 Ctrl 键单击列表中的项目可以选中多个项目，可以设置 List1 的属性 _。（分数：2.00）A.List1.ListB.List1.ListIndexC.List1.MultiSelectD.List1.Text25.在窗体上画一个名称为 Command1 的命令按钮，然后编写如下事件过程： Private Sub Command1_Click() Dim num As I

12、nteger num=1 Do UntiL num6 Print num； num=num+2.4 Loop End Sub 程序运行后，单击命令按钮，则窗体上显示的内容是 _。（分数：2.00）A.13.45.8B.1 3 5C.1 4 7D.无数据输出26.以下有关数组定义的语句序列中，错误的是 _。（分数：2.00）A.Static arr1(3) arr1(1)=100 arr1(2)=“Hello“ arr1(3)=12345B.Dim arr2()As Integer Dim size As Integer Private Sub Command2_Click() size=Inp

13、ut Box(“输入:“) ReDimarr2(siz . End SubC.Option Base 1 Private Sub Command3_Click() Dim arr3(3)As Integer . End SubD.Dim n As Integer Private Sub Command4_Click() Dim arr4(As Integer . End Sub27.以下叙述中错误的是 _。（分数：2.00）A.打开个工程文件时，系统自动装入与该工程有关的窗体、标准模块等文件B.保存 Visual Basic 程序时，应分别保存窗体文件及工程文件C.Visual Basic 应

14、用程序只能以解释方式执行D.事件可以由用户引发，也可以由系统引发28.以下声明语句中错误的是 _。（分数：2.00）A.Constvarl=123B.Dimvar2=ABCC.Dim intSum As IntegerD.Static var3 As Integer29.在窗体上画一今名称为 Command1 的命令按钮，然后编写如下事件过程： Private Sub Command1_Click() Dim a As Integer,s As Integer a=8 s=1 Do s=s+a a=a-1 Loop While a=0 Print s；a End Sub 程序运行后，单击命令按

15、钮，则窗体上显示的内容是 _。（分数：2.00）A.79B.340C.97D.死循环30.以下能正确定义数据类型 TelBook 的代码是 _。（分数：2.00）A.Type TelBook Name As String*10 TelNum As Integer End TypeB.Type TelBook Name As String*10 TelNun As Integer End TelBookC.Type TelBook Name String*10 TelNum Integer End Type TelBookD.TypedefTelBook Name String*10 TelNu

16、m Integer End Type31.在窗体上画两个滚动条，名称分别为 Hscroll1、Hscroll2：六个标签，名称分别为 Label1、Label2、 Latel3、Label4、Label5、Label6，其中标签 Label4Label6 分别显示“A”、“B”、“A*B”等文字信息，标签 Label1、Label2 分别显示其右侧的滚动条的数值，Label3 显示 A*B 的计算结果。当移动滚动框时，在相应的标签中显示滚动条的值。当单击命令按钮“计算”时，对标签 Label1、Label2 中显示的两个值求积，并将结果显示在 Label3 中。以下不能实现上述功能的事件过程是

17、 _。（分数：2.00）A.Private Sub Command1_Click() Label3.Caption=Str(Val(Label1.Captio*Val(Label2.Captio) End SubB.Private Sub Command1_Click() Label3.Caption=HScroll1.Value*HScroll2.Value End SubC.Private Sub Command1_Click() Label3.Caption=HScrolll*HScroll2 End SubD.Private Sub Command1_Click() Label3.Ca

18、ption=HScroll1.Text*HScroll2.Text End Sub32.窗体的 MouseDown 事件过程 Form_MouseDown(Button As Integer,Shift As Integer, XAsSingle,Y As Single)有 4 千参数，关于这些参数，正确的描述是 _。（分数：2.00）A.通过 Button 参数判定当前按下的是哪一个鼠标键B.Shift 参数只能用来确定是否按下 Shift 键C.Shift 参数只能用来确定是否按下 Alt 和 Ctrl 键D.参数 X，Y 用来设置鼠标当前位置的坐标33.为了避免流程图在描述程序逻辑时的灵

19、活性，提出了用方框图来代替传统的程序流程图，通常也把这种图称为 _。（分数：2.00）A.PAD 图B.N-S 图C.结构图D.数据流图34.以下关于焦点的叙述中，错误的是 _。（分数：2.00）A.如果文本框的 TabStop 属性为 False，则不能接收从键盘上输入的数据B.当文本框失去焦点时，触发 LostFocus 事件C.当文本框的 Enabled 属性为 False 时，其 Tab 顺序不起作用D.可以用 TabIndex 属性改变 Tab 顺序35.如果一个工程含有多个窗体及标准漠块，则以下叙述中错误的是 _。（分数：2.00）A.如果工程中含有 SubMain 过程，则程序一

20、定首先执行该过程B.不能把标准模块设置为启动模块C.用 Hide 方法只是隐藏个窗体，不能从内存中清除该窗体D.任何时该最多只有一个窗体是活动窗体二、B填空题/B(总题数：12，分数：24.00)36.算法的基本特征是可行性、确定性、U 【1】 /U和拥有足够的情报。（分数：2.00）填空项 1:_37.顺序存储方法是把逻辑上相邻的结点存储在物理位置U 【2】 /U的存储单元中。（分数：2.00）填空项 1:_38.Jackson 结构化程序设计方法是英国的 M.Jackson 捉出的，它是一种面向U 【3】 /U的设计方法。（分数：2.00）填空项 1:_39.数据库设计分为以下 6 个设计

21、阶段：需求分析阶段、U 【4】 /U、逻辑设计阶段、物理设计阶段、实施阶段、运行和维护阶段。（分数：2.00）填空项 1:_40.数据库保护分为：安全性控制、U 【5】 /U、并发性控制和数据的恢复。（分数：2.00）填空项 1:_41.下列表达式有错误，正确的写法应该是U 【6】 /U。 (a+b) +c/80-5(d+e)（分数：2.00）填空项 1:_42.在窗体上画一个文本框和一个图片框，然后编写如下两个事件过程： Private Sub Form_Click() Text1.Text=“VB 程序设计“ End Sub Private Sub Text1_Change) Pictur

22、e1. Print“VB programming“ End Sub 程序运行后，单击窗体，则在文本框中显示的内容是U 【7】 /U，而在图片框中显示的内容是U 【8】 /U。（分数：2.00）填空项 1:_43.控件数组的名字由U 【9】 /U属性指定，而数组中的每个元素由U 【10】 /U属性指定。（分数：2.00）填空项 1:_44.在窗体上画两个文本框，其名称分别为 Text1 和 Text2，然后编写如下事件过程： Private Sub Form_Load() Show Text1.Text=“ “， Text2.Text=“ “ Text2.SetFocus End Sub Pri

23、vate Sub Text2_KeyDown(KeyCode As Integer,Shift As Integer) Text 1.Text=Text1.Text+Chr(KeyCode-4) End Sub 程序运行后，如果在 Text2 文本框中输入“efghi”，则 Text1 文本框中的内容为U 【11】 /U。（分数：2.00）填空项 1:_45.当用U 【12】 /U方式打开文件时，如果对文件进行写操作，则写入的数据附加到原来文件的后面。（分数：2.00）填空项 1:_46.以下 Prime 过程，用于判断个数是否为素数。素数是只能被 1 和数本身整除的自然数。一个自然数不是素数

24、，就是合数。用被测试的数除以从 2 开始到该数本身的数，如果能除尽(余数为 0)，则为合数；如果都除不尽(余数均不为 0)，则为素数。请在划线处将下面过程补充完整： Function Prime(inputvar As Integer)As Integer For i=2 To inputvar-1 If inputvar Mod i=U 【13】 /UThen GoTocomfinish End If Next i Prime=inpuvar Print“素数“ Go ToU 【14】 /U comfinish： Prime=inputvar Print“合数“ finish: End Fu

25、nction（分数：2.00）填空项 1:_47.在窗体上画一个命令按钮，其名称为 Command1，然后编写如下程序： Function M(x As Integer，y As Integer) M=IIf(xy,x,y) End Function Private Sub Command1_Click() Dim a As Integer, b As Integer a=100 b=200 Print M(a,B) End Sub 程序运行后，单击命令按钮，输出结果为U 【15】 /U。（分数：2.00）填空项 1:_二级 VISUAL+BASIC 笔试 40 答案解析(总分：94.00，做

26、题时间：90 分钟)一、B选择题/B(总题数：35，分数：70.00)1.数据结构中，与所使用的计算机无关的是数据的 _。（分数：2.00）A.存储结构B.物理结构C.逻辑结构 D.物理和存储结构解析：评析 数据结构概念一般包括 3 个方面的内容，数据的逻辑结构、存储结构及数据上的运算集合。数据的逻辑结构只抽象的反映数据元素之间的逻辑关系，而不管它在计算机中的存储表示形式。2.以下叙述中错误的是 _。（分数：2.00）A.在工程资源管理器窗口中只能包含一个工程文件及属于该工程的其他文件 B.以.BAS 为扩展名的文件是标准模块文件C.窗体文件包含该窗体及其控件的属性D.一个工程中可以含有多个标

27、准模块文件解析：评析 Visual Basic 中可以定义工程组，此时的工程资源管理器窗口中可以看到多个工程文件及属于这些工程的其他文件。3.栈底至栈顶依次存放元素 A、B、C、D，在第五个元素 E 入栈前，栈中元素可以出栈，则出栈序列可能是 _。（分数：2.00）A.ABCEDB.DBCEAC.CDABED.DCBEA 解析：评析 栈操作原则上“后进先出”，栈底至栈顶依次存放元素 A、B、C、D，则表明这 4 个元素中D 是最后进栈，B、C 处于中间，A 最早进栈。所以出栈时一定是先出 D，再出 C，最后出 A。4.如果要在菜单中渤口一个分隔线，则应将其 Caption 属性设置为 _。（分

28、数：2.00）A.=B.*C.&D.- 解析：评析 如果要在菜单的两个命令项之间添加一个分隔线，可在标题(Caption)文本框中输入一个连字符“-”。5.下列有关数据库的描述，正确的是 _。（分数：2.00）A.数据库是一个 DBF 文件B.数据库是一个关系C.数据库是一个鲒构化的数据集合 D.数据库是一组文件解析：评析 数据库(Database，简称 DB)是数据的集合，它具有统一的结构形式并存放于统一的存储介质内，是多种应用数据的集成，并可被各个应用程序所共享。数据库中的数据具有“集成”、“共享”之特点。6.软件设计包括软件的结构、数据接口和过程设计，其中软件的过程设计是指 _。（分数：

29、2.00）A.模块间的关系B.系统结构部件转换成软件的过程描述 C.软件层次结构D.软件开发过程解析：评析 软件设计包括软件结构设计、数据设计、接口设计和过程设计。其中结构设计是定义软件系统各主要部件之间的关系；数据设计是将分析时创建的模型转化为数据结构的定义；接口设计是描述软件内部、软件和操作系统之间及软件与人之间如何通信：过程设计则是把系统结构部件转换成软件的过程性描述。7.线性表的顺序存储结构和线性表的链式存储结构分别是 _。（分数：2.00）A.顺序存取的存储结构、顺序存取的存储结构B.随机存取的存储结构、顺序存取的存储结构 C.随机存取的存储结构、随阢存取的存储结构D.任意存取的存储

30、结构、任意存取的存储结构解析：评析 顺序存储结构中，数据元素存放在一组地址连续的存储单元中，每个数据元素地址可通过公式 LOC(ai)=LOC(a1)+(i-1)L 计算得到，从而实现了随机存取。对于链式存储结构，要对某结点进行存取，都得从链的头指针指向的结点开始，这是一种顺序存取的存储结构。8.设有如下程序： Private Sub Command1_Click() Dim sum As Double，x As Double sum=0 n=0 For i=1 To 5 x=n/i n=n+1 sum=sum+x Next End Sub 该程序通过 For 循环计算一个表达式的值，这个表达

31、式是 _。（分数：2.00）A.1+1/2+2/3/4+4/5B.1+1/2+2/3+3/4C.1/2+2/3+3/4+4/5 D.1+1/2+1/3+1/4+1/5解析：评析 本题考查循环语句，其过程如下： i=1 时，x=0/1=0，n=0+1=1，sum=0+0； i=2 时，x=1/2，n=1+1=2，sum=0+1/2； i=3 时，x=2/3，n=2+1=3，sum=0+1/2+2/3； i=4 时，x=3/4，n=3+1=4，sum=0+1/2+2/3+3/4； i=5 时，x=4/5，n=4+1=5，sum=0+1/2+2/3+3/4+4/5。9.在循环体中，可以使程序转主控制

32、权，以便让操作系统处理其他的事件的语句是 _。（分数：2.00）A.Exit DoB.DoEvents C.EndD.Unload解析：评析 DoEvents 的作用是转让控制权，以便让操作系统处理其他的事件。在一些循环次数较多的循环体中使用 DoEvents 可以避免程序“不响应”。10.在窗体上画一个名称为 Command1 的命令按钮和两个名称分别为 Text1、Text2 的文本框，然后编写如下事件过程： Private Sub Command1_Click() n=Text1.Text Select Case n Case 1 To 20 x=10 Case 2,4,6 x=20 C

33、ase Is10 x=30 Case 10 x=40 End Select Text2.Text=x End Sub 程序运行后，如果在文本框 Text1 中输入 10，然后单击命令按钮，则在 Text2 中显示的内容是 _。（分数：2.00）A.10 B.20C.30D.40解析：评析 SelectCase 执行时，首先计算 SelectCase 语句中的测试表达式的值，然后从第一个 Case开始找满足该值的 Case 语句，遇到第一个表达式列表值与测试表达式相匹配的 Case 语句，则执行其后的语句序列，然后跳出 Select Case 结构。而本题第一个语句就满足条件，所以执行第一条语句

34、，结果为x=10。11.以下能判断是否到达文件尾的函数是 _。（分数：2.00）A.BOFB.LOCC.LOFD.EOF 解析：评析 Visual Basic 中，LOC 函数是用来在已打开的文件中指定当前读/写的位置，LOF 函数是用来返回已打开文件的长度，EOF 函数是用来判断是否到达已打开文件的尾部。12.需求分析阶段的任务是确定 _。（分数：2.00）A.软件开发方法B.软件开发工具C.软件开发费用D.软件系统功能 解析：评析 需求分析是软件定义时期的最后一个阶段，它的基本任务就是详细调查现实世界要处理的对象(组织、部门、企业等)，充分了解原系统的工作概况，明确用户的各种需求，然后在此

35、基础上确定新系统的功能。选项 A)软件开发方法是在总体设计阶段完成的任务；选项 B)软件开发工具是在实现阶段需完成的任务；选项 C)软件开发费用是在可行性研究阶段需完成的任务。13.设 a=10，b=5，c=1，执行语句 Print abc 后，窗体上显示的是 _。（分数：2.00）A.TrueB.False C.1D.出错信息解析：评析 该打印语句是分为两步来执行的，先判断 ab，即 105，结果为 True；再判断Truec，即 True1，因为当把逻辑型值转化成数值型时，False 转变成 0，True 转变成-1，即-11，结果为 False。14.执行语句 Open “Tel.dat

36、“ For Random As# 1 Len=50 后，对文件 Tel.dat 中的数据能够执行的操作是 _。（分数：2.00）A.只能写，不能读B.只能读，不能写C.既可以读，也可以写 D.不能读，不能写解析：评析 Visual Basic 访问文件的方式分为三类：有 Input/Output/Append(访问顺序输入/输出文件)、Binary(访问二进制文件)、Random(访问随机存取文件)。如果未指定方式，则以 Random 访问方式打开文件。而以 Random 形式打开的文件是既可以读，也可以写的。15.在窗体上画个名称为 Text1 的文本框，并编写如下程序： Private S

37、ub Form_Load() Show Text1.Text=“ “ Text1.SetFocus End Sub Private Sub Form_MouseUp(Button As Integer,Shift As Integer,X As Single，Y As Single) Print“程序设计” End Sub Private Sub Text1_KeyDown(KeyCode As Integer, Shift As Integer) Print “VisualBasic“； End Sub 程序运行后，如果按 A 键，然后单击窗体，则在窗体上显示的内容是 _。（分数：2.00）

38、A.Visual BasicB.程序设计C.A 程序设计D.Visual Basic 程序设计 解析：评析 因为程序一运行，文本框 Text1 获得焦点，按下 A 键后，执行 Text1_KeyDown 事件，在窗体上显示“Visual Basic”；这时再单击窗体，则触发 Form_MouseUp 事件，在窗体上显示“程序设计”。16.程序运行后，在窗体上单击鼠标，此时窗体不会接收到的事件是 _。（分数：2.00）A.MouseDownB.MouseUpC.LoadD.Click解析：17.设组合框 Combol 中有 3 个项目，则以下能删除最后一项的语句是 _。（分数：2.00）A.Co

39、mboRemoveItem TextB.ComboRemoveItem 2 C.ComboReanoveItem3D.ComboRemoveItem ComboListcount解析：评析 在 ComboBox 控件中，RemoveItem 方法是用来删除控件中的项目的，其表达式为： object.RemoveItem index 其中，0U/UindexU/UComboBox.LiStCount-118.设有以下循环结构 Do 循环体 Loop While条件 则以下叙述中错误的是 _。（分数：2.00）A.若“条件”是一个为 0 的常数，则一次也不执行循环体 B.“条件”可以是关系表达式、

40、逻辑表达式或常数C.循环体中可以使用 Exit Do 语句D.如果“条件”总是为 True，则不停地执行循环体解析：评析 DoLoop While 循环是先执行一次循环体，再判断条件是否为 True，如为 True，则继续执行循环体，如为 False，则结束。所以如果条件是一个为。的常数，即条件为 False，则执行一次循环体后退出。19.在窗体上画个名称为 Command1 的命令按钮，然后编写如下事件过程： Private Sub Command1_Click_() For n=1 To 20 If n Mod 30 Then m=m+n/3 Next n print n End Sub

41、程序运行后，如果单击命令按钮，则窗体上显示的内容是 _。（分数：2.00）A.15B.18C.21 D.24解析：评析 本题考查的是 ForNext 循环语句。ForNext 循环执行时，先将初始值赋给循环变量，判断是否超过终值，若未超过则执行循环体，遇到 Next 语句后，循环变量增加一个步长(默认值为 1)，再判断是否超过终值，若未超过则继续执行循环体，如此重复直到循环变量超过终值，退出循环。本题中的循环变量为 n，步长为 1，当 n=20 时，再执行 Next n，则 n=21，此时 n 大于终值 20，退出循环。20.在单链表中，增头结点的目的是 _。（分数：2.00）A.方便运算的实

42、现 B.使单链表至少有一个结点C.标识表结点中首结点的位置D.说明单链表是线性表的链式存储实现解析：评析 头结点不仅标识了表中首结点的位置，而且根据单链表(包含头结点)的结构，只要掌握了表头，就能够访问整个链表，因此增加头结点目的是为了便于运算的实现。21.数据处理的最小单位是 _。（分数：2.00）A.数据B.数据元素C.数据项 D.数据结构解析：评析 数据处理的最小单位是数据项；由若干数据项组成数据元素；而数据是指能够被计算机识别、存储和加工处理的信息载体；数据结构是指数据之间的相互关系和数据运算。22.在窗体上画一今名称为 Command1 的命令按钮，然后编写如下代码： Option

43、Base 1 Private Sub Command1_Click() d=0 c=10 x=Array(10，12，21，32，24) For i=1 To 5 If x(i)c Then d=d+x(i) c=x(i) Else d=d-c End If Next I Print d End Sub 程序运行后，如果单击命令按钮，则窗体上输出的内容为 _。（分数：2.00）A.89B.99C.23 D.77解析：评析 本题的循环过程如下： i=1 时，x(1)=10，d=-10，c=10； i=2 时，x(2)=12，d=2，c=12； i=3 时，x(3)=21，d=23，c=21； i

44、=4 时，x(4)=32，d=55，c=32； i=5 时，x(5)=24，d=29，c=32；23.单个用户使用的数据视图的描述称为 _。（分数：2.00）A.外模式 B.概念模式C.内模式D.逻辑模式解析：评析 外模式是用户的数据视图，也就是用户所见到的数据模式；全局数据视图的描述称为概念模式，即数据库中全部数据的整体逻辑结构的描述；物理存储数据视图的描述称为内模式，即数据库在物理存储方面的描述：存储模式即为内模式。24.往窗体 Form1 上励口个列表框控件 List1，并编写如下代码： Private Sub Form_Load() For i=0 To 6 List1.AddItem

45、 i Next i End Sub 为了在程序运行时，按住 Ctrl 键单击列表中的项目可以选中多个项目，可以设置 List1 的属性 _。（分数：2.00）A.List1.ListB.List1.ListIndexC.List1.MultiSelect D.List1.Text解析：评析 Load 事件是在窗体被装入工作区时触发的事件。当应用程序启动时，自动执行该事件，所以该事件通常用来在启动应用时对属性和变量进行初始化。而 MouseDown、MouseUp 是鼠标指针在某个对象上按键时激发的，Click 是鼠标单击时激发的。25.在窗体上画一个名称为 Command1 的命令按钮，然后编

46、写如下事件过程： Private Sub Command1_Click() Dim num As Integer num=1 Do UntiL num6 Print num； num=num+2.4 Loop End Sub 程序运行后，单击命令按钮，则窗体上显示的内容是 _。（分数：2.00）A.13.45.8B.1 3 5 C.1 4 7D.无数据输出解析：评析 Do UntilLoop 循环采用的是先判断循环条件后执行循环体的做法。而用 Until 关键字表示当循环条件为 False 时执行循环体，直到条件为 True 时终止循环。 代码中，num 是整型数据，循环体共被执行 3 次。循

47、环体第三次被执行后，num 的值为 7，故循环终止。26.以下有关数组定义的语句序列中，错误的是 _。（分数：2.00）A.Static arr1(3) arr1(1)=100 arr1(2)=“Hello“ arr1(3)=12345B.Dim arr2()As Integer Dim size As Integer Private Sub Command2_Click() size=Input Box(“输入:“) ReDimarr2(siz . End SubC.Option Base 1 Private Sub Command3_Click() Dim arr3(3)As Integer . End SubD.Dim n As Integer Private Sub Command4_Click() Dim arr4(As Integer . End Sub 解析：评析 在数组定义中，定