2011年全国计算机二级VB考试真题-.pdf

《2011年全国计算机二级VB考试真题-.pdf》由会员分享，可在线阅读，更多相关《2011年全国计算机二级VB考试真题-.pdf（28页珍藏版）》请在得力文库 - 分享文档赚钱的网站上搜索。

1、2011 年 3 月全国计算机二级VB考试真题2011 全国计算机等级考试二级VB考试真题一、选择题(每小题 2 分，共 70 分)下列各题 A)、B)、C)、D)四个选项中，只有一个选项是正确的。请将正确选项填涂在答题卡相应位置上，答在试卷上不得分。(1)下列叙述中正确的是A)对长度为 n 的有序链表进行查找，最坏情况下需要的比较次数为n B)对长度为 n 的有序链表进行对分查找，最坏情况下需要的比较次数为(n/2)C)对长度为 n 的有序链表进行对分查找，最坏情况下需要的比较次数为(log2n)D)对长度为 n 的有序链表进行对分查找，最坏情况下需要的比较次数为(nlog2n)(2)算法的

2、时间复杂度是指A)算法的执行时间B)算法所处理的数据量C)算法程序中的语司或指令条数D)算法在执行过程中所需要的基本运算次数(3)软件按功能可以分为：应用软件、系统软件和支撑软件(或工具软件)。下面属于系统软件的是A)编辑软件B)操作系统C)教务管理系统D)浏览器(4)软件(程序)调试的任务是A)诊断和改正程序中的错误B)尽可能多地发现程序中的错误C)发现并改正程序中的所有错误D)确定程序中错误的性质(5)数据流程图(DFD图)是A)软件概要设计的工具B)软件详细设计的工具C)结构化方法的需求分析工具D)面向对象方法的需求分析工具(6)软件生命周期可分为定义阶段，开发阶段和维护阶段。详细设计属

3、于A)定义阶段B)开发阶段C)维护阶段D)上述三个阶段(7)数据库管理系统中负责数据模式定义的语言是A)数据定义语言B)数据管理语言C)数据操纵语言D)数据控制语言(8)在学生管理的关系数据库中，存取一个学生信息的数据单位是A)文件B)数据库C)字段D)记录(9)数据库设计中，用E-R 图来描述信息结构但不涉及信息在计算机中的表示，它属于数据库设计的A)需求分析阶段B)逻辑设计一阶段C)概念设计阶段D)物理设计阶段(10)有两个关系 R 和 T 如下：R T A B C A B C a 1 2 c 3 2 b 2 2 d 3 2 c 3 2 d 3 2 则由关系 R得到关系 T 的操作是A)选

4、择B)投影C)交D)并(11)在 Visual Basic集成环境中,可以列出工程中所有模块名称的窗口是_(A)工程资源管理器 (B)窗体设计窗口(C)属性窗口 (D)代码窗口(12)假定编写了如下4 个窗体事件的事件过程,则运行应用程序并显示窗体后,已经执行的事件过程是_(A)Load (B)Click (C)LostFocus (D)KeyPress(13)为了使标签具有 透明 的显示效果,需要设置的属性是_(A)Caption (B)Alignment (C)BackStyle(D)AutoSize(14)下面可以产生20-30(含 20 和 30)的随机整数的表达式是_(A)Int(R

5、nd*10+20)(B)Int(Rnd*11+20)(C)Int(Rnd*20+30)(D)Int(Rnd*30+20)(15)设窗体上有一个名称为HS1的水平滚动条,如果执行了语句:HS1.Value=(HS1.Max*HS1.Min)/2+HS1.Min则:(A)滚动块处于最左端(B)滚动块处于最右端(C)滚动块处于中间位置(D)滚动块处于任何位置(16)窗体上有一个名称为Cb1的组合框,程序运行后,为了输出选中的列表项,应使用的语句是A)Print Cb1.Selected B)Print Cb1.List(Cb1.ListIndex)C)Print Cb1.Selected.Text

