ComboBox.ListCount プロパティ (Access)

ListCount プロパティを使用して、コンボ ボックスのリスト ボックス部分の行数を決定します。 読み取り/書き込みが可能な Long です。

構文

式。ListCount

式ComboBox オブジェクトを表す変数。

注釈

Microsoft Access では、 ListCount プロパティをリスト ボックス内の行数またはコンボ ボックスのリスト ボックス部分に設定します。 ListCount プロパティの値は読み取り専用であり、ユーザーが設定することはできません。

このプロパティは、マクロまたは Visual Basic を使用する場合にのみ使用できます。 また、フォーム ビューとデータシート ビューでのみ値を取得できます。

ListCount プロパティ設定には、コントロールの RowSource プロパティと RowSourceType プロパティによって決まる、コンボ ボックスリストまたはリストボックス内の行の合計数が含まれます。 コントロールがテーブルまたはクエリに基づいている場合 ( RowSourceType プロパティが Table/Query に設定され、 RowSource プロパティが特定のテーブルまたはクエリに設定されている場合) 、ListCount プロパティ設定には、テーブルまたはクエリの結果セット内のレコードの数が含まれます。 RowSourceType プロパティが値リストに設定されている場合、ListCount プロパティの設定には、RowSource プロパティで指定された値リストの結果の行数が含まれます (これは、ColumnCount プロパティによって設定されるリスト ボックスまたはコンボ ボックス リストの値リストと列の数によって異なります)。

ColumnHeads プロパティを [はい] に設定すると、ListCount プロパティによって返される行数に列見出しの行が含まれます。 テーブルまたはクエリに基づくコンボ ボックスとリスト ボックスの場合、列見出しを追加すると、追加の行が追加されます。 値リストに基づくコンボ ボックスとリスト ボックスの場合、列見出しを追加すると、行数は変更されません (値の最初の行は列見出しになります)。

ListCount プロパティと ListRows プロパティを使用して、コンボ ボックスのリスト ボックス部分に表示する行の数を指定します。

例

次の例では、ListCount プロパティを使用して、Customer フォームの CustomerList コンボ ボックスのリスト ボックス部分にある行数を検索します。 次に、" ListRows /リスト行数" プロパティを使用して、表示する行数を指定します。

Public Sub SizeCustomerList() 
 
 Dim ListControl As Control 
 
 Set ListControl = Forms!Customers!CustomerList 
 With ListControl 
 If .ListCount < 8 Then 
 .ListRows = .ListCount 
 Else 
 .ListRows = 8 
 End If 
 End With 
 
End Sub

サポートとフィードバック

Office VBA またはこの説明書に関するご質問やフィードバックがありますか？ サポートの受け方およびフィードバックをお寄せいただく方法のガイダンスについては、Office VBA のサポートおよびフィードバックを参照してください。