[填空题] 在窗体上画一个名称为Combo1的组合框，然后画两个名称分别为Label1、Label2，标题分别为"城市名称"和空白的标签。程序运行后，在组合框中输入一个新项目并按E

17 查阅

[填空题] 在窗体上画一个名称为Combo1的组合框，然后画两个名称分别为Label1、Label2，标题分别为"城市名称"和空白的标签。程序运行后，在组合框中输入一个新项目并按Enter键，如果输入的项目在组合框的列表中不存在，则自动将其添加到组合框的列表中，并在Label2中给出提示"已成功添加新输入项。"，如下图所示。如果输入的项目已存在，则在Label2中给出提示"输入项已在组合框中。"。请填空。

Private Sub Combo1_KeyPress(KeyAscii As Integer)

If KeyAscii=13 Then

For i=0 To Combo1.ListCount-1

If Combo1.Text= (7) Then

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

Exit Sub

End If

Next i

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

Combo1. (8) Combo1.Text

End If

End Sub

参考答案:

Addltem

组合框的Ust属性用来列出表项的内容。该属性保存了列表框中所有数组的值，可以通过下标访问数组中的值(下标从0开始)，其格式为：[组合框.] List(下标)。特别注意的是"下标"相当于索引值，指示着表项中某一项表中内容的位置，第一项的索引值为0，第二项为1，依次类推，这个参数非常重要不可省略。此题循环变量i从0开始循环直至组合框中总的表项数，类似于下标参数。组合框的Addltem方法用于在组合框中插入一行文本，其格式：组合框.AddItem项目字符串[，索引值]。

计算机考试