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

1、二级 VISUAL+BASIC 笔试-380 及答案解析(总分：82.00，做题时间：90 分钟)一、选择题(总题数：35，分数：58.00)1.关于 Move 方法，下列叙述正确的是_。(A) 用来移动窗体和控件，不能改变其大小(B) “对象“是窗体时，移动基准以屏幕左边界和上边界为准(C) Move 方法移动出计时器以外的所有标准控件(D) “对象“是控件时，移动基准以屏幕左边界和上边界为准（分数：2.00）A.B.C.D.2.有关程序代码窗口的说法错误的是A) 在窗口的垂直滚动条的上面，有一个“拆分栏”，利用它可以把窗口分为两个都分，每个窗口显示代码的一部分B) 双击控件设计窗体即可打开

2、程序代码窗口C) 在程序代码的左下角有两个按钮，可以选择全模块壹看或者是过程查看D) 默认情况下，窗体的事件是 Load（分数：1.00）A.B.C.D.3.结构化程序设计主要强调的是_。A) 程序的规模 B) 程序的易读性C) 程序的执行效率 D) 程序的可移植性（分数：2.00）A.B.C.D.4.下述不属于概念模型应具备的性质的是( )。A) 有丰富的语义表达能力 B) 易于交流和理解C) 易于变动 D) 在计算机中实现的效率高（分数：1.00）A.B.C.D.5.窗体上有 1 个名为 List1 的列表框，其中已经输入了若干个项目(如图所示)；还有 2 个文本框，名称分别为 Text1

3、、Text2，1 个名称为 Command1 的命令按钮，并有以下程序：（分数：2.00）A.B.C.D.6.在窗体上画一个名称为 Command1 的命令按钮，然后编写如下事件过程：Private Sub Command1_Click()Dim x As Integer, y As Integerx = 6: y = 7Doy = y - xDebug. Print y;x=x+1Loop While x= 0Print y; xEnd Sub程序运行后，单击命令按钮，则窗体上显示的内容是A) 7 9 B) 34 0 C) 1 7 D) 死笔循环（分数：1.00）A.B.C.D.7.执行下面

4、的程序后，输出的结果是K=1For j=1 To 4X=X - 1: y=0For k=1 To 4X=X + 1: y=y + 1Next kNext jPrint X；yA) 1 4 B) 13 4C) 12 8 D) 20 6（分数：1.00）A.B.C.D.8.如果想让名为 MenuItem1 的菜单项在运行时变灰显示，则应执行( )语句。A) MenuItem1Enabled=True B) MenuItem1Checked=TrueC) MenuItem1Enabled=False D) MenuItem1Visible=False（分数：1.00）A.B.C.D.9.对长度为 N

5、 的线性表进行顺序查找，在最坏情况下所需要的比较次数为 _。A) N+1 B) N C) (N+1)/2 D) N/2（分数：1.00）A.B.C.D.10.在窗体上画一个名称为 Command1 的命令按钮，然后编写如下事件过程：Private Sub Command1_Click()Static y As IntegerClsFor i=0 To 2x=x+yy=y+3NextPrint x, yEnd Sub程序运行后，连续二次单击 Command1 按钮后，窗体上显示的是 _。A) 9 9 B) 36 18 C) 30 12 D) 63 27（分数：1.00）A.B.C.D.11.关于

6、 Visual Basic“方法“的概念错误的是A)方法是对象的一部分B)方法是预先定义好的操作C)方法是对事件的响应D)方法用于完成某些特定的功能（分数：1.00）A.B.C.D.12.下列程序段的执行结果为( )。a=5For k=1 To 0a=a+kNext kPrint k; aA-1 6 B-1 16 C1 5 D11 21（分数：2.00）A.B.C.D.13.对全局数据逻辑结构和特征的描述称为_ 。A) 外模式 B) 内模式C) 概念模式 D) 存储模式（分数：2.00）A.B.C.D.14.下面程序计算并输出的是( )。Private Sub Command1_Click()

7、Num=10Sum=0DoSum=Sum+Num*Num*NumNum=Num-1Loop Until Num=0Print SumEnd SubA) 13+23+33+103的值 B) 10!+3!+2!+1!的值C) (1+2+3+10)3的值 D) 10 个 103的和（分数：2.00）A.B.C.D.15.设有如下程序：Private Sub Form_Click()Clsa$=“123456“For i=1 To 6Print Tab(12-i);_Next iEnd Sub程序运行后，单击窗体，要求结果如图所示，则应填入的内容为( )。（分数：2.00）A.B.C.D.16.在窗体