6、D)Print Cb1.List(ListIndex)(17)为了在窗体上建立2 组单选按钮,并且当程序运行时,每组都可以有一个单选按钮被选中,则以下做法中正确的是 _ A)把这 2 组单选按钮设置为名称不同的2 个控件数组 B)使 2 组单选按钮的Index 属性分别相同C)使 2 组单选按钮的名称分别相同 D)把 2 组单选按钮分别画到2 个不同的框架中(18)如果一个直线控件在窗体上呈现为一条垂直线,则可以确定的是_ A)它的 Y1、Y2 属性的值相同 B)它的 X1、X2属性的值相等C)它的 X1、Y1 属性的值分别与X2、Y2属性的值相等D)它的 X1、X2 属性的值分别与Y1、Y2

7、属性的值相等(19)设 a=2,b=3,c=4,d=5,则下面语句的输出是_ Print 32*b Or a=c And bc or cd A)False B)1 C)True D)-1(20)窗体 Form1上有一个名称为Command1 的命令按钮,以下对应窗体单击事件的事件过程是_ A)Print Sub Form1_Click().End Sub B)Print Sub Form_Click().End Sub C)Print Sub Command1_Click().End Sub D)Print Sub Command_Click().End Sub(21)默认情况下,下面声明的数

8、组的元素个数是_ Dim a(5,-2 to 2)A)20 B)24 C)25 D)30(22)设有如下程序段 Dim a(10).For Each x In a print x;next x 在上面的程序段中,变量 x 必须是 _ A)整型变量 B)变体型变量 C)动态数组 D)静态数组(23)设有如下函数过程 Private Function Fun(a()as Inteer,b as string)as Integer .End Function 若已有变量声明:Dim x(5)as integer,n as integer,ch as string 则下面正确的过程调用语句是_ A)x

9、(0)=Fun(x,ch)B)n=Fun(n,ch)C)Call Fun x,ch D)n=Fun(x(5),ch)(24)假定用下面的语句打开文件:Open File.txt For Input As#1 则不能正确读文件的语句是A)Input#1,Ch$B)Line Input#1,ch$C)ch$=Input$(5,#1)D)Read#1,ch$(25)下面程序的执行结果是 Private Sub Command1_Click()a=10 For k=1 To 5 Step-1 a=a-k Next k Print a;k End Sub A)-5 6 B)-5 -5 C)10 0 D)

10、10 1(26)设窗体上有一个名为Text1 的文本框和一个名为Comamand1 的命令按钮,并有以下事件过程Private Sub Command1_Click()x!=Val(text1.text)Select Case x Case Is=20 Print 输入错误 Case Is0 Print 20-x Case Is10 print 20 Case Is5 Or x-1 Next End Sub 运行程序,其中 Do循环执行的次数是_ A)15 B)10 C)7 D)3(28)阅读程序 Private Sub Command1_CLIck()Dim arr Dim i as int

11、eger arr=Array(0,1,2,3,4,5,6,7,8,9,10)For i=0 to 2 print arr(7-i);Next End Sub 程序运行后,窗体上显示的是 _ A)8 7 6 B)7 6 5 C)6 5 4 D)5 4 3(29)在窗体上画一个名为Command1 的命令按钮,然后编写以下程序Private Sub Command1_Click()Dim a(10)as integer For k=10 to 1 Step-1 a(k)=20-2*k Next k k=k+7 Print a(k-a(k)End Sub 运行程序后,单击命令按钮,输出结果是 _ A

12、)18 B)12 C)8 D)6 (30)窗体上有一个名为Command1 的命令按钮,并有如下程序:Private Command1_Click()Dim a(10),x%For k=1 to 10 a(k)=Int(Rnd*90+10)x=x+a(k)Mod 2 Next k print x End Sub 程序运行后，单击命令按钮输出结果是 A)10个数中奇数的个数 B)10个数中偶数的个数 C)10个数中奇数的累加和 D)10个数中偶数的累加和(31)窗体上有一个名为Command1 的命令按钮和一个Timer1 的计时器,并有下面的事件过程Private Sub Command1_C

