掲示板システム
ホーム
アクセス解析
カテゴリ
ログアウト
リストボックス複数選択について (ID：112386)
名前
ホームページ(ブログ、Twitterなど)のURL (省略可)
本文
ほかの方はどうやっているのかは知りませんが、 リストボックスが選択される。（=SelectedがTrue） というころで、 Private Sub Command1_Click() '複数の項目を選択した場合の取得 Dim ICount As Integer For ICount = 0 To List1.ListCount - 1 If List1.Selected(ICount) Then Debug.Print List1.List(ICount), ICount + 1 End If Next ICount End Sub ってな具合でどうでしょうか？
←解決時は質問者本人がここをチェックしてください。
戻る
掲示板システム
Copyright 2021 Takeshi Okamoto All Rights Reserved.