ファイルから読み込んだ内容を表示させる照会画面で、チェックボックス付きのリストボックス（styleプロパティがチェックボックス）に表示だけさせたいのですが、EnabledプロパティをFalseにすると、リストボックスのスクロールができません。仕方なくEnabledプロパティをTrueにするとスクロールはできますが、チェックボックスをクリックすると、最初の表示結果が変わってしまい、照会画面になりません。
何か良い方法はないでしょうか？

こんなんどうでしょ？

Private Sub List1_ItemCheck(Item As Integer)
    
    With List1
        .Selected(Item) = Not .Selected(Item)
    End With
End Sub

早速のご回答ありがとうございました。
確認するのが遅れて申し訳ありません。
教えて頂いたコードを入れ、実行すると、”実行時エラー'28':スタック領域が不足しています。”
のメッセージがでました。
再帰呼出になっているようでしたので、フラグを持って、イベント発生時の１回目だけ、この
コードを通るようにしたら、回避でき、思うように動きました。