Share via


Control.ItemsSelected 屬性 (Access)

使用 ItemsSelected 屬性可傳回隱藏 ItemsSelected 集合的唯讀參考。 此隱藏的集合可用於存取多選清單方塊控制項中選取資料列的資料。

語法

運算式ItemsSelected

表達 代表 Control 物件的變數。

註解

ItemsSelected 集合是與其他集合不同,因為它是的 變體 而不是物件的集合。 每個 Variant 是一個整數索引參照清單方塊或下拉式方塊中選取的資料列。

擷取資料的清單方塊或下拉式方塊中選取的列與 屬性或 ItemData 屬性一起使用使用 ItemsSelected 集合。 您可以在每個使用 列出 ItemsSelected 集合...]下一個 陳述式。

例如,如果您的表單上有 [ 員工 ] 清單方塊,您可以列出 ItemsSelected 集合,並使用控制項的 ItemData 屬性傳回清單方塊中每個選取資料列的系結資料行值。

若要啟用多個選取的清單方塊中的資料列,將控制項的 MultiSelect 屬性以簡單或延伸。

ItemsSelected集合有兩個屬性:CountItem屬性,而且沒有方法。

範例

下列範例會列印 [連絡人] 表單上 [名稱] 清單方塊中每個選取資料列的系結資料行值。 若要嘗試此範例中,建立清單方塊並將視其 BoundColumn 屬性和其 MultiSelect 屬性設定簡單或延伸。 切換至 [表單檢視],在清單方塊中選取數個數據列,然後執行下列程式碼。

Sub BoundData() 
 Dim frm As Form, ctl As Control 
 Dim varItm As Variant 
 
 Set frm = Forms!Contacts 
 Set ctl = frm!Names 
 For Each varItm In ctl.ItemsSelected 
 Debug.Print ctl.ItemData(varItm) 
 Next varItm 
End Sub

下列範例使用相同的清單方塊控制項,但會列印清單方塊中每個選取資料列的每個資料行值,而非只列印系結資料行中的值。

Sub AllSelectedData() 
 Dim frm As Form, ctl As Control 
 Dim varItm As Variant, intI As Integer 
 
 Set frm = Forms!Contacts 
 Set ctl = frm!Names 
 For Each varItm In ctl.ItemsSelected 
 For intI = 0 To ctl.ColumnCount - 1 
 Debug.Print ctl.Column(intI, varItm) 
 Next intI 
 Debug.Print 
 Next varItm 
End Sub

支援和意見反應

有關於 Office VBA 或這份文件的問題或意見反應嗎? 如需取得支援服務並提供意見反應的相關指導,請參閱 Office VBA 支援與意見反應