リストボックスのListCountプロパティは、
「列見出し有り、格納データ無しの時は、1である」と出来ないのでしょうか?
①新規作成:Microsoft Access Database
②作成:テーブル→名前を付けて保存:OK。格納データ無し
③作成:空白のフォーム→名前を付けて保存:OK→デザインビュー。非連結フォーム
④デザイン:テキストボックス配置→テキストボックスウィザード:キャンセル。
⑤デザイン:リストボックス配置→リストボックスウィザード:キャンセル。非連結リストボックス
⑥プロパティシート:リストボックス→値集合ソース:テーブル,値集合タイプ:テーブル/クエリ, 列見出し:はい
⑦プロパティシート:テキストボックス→イベント:クリック時
⑧VBAコード:Debug.Print Me.リストボックスオブジェクトの名前.ListCount
⑨フォームビュー、クリック:リストボックス→テキストボックス→リストボックス→テキストボックス→…
⑩VBAイミディエイトウィンドウ:0→0→…→1→1→…
通報 ...
試してみました(ACCESS2013)たしかに謎の挙動をしますね
フォームを開いた後何もせずに(ACCESSも触らずに)ほかの作業をしてしばらくしてからテキストボックスをクリックすると「1」になることもある。
Me.Recalc
やMe.リスト2.Requery
を入れると必ず「0」になる。等の挙動を追加で確認できました
とりあえず、データがないときの
ListCount
の値が重要になるとも思えないのでListCount<2
の判定で処理を組んだらどうでしょうか再現確認、ありがとうございます。
とりあえず、ListCount<2で対応中です。