ItemData 屬性

全部顯示

ItemData 屬性返回組合框或列表框中指定行的綁定列中的數(shù)據(jù)。Variant 型，只讀。

expression.ItemData(Index)

expression     必需。返回“應(yīng)用于”列表中的一個(gè)對(duì)象的表達(dá)式。

Index     必需 Long 型。組合框或列表框中包含要返回的數(shù)據(jù)的行。組合框和列表框中的行從零開(kāi)始編號(hào)。例如，要返回組合框中的第六行，必須在 rowindex   參數(shù)中指定 5。

說(shuō)明

使用 ItemData 屬性可以在組合框或列表框中的項(xiàng)目列表中全面查找。例如，假設(shè)要從列表框中的所有項(xiàng)目中查找特定的項(xiàng)。那么，可以先使用 ListCount 屬性來(lái)確定列表框中的行數(shù)；然后再使用 ItemData 屬性返回每行中綁定列的數(shù)據(jù)。

還可以使用 ItemData 屬性只返回列表框中選定行的數(shù)據(jù)?？梢苑磸?fù)查找 ItemsSelected 集合以確定列表框中選定了哪些行，然后使用 ItemData 屬性返回這些行中的數(shù)據(jù)。必須將列表框的 MultiSelect 屬性設(shè)為“簡(jiǎn)單”或“展開(kāi)的”，這樣才能一次選擇多行。

提示

Column

示例

下面的示例打印“雇員”窗體中“雇員列表”列表框中每個(gè)選定行的綁定列值。此時(shí)，列表框的 MultiSelect 屬性必須設(shè)為“簡(jiǎn)單”或“展開(kāi)的”。

Sub RowsSelected()

    Dim ctlList As Control, varItem As Variant

    ' Return Control object variable pointing to list box.

    Set ctlList = Forms!Employees!EmployeeList

    ' Enumerate through selected items.

    For Each varItem in ctlList.ItemsSelected

        ' Print value of bound column.

        Debug.Print ctlList.ItemData(varItem)

    Next varItem

End Sub