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

Private Sub Combo1_KeyPress(KeyAscii As Integer)

　If KeyAscii=13 Then

　　For i=0 To Combo1.ListCount-1

　　　If Combo1.Text= (10) Then

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

　　　　Exit Sub

　　　End If

　　Next i

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

　　Combo1. (11) Combo1.Text

　End If

End Sub

AddItem