ファイルを検索し該当個数を調べる

初心者 2007-01-12 05:46:16 No: 97615

お願いします。
C:\DATAに名前が日付のtxtファイルがあります。
この中からファイル名が2006で始まるものを検索し
その個数を調べたいのですが
ファイル数の調べ方がわかりません。
アドバイスをお願いいたします。

Dim MyFile As String

MyFile = Dir("C:\DATA\2006")