D

[解析] 算法是指解题方案的准确而完整的描述，算法不等于程序，也不等于计算方法，所以A错误。设计算法时不仅要考虑对数据对象的运算和操作，还要考虑算法的控制结构。

B

[解析] 线性结构应满足：有且只有一个根结点与每个结点最多有一个前件，也最多有一个后件，所以B正确。所以有一个以上根结点的数据结构一定是非线性结构，所以A错误。循环链表和双向链表都是线性结构的数据结构。

B

[解析] 根据二叉树的基本性质3：在任意一棵二叉树中，度为0的叶子结点总是比度为2的结点多一个。所以选择B。

A

[解析] 软件生命周期可以分为软件定义、软件开发与软件运行维护三个阶段。主要活动阶段是：可行性研究与计划阶段，需求分析，软件设计，软件实现，软件测试，运行和维护，所以选择A。

C

[解析] 根据总体结构图可以看出该树的深度为3，比如：XY系统——功能2——功能2.1，就是最深的度数的一个表现。

D

[解析] 程序调试的任务是诊断和改正程序中的错误。

A

[解析] 数据字典是在需求分析阶段建立，在数据库设计过程中不断修改、充实和完善的。

D

[解析] 数据库系统的三级模式是概念模式、外模式和内模式，所以选择D。

A

[解析] 自然连接是一种特殊的等值连接，它要求两个关系中进行比较的分量必须是相同的属性组，并且在结果中把重复的属性列去掉，所以根据T中元组可以判断R和S做的是自然连接操作。

A

[解析] 面向对象基本方法的基本概念有对象、类和实例、消息、继承与多态性，所以选择A。

D

[解析] VB中变量的命名规则为：①必须以字母或汉字开头②由字母、汉字、数字或下划线组成③不能使用VB已经占用的关键字。#_1中#是类型符号，变量名中不能用VB保留符号。故不合法。123_a以数字开头不合法。string是VB的关键字，也不合法。故D选项正确。

D

[解析] VB中一个对象可以对应一个或多个事件，事件可由用户或系统触发，触发后执行相应的事件过程。不过，不一定一个对象的所有事件过程都执行，响应哪个事件过程就执行哪个。故D选项错误。

C

[解析] 用Dim可同时定义多个变量，但变量要分别声明其数据类型，如果不声明数据类型，默认是Variant变体型变量。
   本题中，变量X定义时没声明数据类型，所以为Variant型变量，变量Y是整型变量。故C选项正确。

A

[解析] 控件数组中各控件具有相同的名称，而且类型是相同的，但Index属性值不同。数组中各控件响应的事件是相同，用Index属性值来区分每个控件。故A选项正确，B、C、D选项错误。

B

[解析] 工程文件的扩展名为.vbp，故B选项错误。

C

[解析] select Case语句中表达式的形式可以是：常量或变量；若干符合条件的值用“,”隔开；表达式1 to表达式2；Is关系表达式。
   本题中选项A、B和D都符合语法规则。
   选项C中Is关系表达式语法错误，它可以是Is＞0或Is＜20，但不能是组合的0＜Is And Is＜20。故C选项错误。

C

[解析] 首先计算Int(a\3)即Int(52\3)=Int(17)=17，52 MOD 2结果为0。
   再计算IIf(52＞50, 17, 0)，52＞50结果为True，所以IIF函数返回17，则x值为17，故选C。

C

[解析] 本题定义了一个二维数组，第一维的下标-1 to 4，即为-1，0，1，2，3，4(共6行)，第二维下标3，即0to 3(0，1，2，3共4列)，6*4=24二维数组有24个数组元素。故选C。

D

[解析] VB工程的启动对象有：Sub Main过程(在标准模块中定义)、窗体(在多个窗体可选一个窗体启动)，我们可以通过在“工程属性”对话框中设置启动对象来实现，设置哪个就用哪个启动。所以当工程中含有Sub Main过程时，工程执行不一定最先执行该过程，也可以通过窗体启动。故选项D错误。

A

[解析] 随机文件中的每一行是一条记录，每条记录的长度是固定的、相等的，并且都有一个记录号。Open语句中的Len用于指定记录长度，当指定长度小于记录实际长度时将产生错误；大于实际长度时，可以写入，但浪费空间，所以随机文件占据磁盘空间较大，故选项A错误。

B