13、lick()Timer1.Enabled=True End Sub Private Sub Form_Load()Timer1.Interval=10 Timer1.Enabled=False End Sub Private Sub Timer1_Timer()Command1.Left=Command1.Left+10 End Sub 程序运行时,单击命令按钮,则产生的结果是 _ A)命令按钮每10 秒向左移动一次B)命令按钮每10 秒向右移动一次C)命令按钮每10 毫秒向左移动一次D)命令按钮每10 毫秒向右移动一次(32)设窗体上有一个名为List1的列表框,并编写下面的事件过程Priv

14、ate Sub List1_Click()Dim ch as String ch=List1.List(List1.ListIndex)List1.RemoveItem List1.ListIndex List1.AddItem ch End Sub 程序运行时,单击一个列表项,则产生的结果是_ A)该列表项被移到列表的最前面B)该列表项被删除C)该列表项被移到列表的最后面D)该列表项被删除后又在原位置插入(33)窗体上有一个名为Command1 的命令按钮,并有如下程序:private Sub Command1_Click()Dim a as integer,b as integer a=8

15、 b=12 Print Fun(a,b);a;b End Sub Private Function Fun(Byval a as Integer,b as integer)As Integer a=a Mod 5 b=b5 Fun=a End Function 程序运行时,单击命令按钮,额输出结果是A)3 3 2 B)3 8 2 C)8 8 12 D)3 8 12(34)为了从当前文件夹中读入文件File.txt,某人编写了下面的程序:Private Sub Command1_Click()Open FIle1.txt For Output As#20 Do While Not EOf(20)

16、Line Input#20,ch$Print ch Loop Close#20 End Sub 程序调试时,发现有错误,下面的修改方案中正确的是_ A)在 Open语句中的文件名前添加路径B)把程序中各处的20 改为 1 C)把 Print ch语句改为 Print#20,ch D)把 Open语句中的 Output 改为 Input(35)以下程序运行后的窗体如图所示,其中组合框的名称是Combo1,已有列表框如图所示:命令按钮的名称是 Command1 Private Sub Command1_Click()if not Check(Combo1.Text)then MsgBox(输入错误

17、)Exit Sub End If For k=0 to Combo1.ListCount-1 if Combo1.Text=Combo1.List(k)Then MsgBox(添加项目失败)Exit Sub End If next k Combo1.AddItem Combo1.Text MsgBox(添加项目成功)Enb Sub Private Function Check(ch as string)as Boolean n=Len(ch)For k=1 to n c$=Ucase(Mid(ch,k,1)if cZ then Check=False Exit Function End Sub

18、 Next k Check=True End Function 程序运行时,如果在组合框的编辑区输入Java,则单击命令按钮后产生的结果是A)显示 输入错误 B)显示 添加项目失败 C)显示 添加项目成功 D)没有任何显示二、填空题（每空2 分,共 30 分）请将每一个空的正确答案写在答题卡【1】【15】序号的横线上，答在试卷上不得分。注意:以命令关键字填空的必须拼写完整。(1)一个队列的初始状态为空。现将元素A,B,C,D,E,F,5,4,3,2,1依次入队，然后再依次退队，则元素退队的顺序为【1】。(2)设某循环队列的容量为50，如果头指针front=45（指向队头元素的前一位置），尾指针

19、rear=10（指向队尾元素），则该循环队列中共有【2】个元素。(3)设二叉树如下：对该二叉树进行后序遍历的结果为【3】。(4)软件是【4】、数据和文档的集合。(5)有一个学生选课的关系，其中学生的关系模式为：学生(学号，姓名，班级，年龄)，课程的关系模式为：课程(课号，课程名，学时)，其中两个关系模式的键分别是学号和课号，则关系模式选课可定义为：选课(学号，【5】，成绩)。(6)在窗体上有1 个名称为 Command1 的命令按钮,并有如下事件过程和函数过程_ Private Sub Command1_Click()Dim p as integer p=m(1)+m(2)+m(3)print

