填空题

设窗体上有一个名称为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
程序的功能是：在组合框的编辑区中输入文本后按回车键，则检查列表中有无与此文本相同的项目，若有，则把编辑区中的文本删除，否则把编辑区中文本添加到列表的尾部，请填空。