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

名前

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

本文 リストの中身を調べて「◎」という字がないか調べて、その◎という字が見つかったらそのリストを消すのには、どうすればよいのでしょうか？ Dim counter As Integer'カウンター dim A as string="◎" For counter = 0 To 30'リストの行が３０までとして If ListBox1.Items.Item(counter) =A Then ListBox1.Items.Item(counter) = "" End If Next ↑のような感じに書いてみましたが、エラー（追加情報 : 指定された引数は、有効な値の範囲内にありません。）が起こってしまって行き詰っています。 何かいい方法とどのようにしたら調べることができるのか教えてください。 お願いします。