8、上画一个名称为 List1 的列表框，为了对列表框中的每个项目都能进行处理，应使用的循环语句为_。A) For i=0 To List1. ListCount-1NextB) For i=0 To List1. Count-1NextC) For i=1 To List1. ListCountNextD) For i=1 To List1. Count-1Next（分数：2.00）A.B.C.D.17.窗体上有两个名称分别为 Text1、Text2 的文本框，一个名称为 Command1 的命令按钮。运行后的窗体外观如图所示。（分数：1.00）A.B.C.D.18.设有下列二叉树：（分数：1.

9、00）A.B.C.D.19.要将窗体 Form1 标题设为“学习 VB”，以下能正确实现该功能的语句为A) Form1.Name=“学习 VB“ B) Form1.Visible=“学习 VB“C) Form1.caption=“学习 VB“ D) Form1.Show=“学习 VB/（分数：2.00）A.B.C.D.20.用树状结构表示实体之间联系的模型是A)关系模型 B)网状模型 C)层次模型 D)以上 3 个都是（分数：2.00）A.B.C.D.21.按条件 f 对关系 R 进行选择，其关系代数表达式为_。（分数：2.00）A.B.C.D.22.在窗体上画一个通用对话框，其名称为 Com

10、monDialog1，然后画一个命令按钮，并编写如下事件过程：Private Sub Command1_ Click()CommonDialog1. Flags= cd1OFNHideReadOnlyCommonDialog1. Filter=“All Files(*.*)*.*Text Files“x=x+1Loop While x= 0Print y; xEnd Sub程序运行后，单击命令按钮，则窗体上显示的内容是A) 7 9 B) 34 0 C) 1 7 D) 死笔循环（分数：1.00）A.B.C. D.解析：解析 当第一次进入循环体后，y=7-6=1， x=6+1=7，由于“7=0”的

11、条件为假，所以只执行了一次循环就退出循环体。最后打印出 1 和 7。7.执行下面的程序后，输出的结果是K=1For j=1 To 4X=X - 1: y=0For k=1 To 4X=X + 1: y=y + 1Next kNext jPrint X；yA) 1 4 B) 13 4C) 12 8 D) 20 6（分数：1.00）A.B. C.D.解析：解析：本题是一个多重循环语句，是 ForNext 结构的两重迭用，根据“拨皮法”，一层一层分析可知，最后 x=13，y=4。8.如果想让名为 MenuItem1 的菜单项在运行时变灰显示，则应执行( )语句。A) MenuItem1Enabled

12、=True B) MenuItem1Checked=TrueC) MenuItem1Enabled=False D) MenuItem1Visible=False（分数：1.00）A.B.C. D.解析：解析 菜单项的 Checked 属性用来设置菜单项的选中标记，如果它的值为 True 时，将在菜单项名前加一个“”：Enabled 属性用来决定菜单项是否起作用，当它的值为 True 时将起作用，为 False 时将以变灰的方式显示；Visible 属性用来决定菜单项是否可见，当它的值为 True 时，菜单项可见，否则菜单项不可见。9.对长度为 N 的线性表进行顺序查找，在最坏情况下所需要的比

13、较次数为 _。A) N+1 B) N C) (N+1)/2 D) N/2（分数：1.00）A.B. C.D.解析：解析 在进行顺序查找过程中，如果被查的元素是线性表中的最后一个，或者被查元素根本不在线性表中，则为了查找这个元素需要与线性表中所有元素进行比较，这是顺序查找最坏的情况。10.在窗体上画一个名称为 Command1 的命令按钮，然后编写如下事件过程：Private Sub Command1_Click()Static y As IntegerClsFor i=0 To 2x=x+yy=y+3NextPrint x, yEnd Sub程序运行后，连续二次单击 Command1 按钮后，