[解析] 当Frame1的Enabled属性设为False后，框架Frame1变为不可用，它里面放的两个单选按钮也就变为不可用，故A选项错误；
   当Op1.Value为False时，“单程”和“往返”单选按钮都处于未选中状态，故C选项错误；
   Op1.Value的值为0，即为False，语句正确，没有程序错误，故D选项说法错误；
   根据图可只，“单程”单选按钮处于选中状态，Op1.Value的值为True，故B选项正确。

A

[解析] GotFocus和LostFocus是控件获得焦点和失去焦点时触发的两个事件；TabStop是控件的属性；SetFocus方法是控件设置、获得焦点的方法。故选A。

A

[解析] X1、Y1、X2、Y2属性是直线的起点、终点坐标。故选A。

C

[解析] MoseMove事件中的Button表示鼠标所有按键的状态。用0、1、2三个位表示左、右、中键，当按下某个键时，相应位是1，否则是0。三位的二进制数也可转换为十进制数，作为Button的值。如表：

Button参数值	操作
000(十进制0)	未按任何键
001(十进制1)	左键被按下(默认)
010(十进制2)	右键被按下
011(十进制3)	左、右键同时被按下
100(十进制4)	中间键被按下
101(十进制5)	同时按下中间和左键
110(十进制6)	同时按下中间和右键
n1(十进制7)	3个键同时被按下

   本题中当Button值为011或111时，(Button And 3)=3，条件才成立，窗体上显示“检查按键”。这说明只要同时按下鼠标的左右键时，在窗体上就显示“检查按键”。故选C。

B

[解析] 通用对话框的FiherIndex属性为1时表示默认过滤器为第1个文件类型，为2时表示为第2个文件类型。InitDir属性值指定通用对话框的初始目录。FileName属性表示对话框中默认的文件名。ShowSave方法表示打开另存为对话框，执行保存文件的操作。

B

[解析] 窗体的Load事件是把窗体装入工作区的事件，即装入内存，然后窗体才显示出来，使用Hide方法可以使窗体隐藏，但窗体仍在内存中，使用Show方法能使窗体显示出来。当窗体被移动或放大时，或者窗口移动时覆盖了一个窗体时，触发Paint事件。双击窗体时会触发窗体的DblClick事件。

C

[解析] 列表框控件没有Caption属性。

A

[解析] List控件的AddItem方法的语法是：AddItem(String，index)。其中index是列表框中列表项的索引值，第一项的索引值为0。

C

[解析] 框架是一个容器控件，用于将屏幕上的对象分组。框架常用的事件是Click和DblClick，它不接受用户输入，不能显示文本和图形，也不能与图形相连。

B

[解析] 程序对数组元素赋初值为1、2、3、4、5。Ubound函数返回数组可用的最大下标，过程prog的功能是遍历数组对数组中的元素进行排序，由条件a(j)＜a(j+1)可知程序是将数组按从大到小排序。当用数组作为过程的参数时，使用的是“传地址”方式，因此程序输出的是排序后的数组元素值，即5、4、3、2、1。

D

[解析] 根据题中的程序代码可知，ch为输入字符串的大写状态，第一个For循环是依次取出字母，n为取出字母与“A”字符的ASCII码差值，然后再赋给数组count()；第二个For循环是找出数组count()中的最小值，因此，最后窗体上输出的结果为3，即选项D。

C

[解析] 默认情况下，InputBox的返回值是一个字符串，因此程序中a=“123”，b=“456”，b+a=“456”+“123”=“456123”。因此C选项正确。另外，使用字符连接运算符“+”时，如果连接的是字符串和数值，可根据返回值类型判断，若返回值类型为字符串，则它将数值转换成字符串后与另一字符串连接成新字符串返回；若返回值类型为数值，则它要求字符串中只能包含数字，而不能有其他字符，否则报“类型不匹配”的错误。

B

[解析] 程序中For循环的结束有两种情况，一种是循环完指定的次数，一种是达到一定的条件后直接退出循环。由于在循环体中循环变量i的值被修改：i=i+3，因此，每次循环开始时i的取值为0，4，8，i为8时执行i=i+3=11，n=n+1=3，这时i的值大于10，退出For循环，因此For循环执行了3次，即n的值为3。所以在文本框中会显示3。

D

