![[填空题] 窗体上有一个组合框，其中已输入了若干个项目。程序运行时，单击其中一项，即可把该项与最上面的一项交换。例如，单击如下左图中的"重庆"，则与"北京"交换](http://www.mshxw.com/aiimages/31/254006.png "[填空题] 窗体上有一个组合框，其中已输入了若干个项目。程序运行时，单击其中一项，即可把该项与最上面的一项交换。例如，单击如下左图中的\"重庆\"，则与\"北京\"交换")
[填空题] 窗体上有一个组合框，其中已输入了若干个项目。程序运行时，单击其中一项，即可把该项与最上面的一项交换。例如，单击如下左图中的"重庆"，则与"北京"交换，得到右图的结果。下面是可实现此功能的程序，请填空。
![[填空题] 窗体上有一个组合框，其中已输入了若干个项目。程序运行时，单击其中一项，即可把该项与最上面的一项交换。例如，单击如下左图中的"重庆"，则与"北京"交换](/uploadfile/member/20180926/1537964671.jpg "[填空题] 窗体上有一个组合框，其中已输入了若干个项目。程序运行时，单击其中一项，即可把该项与最上面的一项交换。例如，单击如下左图中的\"重庆\"，则与\"北京\"交换")
Private Sub Combo1_Click()
Dim temp
temp=Combo1.Text
______Combo1.List(0):Combo1.List(0)=temp
End sub
参考答案：
Combo1.List(Combo1.List1ndex)问题解析:
组合框(ComboBox)将文本框与列表框的特性组合在一起，既可在组合框的文本框部分输入信息，也可在列表框部分选择项目。程序运行时可通过List(Index)属性返回或设置指定索引号的列表项，设置列表项的语法为：组合框名，List(Index)=字符串。属性ListIndex用于返回当前在组合框中选择的项目的索引号，Combo1.List(Combo1.ListIndex)即指当前选定的列表项。
