回答編集履歴
1
追記
test
CHANGED
@@ -112,7 +112,7 @@
|
|
112
112
|
|
113
113
|
If lstitem.Checked = True Then
|
114
114
|
|
115
|
-
'キー項目で削除
|
115
|
+
'キー項目で削除(サンプルではメッセージ表示のみ)
|
116
116
|
|
117
117
|
MsgBox "Delete " & lstitem.SubItems(1)
|
118
118
|
|
@@ -130,4 +130,8 @@
|
|
130
130
|
|
131
131
|
ListVIewの全ての行をループして、チェック状態を調べ、チェックがついていたら削除キー項目を抜き出しています。
|
132
132
|
|
133
|
+
※サンプルではメッセージボックスでキー情報を表示しているだけですが、ここで取得したキー情報を使って削除処理を実行すればよいと思います。
|
134
|
+
|
135
|
+
|
136
|
+
|
133
137
|
参考になれば幸いです。
|