14、窗体上显示的是 _。A) 9 9 B) 36 18 C) 30 12 D) 63 27（分数：1.00）A.B. C.D.解析：解析 本题考的是 Static 语句。Static 语句：在过程级别中使用，用于声明变量并分配存储空间。在整个代码运行期间都能保留使用Static 语句声明的变量的值。本题中 y 是以 Static 声明的，它的值在离开 Command1_Click 事件后是不会丢失的，而 x 是一个局部变量，它只在过程中有用，离开了过程就不起作用了。点了一次以后，y=9，点了二次以后，当 i=0 时，x+y=0+9=9， y=y+3=9+3=12；当 i=1 时，x=9+12=21

15、，y=12+3=15；当 i=2 时，x=21+15=36，y=15+3=18。11.关于 Visual Basic“方法“的概念错误的是A)方法是对象的一部分B)方法是预先定义好的操作C)方法是对事件的响应D)方法用于完成某些特定的功能（分数：1.00）A.B.C. D.解析：解析：对象是属性、方法和事件的集成，所以选项 A)说法正确；例如 Print 方法是用来输出字符串、变量和表达式的值，也就是完成输出的这一功能，所以选项 D)的说法正确；在执行方法时，不必考虑实现输出的具体步骤，方法的步骤是系统预先规定好的，所以选项 B)说法正确。12.下列程序段的执行结果为( )。a=5For k=

16、1 To 0a=a+kNext kPrint k; aA-1 6 B-1 16 C1 5 D11 21（分数：2.00）A.B.C. D.解析：解析 分析程序，执行到最终 For 循环结束后，k 和 a 的值分别为 1、5，因此选项 C 正确。13.对全局数据逻辑结构和特征的描述称为_ 。A) 外模式 B) 内模式C) 概念模式 D) 存储模式（分数：2.00）A.B.C. D.解析：14.下面程序计算并输出的是( )。Private Sub Command1_Click()Num=10Sum=0DoSum=Sum+Num*Num*NumNum=Num-1Loop Until Num=0Pri

17、nt SumEnd SubA) 13+23+33+103的值 B) 10!+3!+2!+1!的值C) (1+2+3+10)3的值 D) 10 个 103的和（分数：2.00）A. B.C.D.解析：解析 对于 Do 型循环结构，首先看条件判断在循环体的前而还是后面，如果是先判断条件，则有可能一次也不执行循环体；如果是后判断条件，则无论条件是什么，至少执行一次循环体。在 Until 循环中条件为 False 时执行循环体，条件为 Tru 时退出循环；在 While 循环中条件为 True 时执行循环体，条件为 False 时退出循环。本题是一个比较简单的 Do 循环，计算从 1 到 10 的立方

18、和。15.设有如下程序：Private Sub Form_Click()Clsa$=“123456“For i=1 To 6Print Tab(12-i);_Next iEnd Sub程序运行后，单击窗体，要求结果如图所示，则应填入的内容为( )。（分数：2.00）A. B.C.D.解析：解析 字符串截取函数包括左部截取函数(Left)、右部截取函数(Right)和中部截取函数(Mid)。左部截取函数的书写格式为：Left(Str，n)，表示返回字符串“Str”的前 n 个字符；右部截取函数的书写格式为：Right(Str,n)，表示返回字符串“Str”的最后 n 个字符；中部截取函数的书写格

19、式为：Mid(Str,i,n)，表示返回从字符串“Str”的第 i 个字符开始的 n 个字符，i 和 n 都是整型常量。本题中数据输出的特点是输出的每一行都由两部分组成，首先是若干个空格，然后是字符串 a 的一部分，具体来讲就是第 i 行输出 a 的前 i 个字符。16.在窗体上画一个名称为 List1 的列表框，为了对列表框中的每个项目都能进行处理，应使用的循环语句为_。A) For i=0 To List1. ListCount-1NextB) For i=0 To List1. Count-1NextC) For i=1 To List1. ListCountNextD) For i=1

20、 To List1. Count-1Next（分数：2.00）A. B.C.D.解析：解析 ListCount 属性返回控件的列表部分项目的个数。在 ListBox(列表框)中没有 Count 属性。要对列表框中的每个项目都能进行处理，必须要用到 List(Index)属性，而该属性的下标值是从 0 开始的，所以选项 A 是正确的。17.窗体上有两个名称分别为 Text1、Text2 的文本框，一个名称为 Command1 的命令按钮。运行后的窗体外观如图所示。（分数：1.00）A.B.C. D.解析：解析 根据题意，由于是写入，所以只能用 Put#语句。Get#语句表示读入，故 B、D 项不