20、 p End Sub Private Function m(n as integer)as integer Static s as integer For k=1 to n s=s+1 Next m=s End Function ABCDEFGH运行程序,单击命令按钮Command1 后的输出结果为_(7)在窗体上画1 个名称为 Command1 的命令按钮,然后编写如下程序:private Sub Command1_Click()Dim m as integer,x as integer Dim flag as Boolean flag=False n=Val(InputBox(请输入任意1

21、 个正整数)Do While not flag a=2 flag=_(7)_ Do While flag And ai then i=i+1 a(i)=_(10)_ End If Loop While ia(j)then Temp=a(i):a(i)=a(j):_(12)_ Next j Next i For i=1 to 10 Print a(i)Next i End Sub(9)窗体上已有名称分别为Drive1、Dir1、File1的驱动器列表框、目录框、和文件列表框,且有 1 个名称为 Text1 的文本框,以下程序的功能是:将指定位置中扩展名为.txt的文件显示在File1中,如果双击

22、File1中的某个文件,则在 Text1 中显示该文件的内容,请填空Private Sub Form_Load()File1.Pattern=_(13)_ End Sub Private Sub Drive1_Change()Dir1.Path=Drive1.Path End Sub Private Sub Dir1_Change()File1.Path=Dir1.Path End Sub Private Sub File1_DblClick()Dim s as string*1 If Right(FIl1.Path,1)=Then f_name=File1.Path+Fil1.FileNam

23、e Else f_name=File1.Path+File1.FileName End if Open f_name _(14)_ as#1 Text1.text=Do While _(15)_ s=Input(1,#1)Text1.text=Text1.text+s Loop Close#1 End Sub 答案：2005 年 9 月全国计算机等级考试二级VB 笔试试卷(部分题目含解析，全部答案在最后)一、选择题（每小题 2 分，共 70 分）从 11 题开始有评析下列各题 A）、B）、C）、D）四个选项中，只有一个选项是正确的。请将正确选项填涂在答题卡相应位置上，答在试卷上不得分。（1）下

24、列叙述中正确的是 _C_ A）程序设计就是编制程序B）程序的测试必须由程序员自己去完成C）程序经调试改错后还应进行再测试D）程序经调试改错后不必进行再测试【1-5】CACDC（2）下列数据结构中，能用二分法进行查找的是_A_ A）顺序存储的有序线性表B）线性链表C）二叉链表D）有序线性链表（3）下列关于栈的描述正确的是_C_ A）在栈中只能插入元素而不能删除元素B）在栈中只能删除元素而不能插入元素C）栈是特殊的线性表，只能在一端插入或删除元素D）栈是特殊的线性表，只能在一端插入元素，而在另一端删除元素（4）下列叙述中正确的是 _ A）一个逻辑数据结构只能有一种存储结构B）数据的逻辑结构属于线性

25、结构，存储结构属于非线性结构C）一个逻辑数据结构可以有多种存储结构，且各种存储结构不影响数据处理的效率D）一个逻辑数据结构可以有多种存储结构，且各种存储结构影响数据处理的效率（5）下列描述中正确的是 _ A）软件工程只是解决软件项目的管理问题B）软件工程主要解决软件产品的生产率问题C）软件工程的主要思想是强调在软件开发过程中需要应用工程化原则D）软件工程只是解决软件开发中的技术问题（6）在软件设计中，不属于过程设计工具的是_ A）PDL(过程设计语言)B）PAD 图C）N-S 图D）DFD 图（7）下列叙述中正确的是 _ A）软件交付使用后还需要进行维护B）软件一旦交付使用就不需要再进行维护C

26、）软件交付使用后其生命周期就结束D）软件维护是指修复程序中被破坏的指令（8）数据库设计的根本目标是要解决_ A）数据共享问题B）数据安全问题C）大量数据存储问题D）简化数据维护（9）设有如下关系表:R S T A B C A B C A B C 1 1 2 3 1 3 1 1 2 2 2 3 2 2 3 3 1 3 则下列操作中正确的是 _ A）TRS B）TRS C）TRS D）TR/S（10）数据库系统的核心是 _ A）数据模型B）数据库管理系统C）数据库D）数据库管理员（11）假定一个 Visual Basic应用程序由一个窗体模块和一个标准模块构成。为了保存该应用程序，以下正确的操作是

27、_ A）只保存窗体模块文件B）分别保存窗体模块、标准模块和工程文件C）只保存窗体模块和标准模块文件D）只保存工程文件考核知识点:(1)VB 应用程序的保存；(2)VB 中常见文件保存的内容；(3)VB 应用程序的构成答案:B 分析：一个 VB应用程序至少包含一个容器工程文件.vbp 和一个 窗体文件.frm，题目告诉我们此应用程序还包括标准模块.bas，所以保存时会依次保存应用程序中所有的 标准模块、窗体模块和工程文件。（12）为了清除窗体上的一个控件，下列正确的操作是_ A）按回车键B）按 Esc键C）选择（单击）要清除的控件，然后按Del 键D）选择（单击）要清除的控件，然后按回车键考核知

28、识点:(1)VB 应用程序界面设计的基本操作:创建、删除、选中、格式设置、属性设置等答案:C 分析：为了清除窗体上的一个控件,选择（单击）要清除的控件，然后按 Del键或者使用剪切操作（13）以下叙述中错误的是 _ A）打开一个工程文件时，系统自动装入与该工程有关的窗体、标准模块等文件B）当程序运行时，双击一个窗体，则触发该窗体的DblClick 事件C）Visual Basic应用程序只能以解释方式执行D）事件可以由用户引发，也可以由系统引发考核知识点:(1)VB 中常见文件保存的内容；(2)事件驱动原理；常见事件的触发时机；(3)VB 应用程序的工作方式答案:C 分析：Visual Bas

29、ic应用程序能以 解释和编译两种方式执行（14）设 a=2,b=3,c=4,d=5,下列表达式的值是 _ Not a=c Or 4*c=b2 And ba+c A）-1 B）1 C）True D）False 考核知识点:(1)表达式的计算：表达式的类型（值）；运算符的使用；运算符的运算优先级Not a=c Or 4*c=b2 And ba+c 答案:D（15）设 a=5，b=10，则执行c=Int(b-a)*Rnd+a)+1 后，c值的范围为 _ A）510 B）69 C）610 D）59-考核知识点:(1)赋值语句的执行；(2)表达式的计算；(3)常见函数的使用；(3)指定范围 a，b 内随

