Фильтрация файлов в CommonDialog - VB

Формулировка задачи:

кто знает, можно ли заставить этот самый диалог ,например при открытии файла, фильтровать файлы ? т.е. показывать только файлы нужного типа.

Решение задачи: «Фильтрация файлов в CommonDialog»

textual
                            Листинг программы 
                        

                            On Error GoTo NoFile
CommonDialog.CancelError = True
CommonDialog.Filter = 'Наименование (*.rep)|*.rep'
CommonDialog.ShowOpen
.
.
.
Exit Sub
NoFile:
If Err.Number = 32755 Then Exit Sub
                        