21、正确。同时应指明 Len=Len(p)，否则系统将以默认的 128 字节写入，故本题应选择 C 项。18.设有下列二叉树：（分数：1.00）A.B.C.D. 解析：解析 二叉树的遍历分为先序、中序、后序三种不同方式。本题要求后序遍历，其遍历顺序应该为：后序遍历左子树一，后序遍历右子树，访问根结点。按照定义，后序遍历序列是 DEBFCA。19.要将窗体 Form1 标题设为“学习 VB”，以下能正确实现该功能的语句为A) Form1.Name=“学习 VB“ B) Form1.Visible=“学习 VB“C) Form1.caption=“学习 VB“ D) Form1.Show=“学习 VB

22、/（分数：2.00）A.B.C. D.解析：解析 没置窗体(Form1)的标题值应使用 Caption 属性，其代码书写为：Form1.Caption=“学习VB“。20.用树状结构表示实体之间联系的模型是A)关系模型 B)网状模型 C)层次模型 D)以上 3 个都是（分数：2.00）A.B.C. D.解析：解析 在数据库系统中，由于采用的数据模型不同，相应的数据库管理系统(DBMS)也不同。目前常用的数据模型有 3 种：层次模型、网状模型和关系模型。在层次模型中，实体之间的联系是用树状结构来表示的，其中实体集(记录型)是树中的结点，而树中各结点之间的连线表示它们之间的关系。因此，本题的正确答

23、案是 C。21.按条件 f 对关系 R 进行选择，其关系代数表达式为_。（分数：2.00）A.B.C. D.解析：22.在窗体上画一个通用对话框，其名称为 CommonDialog1，然后画一个命令按钮，并编写如下事件过程：Private Sub Command1_ Click()CommonDialog1. Flags= cd1OFNHideReadOnlyCommonDialog1. Filter=“All Files(*.*)*.*Text Files“&_“(*.txt)*. txtBatch Files(*.bat)*.bat“CommonDialog1. FilterIndex=2

24、CommonDialog1. ShowOPenMsgBox CommonDialog1. filenameEnd Sub程序运行后，单击命令按钮，将显示一个“打开”对话框，此时在“文件类型”框中显示的是 _。A) All Files(*.*) B) Text Files(*.txt)C) Batch Files(*.bat) D) 不确定（分数：2.00）A.B. C.D.解析：解析 从程序可见 FilterIndex 属性已经设为 2，所以缺省过滤器为*.txt。23.模块独立性是软件模块化所提出的要求，衡量模块独立性的度量标准则是模块的A) 抽象和信息隐蔽 B) 局部化和封装化C) 内聚性

25、和耦合性D) 激活机制和控制方法（分数：1.00）A.B.C. D.解析：解析：模块的独立程序是评价设计好坏的重要度量标准。衡量软件的模块独立性使用耦合性和内聚性两个定性的度量标准。24.在数据管理技术的发展过程中，可实现数据共享的是( )。A) 人工管理阶段 B) 文件系统阶段 C) 数据库系统阶段 D) 系统管理阶段（分数：2.00）A.B.C. D.解析：解析 数据管理经历了三个发展阶段：人工管理阶段、文件系统阶段和数据库系统阶段，其中，数据库系统阶段从整体角度看待和描述数据，数据不再面向某个应用而是面向整个系统，因此，数据可以被多个用户、多个应用共享使用，共享可以大大减少数据冗余，节约

26、存储空间，避免数据的不一致性和不相容性，因此本题答案为 C)。25.最简单的交换排序方法是A) 快速排序 B) 选择排序 C) 堆排序 D) 冒泡排序（分数：1.00）A.B.C.D. 解析：解析 让考生加深对各种排序方法特点的了解。解题要点 冒泡排序是一种最简单的交换类排序方法，它是通过相邻数据元素的交换逐步将线性表变成有序。错解分析 交换排序方法有冒泡排序和快速排序，显然选项 B)和选项 C)错误，冒泡排序比较简单，其算法也容易理解，但快速排序本身较为复杂，且采用了递归调用，其算法理解也稍难。考点链接 插入排序、选择排序、归并排序、基数排序等排序方法的特点。26.下列关于 Sub 过程的叙