30、机整数的生成公式：Int（b-a+1）*Rnd+a）答案:C 分析：随机整数的生成公式Int（b-a+1）*Rnd+a）产生的是 a，b 区间的随机整数（间隔是 1），此处题目 Int(b-a)*Rnd+a)=Int(b-1)a+1)*Rnd+a)表示产生的是a，b-1 区间的随机整数，Int(b-a)*Rnd+a)+1 表示产生的是 a+1，b区间的随机整数，即 c 值的范围为 6，10（16）在窗体上画一个命令按钮，名称为Command1，然后编写如下事件过程：Private Sub Command1_Click()a$=software and hardware b$=Right(a$,

31、8)c$=Mid(a$,1,8)MsgBox a$,b$,c$,1 End Sub 运行程序，单击命令按钮，则在弹出的信息框的标题栏中显示的是_ A）software and hardware B）software C）hardware D）1 考核知识点:(1)常见函数的使用：Right 和 Mid 函数的使用；MsgBox的调用格式(参数)；答案:C分析：根据课本 MsgBox 的过程调用格式，此处题目中MsgBox a$,b$,c$,1 第一个参数 a$表示提示信息“software and hardware”；此处表示按钮、数量和图标信息第二个参数缺省；第三个参数 b$表示消息框中 标

32、题内容“hardware”（17）在窗体上画一个命令按钮和一个文本框，其名称分别为Command1 和Text1，把文本框的 Text 属性设置为空白，然后编写如下事件过程：Private Sub Command1_Click()a=InputBox(Enter an integer)b=InputBox(Enter an integer)Text1.Text=b+a End Sub 程序运行后，单击命令按钮，如果在输入对话框中分别输入8 和 10，则文本框中显示的内容是 _ A）108 B）18 C）810 D）出错考核知识点:(1)InputBox函数返回值的类型；(2)+与&的功能和区别

