DirListBoxとFileListBoxの連携について質問があります。

フォルダを変更した場合にそのフォルダ配下のファイル一覧を表示するようにしているのですが

Private Sub Dir1_Change()
    'フォルダ名が変更されたら、フォルダ名をFile1.Pathに設定
    File1.Path = Dir1.Path
End Sub

通常はこれで問題無いのですが、全てのファイルではなく拡張子が*.txtのみ表示したい時に
   File1.Path = Dir1.Path & "\*.txt"
だとエラーで起こられてしまいます。
FileListBoxではそういった事は出来ないのでしょうか？

> 通常はこれで問題無いのですが、全てのファイルではなく拡張子が*.txtのみ表示したい時に
>    File1.Path = Dir1.Path & "\*.txt"
> だとエラーで起こられてしまいます。
> FileListBoxではそういった事は出来ないのでしょうか？

File1.Pattern = "*.txt" で。
詳しくはMSDNヘルプでお願いします。

> > 通常はこれで問題無いのですが、全てのファイルではなく拡張子が*.txtのみ表示したい時に
> >    File1.Path = Dir1.Path & "\*.txt"
> > だとエラーで起こられてしまいます。
> > FileListBoxではそういった事は出来ないのでしょうか？
>
> File1.Pattern = "*.txt" で。
> 詳しくはMSDNヘルプでお願いします。

無事出来ました。複数選択も「；」で区切ることにより実現できました。
これさん、ありがとうございました。