[解析] 程序是三层的For循环，内层的循环次数由外一层的循环变量的值决定。因此程序执行过程如下：
   i=1时，第二层循环执行1次，第三层循环执行3次，n=3
   i=2时，第二层循环执行2次，第三层循环执行3次+2次，n=3+3+2=8
   i=3时，第二层循环执行3次，第三层循环执行3次+2次+1次，n=8+3+2+1=14
   因此答案为D。

B

[解析] s变量用来计数，如果x Mod 3=0即如果能被3整除则计数增加1。程序中x的取值为1、3、5、7、9、11、13、15、17、19、21、23、25、27、29，其中是3的整数倍的数有3、9、15、21、27共5个，因此s的值为5。

A

[解析] 程序的作用是输入的数如果是5的倍数就累加，如果不是就与每次加50或与上次是5的倍数的那个数相累加。因此最终a的值是15+15+35+35=100。

D

[解析] 程序中通过For循环为数组中部分元素赋值，没有赋值的元素值将默认为0。循环中i=2，j=3时，array1(i,j)=i+j，即array1(2,3)=5,i=3,j=4时，array1(3,4)=3+4，即array1(3,4)=7。5+7=12，因此程序文本框中显示值是12。

C

[解析] 程序中Option Base 1语句指定数组下标下限从1开始。程序通过赋初值定义变量x为含有5个元素的数组，元素值依次为10，12，21，32，24。For循环的功能是把这5个元素中大于10且大于前一个元素的值累加到变量d中，如果小于等于10或前一个元素则从变量d减去10或前一个元素的值。因此d=0-10+12+21+32-32=23。

C

[解析] i=1时，执行fun(i)，返回值为-10，i=2时，执行fun(i)，即fun(2)，返回值为2*2-11=-7。因此程序会输出-10和-7。

B

[解析] 过程f中形参变量x没有指定传递方式，则默认按地址传递，会影响实参值。而变量y在按钮事件过程和f过程中都是局部变量只在本过程中起作用。因此执行y=f(x)后，x值在过程中被改变为20，而y被赋为过程返回值40。因此程序窗体上会显示20和40。

[操作步骤]
   步骤1：建立界面，并设置控件的属性。程序中涉及的控件及属性见表1和表2。

表1
控件	标签
属性	Name	Caption	BorderStyle	Visible
设置值	Label1		1	False

表2
控件	文本框		命令按钮
属性	Name	Test	Name	Caption
设置值	Test1		Command1	显示

   步骤2：编写程序代码。
   Pirate Sub Command1_Click()
   Label1. Visible=True
   Label1. Caption=Text1. Text
   Text1. Visible=False
   End Sub
   步骤3：调试并运行程序，关闭程序后按题目要求存盘。
   答案考生文件夹

[解析] 文本框的Text属性用于设置文本框中显示的文本。标签的Caption属性可设置其标题。Visible属性用于设置控件或菜单项在程序运行时是否可见。

[操作步骤]
   步骤1：建立界面，并设置控件的属性。程序中用到的控件及属性见下表。

控件	文本框	水平滚动条
属性	Name	Name	Max	Min	Large Chanae	Small Change
设置值	Text1	HScroll1	2000	500	50	20

   步骤2：编写程序代码。
   Private Sub HScroll1_Change()
   Text1.Height=HScroll1.Value
   Text1.Width=1.2*Text1.Height
   End Sub
   步骤3：调试并运行程序，关闭程序后按题目要求存盘。
   答案考生文件夹

[解析] 通过调整滚动条滑块的位置即可改变其Value属性的值，滚动条的Max和Min属性为滚动条所能表示的最大值和最小值，LargeChange属性用于设置当单击滑块与两侧箭头间区域时Value属性值的改变量，SmallChange属性用于设置当单击滚动条两侧箭头时Value属性值的改变量。当改变滚动条滑块位置后将触发其Change事件。
    文本框的高度和宽度分别由其Height属性值和Width属性值设定。

[操作步骤]
   步骤1：打开本题工程文件，并设置控件的属性。程序中用到的控件及属性见下表。

