[填空题] 设窗体上有一个名称为Combo1的组合框，并有以下程序： Private Sub Combo1_KeyPress(KeyAscii As Integer) If (9) =13 Th

[填空题] 设窗体上有一个名称为Combo1的组合框，并有以下程序：

Private Sub Combo1_KeyPress(KeyAscii As Integer)

If (9) =13 Then ’回车符的ASCII码是13

For k=0 To Combo1.ListCount-1

If Combo1.Text=Combo1.List(k) Then

combo1.Text=""

Exit For

End If

Next k

If Combo1.Text＜＞ "" Then

Combo1.AddItem (10)

End If

End If

End Sub

程序的功能是：在组合框的编辑区中输入文本后按回车键，则检查列表中有无与此文本相同的项目，若有，则把编辑区中的文本删除，否则把编辑区中文本添加到列表的尾部，请填空。