33、；(3)常用控件对象常见属性类型答案:A 分析：InputBox 函数默认返回值的类型是 字符串类型，除非按 Esc?键或单击“取消”或“Cancel”按钮，则返回 0 值或空串。+要求两旁的操作数应 均为字符型，才完成 字符串的连接运算，否则作求和运算。&连接符两旁的操作数不管是字符型还是数值型,进行连接操作前系统先将操作数转换成字符型,然后再连接；题目中表达式 b+a 中加号两旁的操作数均为字符型,即完成的是数据 字符串的连接运算，文本框的Text 属性是 字符串类型，与赋值等号右边的表达式类型一致,所以 A选项是答案（18）在窗体上画两个文本框，其名称分别为Text1 和 Text2，然

34、后编写如下程序：Private Sub Form_Load()Show Text1.Text=Text2.Text=Text1.SetFocus End Sub Private Sub Text1_Change()Text2.Text=Mid(Text1.Text,8)End Sub 程序运行后，如果在文本框Text1 中输入 BeijingChina，则在文本框Text2 中显示的内容是 _ A）BeijingChina B）China C）Beijing D）BeijingC 考核知识点:(1)常见事件的触发时机(2)常见字符串函数的功能：Mid 答案:B分析：Mid（x,n1,n2）函数

35、的功能是从字符串x 左边第 n1 个字符开始连续取其中的 n2 个字符组成新字符串返回，若缺省第三个参数n2，表示从字符串 x 左边第 n1 个 字 符 开 始 到 字 符 串 尾 连 续 取 字 符组 成 新 字 符 串 返 回，题 目 中Mid(Text1.Text,8)表示从目前文本框Text1 中的第 8个字符位置开始取字符到末尾，组成新字符串返回。文本框的Change 事件是在文本框 内容（Text）发生改变时触发的，所以在文本框Text1 中每输入一个字符就会触发一次Change事件，所以 B选项是答案（19）在窗体上画一个列表框和一个命令按钮，其名称分别为 List1和 Comm

36、and1，然后编写如下事件过程：Private Sub Form_Load()List1.AddItem Item 1 List1.AddItem Item 2 List1.AddItem Item 3 End Sub Private Sub Command1_Click()List1.List(List1.ListCount)=AAAA End Sub 程序运行后，单击命令按钮，其结果为_ A）把字符串“AAAA”添加到列表框中，但位置不能确定B）把字符串“AAAA”添加到列表框的最后（即“Item 3”的后面）C）把列表框中原有的最后一项改为“AAAA”D）把字符串“AAAA”插入到列表框

37、的最前面（即“Item 1”的前面）考核知识点:(1)列表框常见属性、方法的含义和使用；答案:B分析：语句 List1.List(列表项索引编号)=AAAA 的含义是将指定索引编号列表项内容更改为新的内容 AAAA，若列表项索引编号超过列表框内已有的列表项索引编号，则表示在列表框的最后添加新的列表项（内容为AAAA），此处List1.ListCount=最后列表项索引编号+1，所以 B选项是答案（20）假定有如下事件过程：Private Sub Form_Click()Dim x As Integer,n As Integer x=1 n=0 Do While x 28 x=x*3 n=n+1

38、 Loop Print x,n End Sub 程序运行后，单击窗体，输出结果是_ A）81 4 B）56 3 C）28 1 D）243 5 考核知识点:(1)基本语句流程：赋值，循环；(2)Print方法的功能和格式；答案:A分析：语句 Do While 循环，当循环条件 x=28 结束。Print方法表示在当前窗体上输出信息，注意当输出项之间用 分号分隔 时，输出采用的是 标准格式。具体可以列表分析整个运行过程，确定答案A选项是答案（21）有如下程序：Private Sub Form_Click()Dim Check,Counter Check=True Counter=0 Do Do W

