窗体上有一个组合框，其中已输入了若干个项目。程序运行时，单击

问题填空题

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

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

答案

参考答案：Combo1.Text

解析：主要是实现将选中项和最上面的项交换。先将选中项的文本即Combo1.Text放入临时变量temp中，再将最上面选项的文本即Combo1.List(0)赋给Combo1.Text，最后将temp中选中项的文本赋给Combo1.List(0)，此时，Combo1.List(0)是选中项的文本，而Combo1.Text中则是Combo1.List(0)的内容，故交换结束，功能实现。