27、述正确的是( )。A)一个 Sub 过程必须有一个 Exit Sub 语句B)一个 Sub 过程必须有一个 End Sub 语句C)在 Sub 过程中可以定义一个 Function 过程D)可以用 Goto 语句退出 Sub 过程（分数：2.00）A.B. C.D.解析：解析 每个 Sub 过程必须以 Sub 开始，以 EndSub 结束；Exit Sub 语句使程序立即从一个 Sub 过程中退出，在 Sub 过程中可以使用一个或多个 Exit Sub 语句，也可以没有 Exit Sub 语句，因此选项 A)错误，选项 B)正确。在 Sub 过程中不能嵌套定义 Sub 过程或者 Functio

28、n 过程，不能使用 Goto 语句进入或转出一个 Sub 过程，因此选项 C)、D)说法是错误的。27.设“A=“87654321“”，则表达式 Val(Left(A，4)+Mid(A，4，2)的值为( )。A) 876543 B) 876554C) 8 D) 6（分数：2.00）A.B. C.D.解析：解析 Left(string,length)函数是字符串截取函数。功能是截取某字符串最左边的“length”个字符，这里截取字符串为“8765”。 Val(string)函数用于返回字符串中所含的数值，这里“8765”返回的数值为“8765”。Mid(Str,p,n)函数是字符截取函数，功能是

29、截取从第 p 个字符开始，向后取字符串的n 个“Str”字符串中的字符。这里 Mid(A,4,2)为截取字符串“54”。“+”做字符串连接，这里将“8765”和“54”进行相连接运算。28.在 C 盘当前文件夹下建立一个名为 SDat.txt 的顺序文件。要求用 InputBox 函数输入 5 名学生的学号(StuNo)、姓名(StuName)和英语成绩(StuEng)。则横线处合适的语句是( )。Private Sub Form_Click()Open“C:/SDat.txt“For Output As IFor i=1 To 5StuNo=InputBox(“请输入学号“)StuName=

30、InputBox(“请输入姓名“)StuEndg=Val(InputBox(“请输入英语成绩“)Next iClose #1End SubA)Input#1,StuNo,StuName,StuEndg B)Put#1,StuNo,StuName,StuEndgC)Write#1,StuNo,StuName,StuEndg D)Get#1,StuNo,SmName,StuEndg（分数：2.00）A.B.C. D.解析：解析 顺序文件的读操作使用 Input 语句，写操作使用 Print 或 Write 语句。Write 语句的正确格式为：Write #文件号，表达式表。各表达式之间用逗号隔开。

31、随机文件的写操作使用 Put#语句，读操作使用 Get#语句。29.按照“先进先出”组织数据的数据结构是( )。A) 队列 B) 栈 C) 双向链表 D) 二叉树（分数：2.00）A. B.C.D.解析：解析 队列是一种特殊的线性表，只允许在表的一端插入元素，在表的另一端删除元素，插入元素的一端叫“队尾”，删除元素的一端叫“队头”，先插入的元素先被删除，是按“先进先出”的原则组织数据的。30.下列程序执行后，变量 S 的值为_ 。Dim s As Long，X As Integers=0X=1Do While x10s= s+ xx=x+2LoopPrint sA) 10 B) 25C) 50

32、 D) 100（分数：2.00）A.B. C.D.解析：31.有如下的一个函数过程：Function fn(ByVal num As Long)Dim k As Longk= 1num = Abs(num)do while numk = k * (num Mod 10)num= num/10Loop fn=kEnd Function以下是一个调用该函数的事件过程，在运行该程序后，在输入对话框中输入数字 123，该过程的运行结果是 _。Private Sub Command1_Click()Dim n As LongDim r As Longn = CLng(n)r = fn(n)Print r

33、End SubA) 12 B) 6 C) 3 D) 1（分数：2.00）A.B. C.D.解析：解析 本题的难点在于理解求余和整除运算。当“num=123”时，程序计算过程为“321=6”。32.要设定文本框内的文字内容是否允许修改，应该设置的属性是( )。A) Text B) LockedC) PasswordChar D) Multiline（分数：2.00）A.B. C.D.解析：解析 Locked 属性用来指定文本框是否可以桩编辑；Text 属性用来显示文本框中输入的文本；PasswordChar 属性指定所输入的字符或占位符在 TextBox 控件中是否要显示出来；Multiline