控件	单选按钮1		单选按钮2		列表框	文本框
属性	Name	Caption	Name	Caption	Name	Name
设置值	Option1	添加项目	Option2	删除项目	List1	Text1

   步骤2：分析并编写程序代码。
   程序提供代码
   Private Sub Form_Click()
   If Option1. Value=True Then
   Text1. Text=InputBox("请输入要添加的项目")
   'List1.AddItem?
   End If
   If Opton2. Value=True Then
   Text1.Text=InputBox("请输入要删除的项目")
   'For i=0 To ?
   'If List1. List(i)=? Then
   'List1. RemoveItem?
   End If
   Next i
   End If
   End Sub
   程序结束
   第1个?处填入：Text1
   第2个?处填入：List1. ListCount-1
   第3个?处填入：Text1. Fext
   第4个?处填入：i
   步骤3：调试并运行程序，关闭程序后按题目要求存盘。
   答案考生文件夹

[解析] 向列表框添加项目使用AddItem方法，删除列表项使用。RemoveItem方法。在“删除项目”单击事件中，For循环语句中逐一判断列表中各项是否与输入内容一致，若一致则删除列表框中该项。

[操作步骤]
   步骤1：打开本题工程文件。
   步骤2：分析并编写程序代码。
   程序提供代码
   Option Base 1
   Private Sub Sort(a()As Integer)
   Dim Start As Integer, Finish As Integer
   Dim i As Integer, j As Integer, t As Integer
   'Start=?(a)
   'Finish=?(a)
   'For i=? To 2 Step-1
   'For j=1 To?
   'If a(j)?a(j+1) Then
   t=a(j+1)
   a(j+1)=a(j)
   a(j)=t
   End If
   Next j
   Next i
   End Sub
   Private Sub Command1_Click()
   Dim arr1
   Dim arr2(4) AsInteger
   arr1=Array(Val(Text1. Text), Val(Text2. Text), Val
   (Text3. Text), Val(Text4. Text))
   For i=1 To 4
   arr2(i)=CInt(arr1(i))
   Next i
   Sort arr2()
   Text1. Text=arr2(1)
   Text2. Text=arr2(2)
   Text3. Text=arr2(3)
   Text4. Text=arr2(4)
   End Sub
   程序结束
   第1个?处填入：LBound
   第2个?处填入：UBound
   第3个?处填入：4
   第4个?处填入：3
   第5个?处填入：＜
   步骤3：调试并运行程序，关闭程序后按题目要求存盘。
   答案考生文件夹

[解析] Array(arglist)函数用于返回一个以arglist参数中用逗号隔开的值为元素的数组。UBound函数用于返回数组某一维的最大下标(上界)，LBound函数用于返回数组某一维的最小下标(下界)。
   在本题Sort过程中，源程序利用一个嵌套的For循环对数组a中的元素按从大到小进行排序。

[操作步骤]
   步骤1：打开本题工程文件，利用菜单设计器，按表3.108中的设置建立菜单项，在窗体Form1中绘制一个文本框，其相关属性值见表1和表2。

表1
标题控件	读入数据	计算并输出	存盘
名称	Read	Cale	Save
内缩符号	0	0	0

表2
控件	文本框
属性	Name	MultiLine	ScrollBars	Text
设置值	Text1	TRUE	2

   步骤2：分析并编写程序代码。
   程序提供代码
   Option Base 1
   Dim Art(100)As Integer
   Sub ReadData()
   Open App. Path &"\"& "datain1.txt" For Input As #1
   For i=1 To 100
   Input #1, Arr(i)
   Next i
   Close #1
   End Sub
   Sub WfiteData(Filename As String, Num As Integer)
   Open App. Path & "\" & Filename For Output As #1
   Pdnt #1. Num
   Close #1
   End Sub
   程序结束
   Private Sub Calc_Cliek()
   Text1. Text=" "
   For i=1 To 100
   If Arr(i)＜50 Then
   Text1. Text=Text1. Text & Arf(i) & Space(5)
   sum=sum+Arr(i)
   End If
   Next i
   Print sum
   End Sub
   Private Sub Read_Click()
   ReadData
   End Sub
   Private Sub Save_Click()
   WriteData "dataout.txt", sum
   End Sub
   步骤3：调试并运行程序，关闭程序后按题目要求存盘。
   答案考生文件夹

[解析] 在“读数”命令的Click事件过程中，通过调用ReadData过程将数据从in5.txt文件读入数组Arr(窗体变量)中；在“计算”命令的Click事件过程中，在For循环语句(循环变量i的初值为1，终值为100)中依次将数组Arr中小于50的元素的值显示在文本框中，并将其值累加到变量sum；在“保存”命令的Click事件过程中，通过调用WriteData过程将Sum的值写入数据文件out5.txt。