компонент: Microsoft Common Dialog Control 6.0
Для открытия диалога:
CommonDialog1.ShowOpen 'диалог открытия файла
CommonDialog1.ShowColor 'диалог цвета
CommonDialog1.ShowFont 'диалог шрифта
CommonDialog1.ShowHelp 'диалог помощи
CommonDialog1.ShowSave 'Диалог сохранения
CommonDialog1.ShowPrinter 'диалог печати
После чего он принимает значения:
CommonDialog1.FileName
CommonDialog1.Color
CommonDialog1.FontSize
CommonDialog1.HelpCommand
CommonDialog1.FileName
соответственно.