填空题

窗体上有一个组合框，其中已输入了若干个项目。程序运行时，单击其中一项，即可把该项与最上面的一项交换。例如单击图1中的“重庆”，则与“北京”交换，得到图2的结果。下面是可实现此功能的程序，请填空。


Private Sub Combo1_Click()
Dim temp
temp=Combo1.Text
______Combo1.List(0)
Combo1.List(0)=temp
End Sub