39、hile Counter 20 循环次数x n 0 0 0 1 0 1 3 1 2 9 2 3 27 3 4 81 4 循环次数Check Counter 0 空空True 0 1 1 1 2 2 9 9 10 False 10 Counter=Counter+1 If Counter=10 Then Check=False Exit Do End If Loop Loop Until Check=False Print Counter,Check End Sub 程序运行后，单击窗体，输出结果为_ A）15 0 B）20-1 C）10 True D）10 False 考核知识点:(1)基本语

40、句流程：赋值，分支，循环；(2)循环语句 Do While 与 Do Until的区别(3)Print方法的功能和格式；答案:D分析：语句 Do While 循环，当循环条件 Counter=20结束;语句 Do Until循环，当循环条件Check=False不成立 时执行循环，直到循环条件 Check=False成立结束 循环。Exit Do 表示跳出 最内的一层 Do 循环。Print方法表示在 当前窗体上输出信息，注意当输出项之间用 分号分隔时，输出采用的是 标准格式。具体可以列表分析整个运行过程，确定答案A选项是答案（22）有如下程序：Private Sub Form_Click()

41、Dim i As Integer,sum As Integer sum=0 For i=2 To 10 If i Mod 2 0 And i Mod 3=0 Then sum=sum+i End If Next i Print sum End Sub 程序运行后，单击窗体，输出结果为_ A）12 B）30 C）24 D）18 考核知识点:(1)基本语句流程：赋值，分支，循环；(2)Print方法的功能和格式；答案:A分析：语句 For 循环，当循环变量的值 终值时结束，缺省步长，表示步长为 1；Print方法表示在 当前窗体上输出信息。循环次数i sum 0 0 0 2 1 3 2 4 3 3

42、 5 4 6 5 7 6 8 7 9 12 8 10 9 11 具体可以列表分析整个运行过程，确定答案A选项是答案（23）在窗体上画一个名称为Text1 的文本框和一个名称为Command1的命令按钮，然后编写如下事件过程：Private Sub Command1_Click()Dim array1(10,10)As Integer Dim i As Integer,j As Integer For i=1 To 3 For j=2 To 4 array1(i,j)=i+j Next j Next i Text1.Text=array1(2,3)+array1(3,4),将数组元素 array

43、1(2,3)和 array1(3,4)累加的结果显示在文本框中End Sub 程序运行后，单击命令按钮，在文本框中显示的值是_ A）12 B）13 C）14 D）15 考核知识点:(1)数组的基本操作：数组元素的访问（给数组元素赋值，读取数组元素）；(2)For 循环的执行流程（双重循环）；(3)+的功能；(4)常用控件对象常见属性类型答案:A外循环i内循环jArray1(i,j)1 2 Array1(1,2)=3 3 Array1(1,3)=4 4 Array1(1,4)=5 5 2 2 Array1(2,2)=4 3 Array1(2,3)=5 4 Array1(2,4)=6 5 3 2

44、Array1(3,2)=5 3 Array1(3,3)=6 4 Array1(3,4)=7 5 4 外循环i内循环jArray1(i,j)1 1 a1(1,1)=2 a2(1,1)=a1(1,1)+1+1=4 2 a1(1,2)=3 a2(1,2)=a1(1,2)+1+2=6 3 a1(1,3)=4 a2(1,3)=a1(1,3)+1+3=8 4 a1(1,4)=5 a2(1,4)=a1(1,4)+1+4=10 5 2 1 a1(2,1)=3 a2(2,1)=a1(2,1)+2+1=6 2 a1(2,2)=4 a2(2,2)=a1(2,2)+2+2=8 分析：数组操作经常与For 循环配合使用

