[填空題] 在窗體上畫一個名稱為Combol的組合框，畫兩個名稱分別Label1和Label2及Caption屬性分別為“城市名稱”和空白的標簽。程序運行后，當
2021-07-20
[填空題] 在窗體上畫一個名稱為Combol的組合框，畫兩個名稱分別Label1和Label2及Caption屬性分別為“城市名稱”和空白的標簽。程序運行后，當在組合框中輸入一個新項后按回車鍵(ASCII碼為13)時，如果輸入的項在組合框的列表中不存在，則自動添加到組合框的列表中，并在Label2中給出提示“已成功添加輸入項”如圖所示：如果存在，則在Label2中給出提示“輸入項已在組合框中”。請在 【12】 、 【13】 和 【14】 處將程序補充完整。
Private Sub Combo1 【12】 (Key Ascii As Integer)
If Key Ascii=13 Then
For i=0 TO Comb01.ListCount-1
If Combo1.Text= 【13】 Then
Label2.Caption=“輸入項已在組合框中”
Exit Sub
End If
Next i
Label2.Caption=“已成功添加輸入項”
Combo1. 【14】 Combo1.Text
End If
End Sub
正確答案：[12] KeyPress [13] Comb01.List(i) [14] Addltem
參考解析：當按回車鍵，即觸發(fā)組合框的KeyPress文件，故[12]中填KeyPress。 List屬性返回組合框的表項，可以通過下標來訪問，[13]中填Combo1.list(i)即指組合框中所有表項。 對于[14]，Additem方法為組合框添加表項。
詞條內容僅供參考，如果您需要解決具體問題
（尤其在法律、醫(yī)學等領域），建議您咨詢相關領域專業(yè)人士。