34、 属性指定 TextBox 控件是否能够接受和显示多行文本。33.以下有关数组定义的语句序列中，错误的是_。A) Static arr1(3)Arr1(1)=100arr1(2)=“Hello“arr1(3)=123.45B) Dim arr2()As IntegerDim size As IntegerPrivate Sub Command2_Click()size=InputBox(“输入:“)ReDimarr2(size)End SubC) Option Base 1Private Sub Command3_Click()Dim arr3(3)As IntegerEnd SubD) Di

35、m n As IntegerPrivate Sub Command4_Click()Dim arr4(n)As IntegerEnd Sub（分数：2.00）A.B.C.D. 解析：解析 在数组定义中，定义的数组元素个数不能是变量。而选项 D 中的 n 是一个变量。34.软件开发的结构化生命周期方法将软件生命周期划分成A) 定义、开发、运行维护 B) 设计阶段、编程阶段、测试阶段C) 总体设计、详细设计、编程调试 D) 需求分析、功能定义、系统设计（分数：2.00）A. B.C.D.解析：解析 通常，将软件产品从提出、实现、使用维护到停止使用的过程称为软件生命周期。它可以分为软件定义、软件开发

36、及软件运行维护 3 个阶段。35.以下关于变量类型说明符的使用正确的是 ( )A) Dim a%: a=90 B) Dim a:a2000C) Dim a#：a=“OK“， D) Dim a&：a=True（分数：2.00）A. B.C.D.解析：解析 类型说明符用来表示整型，#用来表示双精度型，&用来表示长整型；故排除 B、C、D 项。A 项中定义 a 为整型数，给它赋一个整型数，故其使用正确。二、填空题(总题数：14，分数：24.00)36.诊断和改正程序中错误的工作通常称为 1。（分数：1.00）填空项 1:_ （正确答案：程序调试）解析：解析 程序调试的任务是诊断和改正程序中的错误。它

37、与软件测试不同，软件测试是尽可能多地发现软件中的错误；先要发现软件的错误，然后借助于一定的调试工具去找出软件错误的具体位置。软件测试贯穿整个软件生命期，调试主要在开发阶段执行。37.已知一棵含有 n 个结点的树中，只有度为 k 的结点和度为 0 的叶子结点，则该树中含有的叶子结点个数为_。（分数：1.00）填空项 1:_ （正确答案：(k-1)n+1)/k）解析：解析 设这棵树中叶子结点数为 n 0，度数为 k 的结点数为 nk，总结点数为 n，则 n=n 0+nk (1)设树的总入度为 m。由于在树中除了根结点外，其余每一个结点都有唯一的一个分支进入，则树的总结点数为n=m+1 (2)又由于

38、树中这 m 个进入分支分别由非叶子结点射出，在这棵树中，只有度为 k 的结点和度为 0 的叶子结点，所有全部都由度为 k 的结点射出，而且射出分支总数与总的进入分支数相等，即m=knk (3)由式(1)、(2)、(3)可以得到 n0=(k-1)n+1)/k。38.软件设计模块化的目的是_。（分数：2.00）填空项 1:_ （正确答案：降低复杂性）解析：解析 考查模块化的概念和意义。解题要点 模块化是指解决一个复杂问题时自顶向下逐层把软件系统划分成若干模块的过程，由此分解来降低复杂性。考点链接 Visual Basic 基硼知识。39.软件结构中各模块之间相互连接关系的一种度量常称为模块的 1。

39、（分数：1.00）填空项 1:_ （正确答案：耦合度/耦合）解析：解析 模块的独立程度可以由两个定性标准度量，这两个标准分别为内聚和耦合。耦合衡量不同模块之间互相依赖(连接)的紧密程度；内聚衡量一个模块内部各个元素彼此结合的紧密程度。40.将控件添加到工具箱中，应先在工具箱的空白处单击右键，在弹出的快捷菜单中选择 1 选项，然后在弹出的对框中选择所需的控件。（分数：2.00）填空项 1:_ （正确答案：部件）解析：41.在程序的空白行处填写适当的语句，完成以下功能：依次自动将列表框 List2 中所有列表项目移入列表框 List1 中，并将移入 List1 中的项目从 List2 中删除。Do

