[填空題] 在窗體上畫(huà)一個(gè)名稱(chēng)為Combo1的組合框，然后畫(huà)兩個(gè)名稱(chēng)分別為L(zhǎng)abel1、Label2，標(biāo)題分別為“城市名稱(chēng)”和“空白”的標(biāo)簽。程序運(yùn)行后，在組合框中輸入一個(gè)新項(xiàng)目并按同車(chē)鍵，如果輸入的項(xiàng)目在組合框的列表中不存在，則自動(dòng)將其添加到組合框的列表中，并在Label2中給出提示“已成功添加新輸入項(xiàng)”，如圖所示。如果輸入的項(xiàng)目己存在，則在Label2中給出提示“輸入項(xiàng)已在組合框中?！薄Ｕ?qǐng)?zhí)羁铡?/p>

Private Sub Combo1_KeyPress(KeyAscii As Integer)

If______=13 Then

For i=0 To Combo1.ListCount-1

IfCombo1.Text=______Then

Label2.Caption="輸入項(xiàng)已在組合框中。"

Exit Sub

End If

Next i

Label2.Caption="已成功添加新輸入項(xiàng)"

Combo1.______Combo1.Text

End If

End Sub

KeyAscii；Combo1.list(i)；AddItem

本題考查組合框操作。在組合框的鍵盤(pán)按下事件中，如果按下了回車(chē)鍵，也就是KeyAscii的值為13時(shí)，開(kāi)始掃描整個(gè)組合框中現(xiàn)有的列表項(xiàng)信息，如果在組合框的Text屬性輸入的字符串和Combo1.List(i)相同，則不需受加入到組合框中，否則利用AddItem方法加入到組合框中。