在窗体上画一个名称为 Combo1 的组合框,然后画两个名称分别为 Label1 、 Label2 ,标题分别为 " 城市名称 " 和空白的标签。程序运行后,在组合框中输入一个新项目并按回车键,如果输入的项目在组合框的列表中不存在,则自动将其添加到组合框的列表中,并在 Label2 中给出提示 " 已成功添加新输入页。 " ,如图所示。如果输入的项目已存在,则在 Label2 中给出提示 " 输入项已在组合框中。 " 。请填空。
Private Sub Combol_KeyPress(KeyAscii As Integer)
If KeyAscii=13 Then
For i=0 To Combo1.ListCount-1
If Combo1.Text= ______ Then
Label2.Capti_dj=" 输入项已在组合框中。 "
Exit Sub
End If
Next i
Label2.Capti_dj=" 已成功添加新输入项。 "
Combo1.______ Combo1.Text
End If
End Sub
发布于 2022-05-11 10:19:09
登录后免费查看答案
关注者
0
被浏览
11