Как сделать окошко, которое появляется при вызове "Сохранить как..." НА VISUAL BASIC 6.0?

На левой панели, где инструменты - кнопки, чекбоксы, списки, текстовые поля, и т. д. , нужно нажать правой кнопкой мыши и из контекстного меню выбрать пункт Компоненты, а в открывшемся списке найти и поставить галочку на пункте Microsoft Common Dialog Control. Это такой маленький квадратик.
Ставишь его на форму (во время работы программы он не виден, виден только при отладке в VB).
Потом рисуешь на форме кнопку "Сохранить файл" с именем btnSaveFile, и пишешь на нее программу:
Private Sub btnSaveFile_Click()
CommonDialog1.FileName = ""
CommonDialog1.Filter = "Файлы (*.*) |*.*"
CommonDialog1.Action = 2
End Sub

Action может принимать такие значения:
1 - Загрузить файл
2 - Сохранить файл как
3 - Выбрать цвет из палитры (палитра будет, как в Paint)
4 - Установить шрифт
5 - Печать документа

В comdlg32 есть диалоги открытия/сохранения

Привет!

Оговорюсь сразу, я на VB не работаю, я Делфист. Но так как разница там только в базовом языке, то могу в чем то и помочь.

Ваш вопрос можно тольковать двояко, т. е. если вы просто хотите в вашей программе сделать так что пользователь мог сохранять какую-то инфу из проги в файл, то Вам нужен компонет SaveDialog, скорее всего с вкладки Dialogs (не думаю, что в VB другие названия для этого компонента и вкладки) . Кидаете его на форму. Затем в инете ищете примеры как им пользоваться.

Если же Вы хотите сделать клон окна "Сохранить как... " для "нехороших" целей, то тут я вам помочь не могу :)