如何在组合框中的特定位置获取项目？

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集合。它是从零开始的，因此组合框中的第3项将是索引2，您应该从0迭代到ListCount - 1：

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