Здравствуйте!
Диалог открытия файла. Надпись на кнопке=Имя выделенного файла.
----------------------------------------------------------------------

Подскажите, Как сделать,
Чтобы Надпись на кнопке была равна имени файла,
которого выбираешь в этом диалоговом окне.

Я использую такой код:

Private Sub Кнопка0_Click()
Dim fileName As String
Dim result As Integer
    With Application.FileDialog(3)
    .Title = "Выбор рисунка"
    .Filters.Add "Рисунки PNG", "*.png"
    .FilterIndex = 1
    .AllowMultiSelect = False
    .ButtonName = "Имя файла"
    result = .Show
    If result <> 0 Then
    fileName = Trim(.SelectedItems.Item(1))
    End If
    End With
End Sub

http://www.sql.ru/forum/1179433/dialog-otkrytiya-fayla-nadpis-na-knopke-imya-vydelennogo-fayla