Mostrar todo

Propiedad DialogType

Devuelve una constante de MsoFileDialogType que representa el tipo de cuadro de diálogo que el objeto FileDialog está establecido para mostrar. Es de sólo lectura.

expresión   Requerida. Expresión que devuelve uno de los objetos de la lista Aplicar a.

Ejemplo

El ejemplo siguiente toma un objeto FileDialog de tipo desconocido y ejecuta el método Execute si es un cuadro de diálogo Guardar como o Abrir.

Sub DisplayAndExecuteFileDialog(ByRef fd As FileDialog)

    'Use a With...End With block to reference the FileDialog object.
    With fd
        'If the user presses the action button...
        If .Show = -1 Then

            'Use the DialogType property to determine whether to
            'use the Execute method.
            Select Case .DialogType
                Case msoFileDialogOpen, msoFileDialogSaveAs: .Execute
                'Do nothing otherwise.
                Case Else
            End Select
        'If the user presses Cancel...
        Else
        End If
    End With

End Sub