![[填空题] 在窗体上画一个名称为Combol的组合框，画两个名称分别为Label1和Label2及Caption，属性分别为“城市名称”和空白的标签。程序运行后，当在组合框中输入一个新项后按回车键(A,第1张](/aiimages/%5B%E5%A1%AB%E7%A9%BA%E9%A2%98%5D+%E5%9C%A8%E7%AA%97%E4%BD%93%E4%B8%8A%E7%94%BB%E4%B8%80%E4%B8%AA%E5%90%8D%E7%A7%B0%E4%B8%BACombol%E7%9A%84%E7%BB%84%E5%90%88%E6%A1%86%EF%BC%8C%E7%94%BB%E4%B8%A4%E4%B8%AA%E5%90%8D%E7%A7%B0%E5%88%86%E5%88%AB%E4%B8%BALabel1%E5%92%8CLabel2%E5%8F%8ACaption%EF%BC%8C%E5%B1%9E%E6%80%A7%E5%88%86%E5%88%AB%E4%B8%BA%E2%80%9C%E5%9F%8E%E5%B8%82%E5%90%8D%E7%A7%B0%E2%80%9D%E5%92%8C%E7%A9%BA%E7%99%BD%E7%9A%84%E6%A0%87%E7%AD%BE%E3%80%82%E7%A8%8B%E5%BA%8F%E8%BF%90%E8%A1%8C%E5%90%8E%EF%BC%8C%E5%BD%93%E5%9C%A8%E7%BB%84%E5%90%88%E6%A1%86%E4%B8%AD%E8%BE%93%E5%85%A5%E4%B8%80%E4%B8%AA%E6%96%B0%E9%A1%B9%E5%90%8E%E6%8C%89%E5%9B%9E%E8%BD%A6%E9%94%AE%28A.png "[填空题] 在窗体上画一个名称为Combol的组合框，画两个名称分别为Label1和Label2及Caption，属性分别为“城市名称”和空白的标签。程序运行后，当在组合框中输入一个新项后按回车键(A,第1张")
[填空题] 在窗体上画一个名称为Combol的组合框，画两个名称分别为Label1和Label2及Caption，属性分别为“城市名称”和空白的标签。程序运行后，当在组合框中输入一个新项后按回车键(ASCII码为13)时，如果输入的项在组合框的列表中不存在，则自动添加到组合框的列表中，并在Label2中给出提示“已成功添加输入项”，如图16-3所示；如果存在，则在Label2中给出提示“输入项已在组合框中”。请在 【11】 、 【12】 和 【13】 处将程序补充完整。
Private Sub Comhel 【11】 (KeyAscii As Integer)
If KeyAseii=13 Then
For i=0 To Combol. ListCount-1
If Combol. Text= 【12】 Then
Label2. Caption="输入项已在组合框中"
Exit Sub
End If
Next i
Label2. Caption="已成功添加输入项"
Combol. 【13】 Combol. Text
End If
End Sub
正确答案：
[11]KeyPress [12]combol. List(i) [13]AddItem解析：[分析]： 当KeyAscii为13时，表示按下回车键若要组合框控件接收一个回车事件，则要使用Combol_KeyPress事件。ListCount属性列出组合框中表项的数量；List属性保存了组合框中所有值的数组；Addltem方法用来在列表框中插入一行文本。
欢迎分享，转载请注明来源：内存溢出
微信扫一扫
支付宝扫一扫
评论列表（0条）