Programación de ayuda en Vb
2. Agregue Microsoft Common Dialog Control 6.0 (SP6) en Menú-Proyecto-Partes.
3. Agregue CommonDialog1 y Command1 al formulario.
4. Código del programa:
Subcomando privado 1_Click()
Establezca "CancelError" en Verdadero.
CommonDialog1. CancelError = True
Ir al controlador de errores en caso de error
Establecer indicador
CommonDialog1. Flags = cdlOFNHideReadOnly
Establecer filtro
CommonDialog1. Filter = "Todos los archivos (*.*)|*.*|Archivos de texto" & amp_
"(*.txt)|*.txt|Archivos por lotes (*.bat)|*.bat ”
Especifique el filtro predeterminado.
CommonDialog1. FilterIndex = 2
Muestra el cuadro de diálogo "Abrir".
CommonDialog1. ShowOpen
Muestra el nombre del archivo seleccionado.
MsgBox CommonDialog1. Nombre de archivo
Export Connector
Manejador de errores:
"El usuario presionó el botón Cancelar.
Export Connector
Conector final