[填空題] 窗體上有一個(gè)組合框，其中已輸入了若干項(xiàng)目。程序運(yùn)行時(shí)，單擊其中一項(xiàng)，即可把該項(xiàng)與最上面的一項(xiàng)交換。例如：?jiǎn)螕魣D5中的“重慶”，則與“北京”交換，得到
2021-07-20
[填空題] 窗體上有一個(gè)組合框，其中已輸入了若干項(xiàng)目。程序運(yùn)行時(shí)，單擊其中一項(xiàng)，即可把該項(xiàng)與最上面的一項(xiàng)交換。例如：?jiǎn)螕魣D5中的“重慶”，則與“北京”交換，得到圖6的結(jié)果。下面是可實(shí)現(xiàn)此功能的程序，請(qǐng)?zhí)羁铡?/p>
Private Sub Combo1_Click()
Dim temp
temp=Combo1.Text
______=Combo1.List(0)
Combo1.List(0)=temp
End Sub
正確答案：Combo1.List(Combo1.ListIndex)
參考解析：本題實(shí)際上就是要通過(guò)交換來(lái)修改組合框的第一項(xiàng)和當(dāng)前選中一項(xiàng)的值，要改變列表框和組合框某選項(xiàng)的值，都應(yīng)該通過(guò)列表框和組合框的List屬性進(jìn)行修改，第一項(xiàng)的值Combo1.List(0)應(yīng)該賦給當(dāng)前選中的一項(xiàng)，而當(dāng)前被選中這一項(xiàng)的下標(biāo)為Combo1.ListIndex，所以第[12]空應(yīng)填寫Combo1.List(Combo1.ListIndex)。
詞條內(nèi)容僅供參考，如果您需要解決具體問(wèn)題
（尤其在法律、醫(yī)學(xué)等領(lǐng)域），建議您咨詢相關(guān)領(lǐng)域?qū)I(yè)人士。