窗体如图1所示。要求程序运行时，在文本框Text1中输入一个姓氏，单击“删除”按钮(名称为Command1)，则可删除列表框List1中所有该姓氏的项目。若编写以下程序来实现如此功能：

Private Sub Command l Click（　　）

Dim n％，k％

n=Len(Text1．Text)

For k=0 To List1．ListCount-1

If Left(List1．List(k)，n)=Text1．Text Then

List 1．Removeltem k

End If

Next k

End Sub

在调试时发现，如输入“陈”，可以正确删除所有姓“陈”的项目，但输入“刘”，则只删除了“刘邦”、“刘备”2项，结果如图2所示。这说明程序不能适应所有情况，需要修改。正确的修改方案是把For k=0 To List1．ListCount-1改为（　　）。

在考生文件夹中有工程文件sj3．vbp及其窗体文件sj3．frm，该程序是不完整的。

在窗体上有一个文本框，名称为Text1，一个列表框，名称为List1，一个命令按钮，名称为Command1、标题为“复制”。要求程序运行后，在列表框中自动建立5个列表项，分别为“Temp1”、“Te Tnp2”、“Temp3”、“Temp4”、“Temp5”如果选择列表框中的一项，则单击“复制”按钮时，可以把该项复制到文本框中，如图8—3所示。

注意：请在有“?”的地方填入正确内容，然后删除“?”及代码前的所有注释符(即“'”号)，但不能修改其他部分。存盘时不得改变文件名和文件夹。

本题描述如下：

在名称为Form1的窗体上有一个文本框，名称为Textl，MultiLine属性为True，Scr01lBars属性为2；两个命令按钮，名称分别为Command1和Command2、标题分别为“读人数据”和“计算保存”，运行界面如图7-5所示。要求程序运行后，如果单击“读入数据”按钮，则读入in．txt文件中的50个整数，放入一个数组中(数组下界为1)，同时在文本框中显示出来；如果单击“计算保存”按钮，则先进行升序排列，计算前25个数的和与后25个数的和之差，并把求得的结果在文本框Text2中显示出来，同时把该结果存入考生文件夹中的out．txt文件中。(在号生文件夹下的标准模块mode．bas中的writedata过程可以把结果存入指定的文件。)

注意：文件必须存放在考生文件夹下，窗体文件名为sj5．frm，工程文件名为sj5．vbp，计算结果存入out．txt文件，否则没有成绩。

在考生文件夹下有工程文件sj4．vbp及窗体文件sj4．frm，该程序是不完整的。在窗体上建立一个名称为Command1，标题为“计算”的命令按钮，再建立一个名称为Text1的文本框。运行界面如图6-4所示。要求程序运行后，若单击“计算”按钮，将计算200～350 之间所有素数的和，在文本框中显示结果，同时把结果存人文件out．txt中。(在考生文件夹中有标准模块mode．bas，其中的writedata过程可以把结果存入文件，而isprimenum函数可以判断整数x是否为素数，如果是素数，则函数返回True，否则返回False，考生可以把该模块义件添加到自己的工程中。)

在名称为Form1的窗体上建立两个命令按钮，名称分别为Command1和Command2、标题分别为“显示”和“删除”，一个名称为Pic1的图片框。要求程序运行后，每单击一次“显示”按钮，不使用任何变量而直接在图片框中显示“Picture1”；如果单击“删除”按钮，则清除图片框中的文本，如图6-1所示。

注意：保存时必须存放在考生文件夹下，窗体文件名为sj1．frm，工程文件名为Sj1．vbp。

在窗体上绘制出3个文本框，名称分别为Text1、Text2和Text3。要求程序运行时，焦点位于Text1，当按Tab键时，焦点从Text1越过Text2直接跳到Text3上。本题不得使用任何变量。程序运行时的窗体界面如图2—2所示。

注意：保存时必须存放在考生文件夹下，窗体文件名为sj2．frm，工程文件名为sj2．vbp。

下面是求最大公约数的函数的首部：

Function gcd(ByVal X As Integer，ByVal y As Integer)As Integer

若要输出8、12、16这3个数的最大公约数，下面正确的语句是（　　）。

滚动条可以响应的事件是（　　）。

以下描述中错误的是（　　）。

软件测试的目的是（　　）。

下列关于二叉树的叙述中，正确的是（　　）。