设窗体上有—个名称为Combo1的组合框，并有以下程序：Privale Sub Combol_ KeyPress（KeyAscii As In

（）

A ） Combo1.RemoveItem Combo1.Text

B ） Combo1.RemoveItem4

C ） Combo1.RemoveItem Combo1.ListCount

D ） Combo1.RemoveItem5

A.ombo1.RemoveItem Combo1.Text

B.ombo1.RemoveItem4

C.ombo1.RemoveItem Combo1.ListCount

D.ombo1.RemoveItem5

设在窗体上有1个名称为Combo1的组合框,含有5个项目,要删除最后一项,正确的语句是（）。

A．Combo1.RemoveItem Combo1.Text

B． Combo1.RemoveItem4

C． Combo1.RemoveItem Combo1.ListCount

D． Combo1.RemoveItem5

A.A.Combo1.List（ListCount）

B.B.Combo1.List（Comb01.ListCount-1）

C.C.Combo1.List（ListCount-1）

D.D.Combo1.List（Comb01.ListCount）

A.A.For循环的循环初值i应该从I开始

B.B.语句Comb01.Removeltemi有错误

C.C.语句Comb01.AddIteraComb01.Text有错，Comb01.Text的内容已存在于组合框中

D.D.应把程序倒数第3行中的Ifnag=1改为Ifflag=O

A.Combo1.RemoveItem Combo1.Text

B.Combo1.Removeltem4

C.Combo1.RemoveItem Combo1.ListCount

D.Combo1.RemoveItem5

（7 ）设窗体上有一个名称为 Combol 的组合框，并有以下程序：

Private Sub Combol_KeyPress(KeyAscii As Integer)

If 【 9 】 =13 Then ‘ 回车符的 ASCII 码是 13

For k=0 To Combol.ListCount-1

If Combol.Text= Combol.List(k) Then

Combol.Text= ” ”

Exit For

End If

Next k

If Combol.Text ＜＞ “” Then

Combol.AddItem 【 10 】

End If

End If

End Sub

程序的功能是 ： 在组合框的编辑区中输入文本后按回车键 ， 则检查列表中有无与此文本相同的项目 ， 若有 ，则把编辑区中的文本删除，否则把编辑区中文本添加到列表的尾部。请填空。

为 \" 城市名称 \" 和空白的标签。程序运行后，在组合框中输入一个新项目并按回车键，如果输入的项目在组合框的列表中不存在，则自动将其添加到组合框的列表中，并在 Label2 中给出提示 \" 已成功添加新输入页。 \" ，如图所示。如果输入的项目已存在，则在 Label2 中给出提示 \" 输入项已在组合框中。 \" 。请填空。

Private Sub Combol_KeyPress（KeyAscii As Integer）

If KeyAscii=13 Then

For i=0 To Combo1  ListCount-1

If Combo1  Text= 【 12 】 Then

Label2  Caption=" 输入项已在组合框中。 "

Exit Sub

End If

Next i

Label2  Caption=" 已成功添加新输入项。 "

Combo1 ______ Combo1 Text

End If

End Sub

分别为 “ 城市名称 ” 和空白的标签 。 程序运行后 ， 在组合框中输入一个新项目并按回车键 ， 如果输入的项目在组合框的列表中不存在 ， 则自动将其添加到组合框的列表中 ， 并在 Label2 中给出提示 “ 已成功添加新输入项，如图所示。如果输入的项目已存在，则在 Label2 中给出提示 “ 输入项已在组合中。请填空。

注意：下面出现的“考生文件夹”均为C：\wexam\25160002。

(1) 在名称为Form1的窗体上画一个名称为Label1，标题为“添加项目：”的标签；画一个名称为 Text1的文本框，没有初始内容；画一个名称为Combo1的下拉式组合框，并通过属性窗口输入若干项目 (不少于3个，内容任意)；再画两个命令按钮，名称分别为Command1和Command2，标题分别为“添加”和“统计”。在运行时，向Text1中输入字符，单击“添加”按钮后，则Text1中的内容作为一个列表项被添加到组合框的列表中；单击“统计”按钮，则在窗体上显示组合框中列表项的个数，如图23-3所示。请编写两个命令按钮的Click事件过程。

注意：程序中不得使用变量，也不能使用循环。存盘时必须存放在考生文件夹下，工程文件名为sjt3.vbp，窗体文件名为sjt3.frm。

(2) 在考生文件夹下有一个工程文件sjt4.vbp，其窗体如图23-4所示。该程序用来对在上面文本框中输入的英文字母串(称为“明文”)加密，加密结果(称为“密文”)显示在下面的文本框中。加密的方法是：选中一个单选按钮，单击“加密”按钮后，根据选中的单选按钮后面的数字n，把明文中的每个字母改为它后面的第n个字母(“z”后面的字母认为是“a”，“Z”后面的字母认为是“A”)，如图所示。窗体中已经给出了所有控件和程序，但程序不完整，请去掉程序中的注释符，把程序中的？改为正确的内容。

注意：不能修改程序中的其他部分和控件的属性。最后把修改后的文件按原文件名存盘。