45、，对二维数组元素的有规律的访问是通过双重 For 循环实现的。具体可以列表分析整个运行过程，确定答案 A选项是答案（24）在窗体上画一个命令按钮，其名称为 Command1，然后编写如下事件过程：Private Sub Command1_Click()Dim a1(4,4),a2(4,4)For i=1 To 4 For j=1 To 4 a1(i,j)=i+j a2(i,j)=a1(i,j)+i+j Next j Next i Print a1(3,3);a2(3,3)End Sub 程序运行后，单击命令按钮，在窗体上输出的是_ A）6 6 B）10 5 C）7 21 D）6 12 考核知识

46、点:(1)数组的基本操作：数组元素的访问（给数组元素赋值，读取数组元素）；(2)For 循环的执行流程（双重循环）；(3)Print方法的功能（注意输出格式）答案:D分析：数组操作经常与 For 循环配合使用，对二维数组元素的有规律的访问是通过双重 For 循环实现的。具体可以列表分析整个运行过程，确定答案 D选项是答案。当然也可以从循环体中找出规律：a1(i,j)=i+j a2(i,j)=a1(i,j)+i+j=2*(i+j)a1(3,3)=3+3=6 a2(3,3)=2*(3+3)=12（25）有如下程序：Option Base 1,注意设置 数组下标 从 1 开始Private Sub

47、Form_Click()Dim arr,Sum Sum=0 arr=Array(1,3,5,7,9,11,13,15,17,19),使用 Array 函数进行数组 arr 整体赋值,前提 arr 定义为变体型变量For i=1 To 10 If arr(i)/3=arr(i)3 Then Sum=Sum+arr(i)End If Next i Print Sum 3 a1(2,3)=5 a2(2,3)=a1(2,3)+2+3=10 4 a1(2,4)=6 a2(2,4)=a1(2,4)+2+4=12 5 3 1 a1(3,1)=4 a2(3,1)=a1(3,1)+3+1=8 2 a1(3,2)

48、=5 a2(3,2)=a1(2,2)+3+2=10 3 a1(3,3)=6 a2(3,3)=a1(2,3)+3+3=124 a1(3,4)=7 a2(3,4)=a1(3,4)+3+4=14 5 End Sub 程序运行后，单击窗体，输出结果为_ A）25 B）26 C）27 D）28 考核知识点:(1)数组的基本操作：Array函数的功能和使用；数组元素的访问（给数组元素赋值，读取数组元素）；(2)For 循环和 If 语句的执行流程；(3)依据已知算法经验，学会分析程序的功能；(4)Print方法的功能（注意输出格式）答案:C分析：(1)综观代码，可以看出是一个累加求和 问题(2)分析 If

49、语句的条件 arr(i)/3=arr(i)3，可以看出累加求和是针对 能被3 整除的数组元素 进行的，因此求和结果是3+9+15=27，答案是 C（26）在窗体上画一个命令按钮，然后编写如下事件过程：Private Sub Command1_Click()Dim a(5)As String For i=1 To 5 a(i)=Chr(Asc(A)+(i-1)Next i For Each b In a Print b;Next End Sub 程序运行后，单击命令按钮，输出结果是_ A）ABCDE B）1 2 3 4 5 C）abcde D）出错信息考核知识点:(1)数组的基本操作：数组元素的

50、访问（给数组元素赋值，读取数组元素）；(2)专门用于访问数组元素的For-Each循环的功能和执行流程；(3)常用 Chr 和 Asc 函数的功能；(4)Print方法的功能（注意输出格式）答案:A分析：(1)Chr(Asc(A)+偏移量 C)返回相对于 A 偏移 C的字符(2)For Each b In a,表示通过 For 循环依次输出 a 数组中的每个Print b;,数组元素（此处用b 表示数组中的元素）Next（27）以下关于函数过程的叙述中，正确的是_ A）如果不指明函数过程参数的类型，则该参数没有数据类型B）函数过程的返回值可以有多个循环i a(i)1 a(1)=Chr(Asc(