在窗体上画一个名称为Combol的组合框,然后画两个名称分别为Label1、Label2,标题分别为“城市名称”和空白的标签。程序运行后,在组合框中输入一个新项目并按回车键,如果输入的项目在组合框的列表中不存在,则自动将其添加到组合框的列表中,并在Labe

admin2009-03-16  25

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

Private Sub Combo1_KeyPress(KeyAscii As Integer)
If KeyAscii=13 Then
For i=0 To Combo1.ListCount-1
If Combo1.Text=【  】Then
Label2.Caption="输入项已在组合框中。"
Exit Sub
End If
Next i
Label2.Caption="已成功添加新输入项。"
Combo1.【  】Combo1.Text
End If
End Sub

选项

答案 Combo1.list(i) , AddItem

解析 在ComboBox控件中,AddItem方法是用来向控件中添加项目,list属性用于保存控件中的项目,使用以下形式访问:[对象名].List(列表项序号)。
转载请注明原文地址:https://jikaoti.com/ti/Tdq0FFFM
0

最新回复(0)