40、 While List2.ListCount_List2. RemoveItem 0Loop（分数：2.00）填空项 1:_ （正确答案：List1.Addltem List2.List(0)）解析：解析 AddItem 方法的一般格式为；object.Addltem Item，Index其中，“Item”用来指定添加到该对象的项目；“Index”用来指定新项目或行在该对象中的位置，第一项为 0。如果所给出的 Index 值有效，则 Item 将放置在 object 中相应的位置。如果省略 Index，当Sorted 属性设置为 True 时，Item 将添加到恰当的排序位置，当 Sorted

41、 属性设置为 False 时，Item 将添加到列表的结尾。分析程序可知，程序是要通过循环来将 List2 中的项逐个添加到 List1 中，但因为是给 List1 添加一项，同时删除 Lisl2 一项，因此添加项的索引号(ListIndcx)始终是第 1 项 0，因此添加项的语句是“List1.Addltem List2.List(0)”。注意：当列表框中的列表项被删除一项时，剩余的列表项会从 0 开始重新排序；在本题中省略Index，则每次都自动添加到列表框尾部。42.有以下程序：Private Sub Form_Activate()Fori=1 to 3x=3For i=i to 2x=

42、x+6NextNextPrint XEnd Sub程序运行后，窗体上显示的结果为_（分数：2.00）填空项 1:_ （正确答案：15）解析：解析 每一次 j 的赋值后，x 都等于 3，所以只用计算最后一层循环。当 j=3，i=1 时，x=3+6=9；i=2 时，x=9+6=15。下列程序的功能是：当 x50 时，y=0.8x；当 50x100 时，y=0.7x；当 x100 时，没有意义。请填空。Private Sub Command1_Click()Dim x AS Singlex=InputBox(“请输入 x 的值!“)_Case Is50y=0.8*xCase 50 To 100y=0

43、.7*K_Print“输入的数据出界!“End SelectPrint x，yEnd Sub（分数：4.00）填空项 1:_ （正确答案：Select Case x）解析：填空项 1:_ （正确答案：Case Eles）解析：43.用户可以用_语句定义自己的数据类型。（分数：2.00）填空项 1:_ （正确答案：Type）解析：解析 用户可以用 Type 语句来定义数据类型，格式是：Type 数据类型名数据类型元素名 As 类型名数据类型元素名 As 类型名EndType其中“数据类型名”是要定义的数据类型的名字，其命名规则和变量的命名规则相同；“数据类型元素名”也遵守相同的规则，且不能是数组

44、名；“类型名”可以是任何基本数据类型，也可以是用户定义的类型。44.算法复杂度主要包括时间复杂度和 1 复杂度。（分数：2.00）填空项 1:_ （正确答案：空间）解析：45.算法的基本特征是可行性、确定性、 1 和拥有足够的情报。（分数：1.00）填空项 1:_ （正确答案：有穷性）解析：解析 算法是指解题方案的准确而完整的描述。它有 4 个基本特征，分别是可行性、确定性、有穷性和拥有足够的情报。46.在窗体上画一个文本框和一个图片框，然后编写如下两个事件过程：Private Sub Form_Click()Text1.Text=“VB 程序设计“End SubPrivate Sub Tex

45、t1_Change()Picturel.Print“VB Programming“End Sub程序运行后，单击窗体，则在文本框中显示的内容是_，而在图片框中显示的内容是_。（分数：1.00）填空项 1:_ （正确答案：VB 程序设计 VB Programming）解析：解析 TextBox 控件中，Text 属性是用来显示文本内容的，而 Change 事件是在 TextBox 控件的Text 内容发生改变时触发。本题中，单击窗体后，把“VB 程序设计”赋值给文本框，同时在图片框中打印出“VB Programming”。47.有如下事件过程：Private Sub Form Active (

46、)Dim Score (1 to 3) As IntegerDim i As IntegerDim t As VariantFori=3 To 1 step-1Score (i) = 2 * iNextFor Each t In ScorePrint tNextEnd Sub程序运行后窗体上显示的值为_。（分数：1.00）填空项 1:_ （正确答案：24 6）解析：解析 本题考查了数组的定义和 For EachNext 语句。题中定义了下标下界为 1 下标上界为 3的 Score 数组，通过 For 循环语句赋值后，再通过 For Each Next 语句在窗体上输出数组中的每个成员。48.数据模型按不同应用层次分成 3 种类型，它们是概念数据模型、 1 和物理数据模型。（分数：2.00）填空项 1:_ （正确答案：逻辑数据模型）解析：