リストの中身に同じ文字がはいってるか調べるには？ (ID:115186)

名前

ホームページ(ブログ、Twitterなど)のURL (省略可)

本文 'こんな感じとか・・ Dim counter As Integer For counter = ListBox1.Items.Count - 1 To 0 Step -1 If InStr(ListBox1.Items.Item(counter), "◎") <> 0 Then ListBox1.Items.RemoveAt(counter) End If Next