VB６に日々苦しみながら，画像ビューワを作成しています。

フォルダ内にある複数の画像ファイルのなかから，
アンダーバーまでが同じ名前のファイルだけを取り出し，
イメージに表示させるようにしたいのですが，
方法がわからずにいます。

例：「画像」フォルダの中に，以下のファイルがある場合，
１．○○_１２３.jpg
２．×○_２２３.jpg
３．○○_２２２.jpg
４．○×_１３３.jpg

○○とついた，１と３だけ表示させるという感じです。
よろしくお願いいたします。

Dir ("フォルダ名" & "○○_*.jpg")