如何在組合框中的特定位置獲取物品？

Question

我需要獲取組合框中特定位置的項目。

這就是我想：

Private Sub PrintItems(Combo As ComboBox) 
    Dim i As Long 
    For i = 1 To Combo.ListCount 
     Debug.Print Combo(i) ' Combo(i) is pseudo-code to get the item 
    Next 
End Sub 

Answer 1

使用List集合。它是從零開始的，所以在組合框中的第三個項目是指數2，你應該從迭代0到ListCount - 1：

For i = 0 To Combo.ListCount - 1 
    Debug.Print Combo.List(i) 
Next