Cómo controlar botones en un cuadro de diálogo

Los cuadros de diálogo se utilizan habitualmente en la programación para permitir a los usuarios navegar por los archivos. En Microsoft Visual Basic.NET (VB.NET), utilizar un control OpenFileDialog para permitir su búsqueda de un archivo en el disco duro de un ordenador. Utilice la propiedad DialogResult para obtener el resultado de la tecla que se ha pulsado por el usuario en el cuadro de diálogo. Con el resultado de diálogo, se puede controlar el flujo de su programa mediante la ejecución de la sección correcta de código.

Instrucciones

1 Lanzamiento de Microsoft Visual Basic Express y haga clic en "Nuevo proyecto" en el panel izquierdo de la pantalla del ordenador. Haga clic en "Visual Basic" por debajo "Plantillas instaladas" y haga clic en "Aplicación de Windows Forms". Haga clic en Aceptar."

2 Haga doble clic en "botón" en el panel de "caja de herramientas" para agregar un nuevo control de botón al formulario. Haga doble clic en "Button1" para abrir el módulo "Form1.vb". Escriba el siguiente por encima de "Public Class Form1" para declarar el espacio de nombres:

Imports System.IO

3 Escriba lo siguiente para declarar una nueva variable que contendrá los datos del archivo:

Dim myFile como corriente = Nada

4 Escriba lo siguiente para declarar la variable que contendrá el resultado botón de la caja de diálogo:

Dim dialogResult As DialogResult

5 Escribe lo siguiente para inicializar la configuración de diálogo de archivos:

OpenFileDialog1.InitialDirectory = "c:\"

OpenFileDialog1.Filter = "txt (* .txt) | * .txt | Todos los archivos (*. *) | *. *"

6 Escriba el siguiente para mostrar el diálogo de archivo y obtener resultado botón:

dialogResult = OpenFileDialog1.ShowDialog

7 Escriba lo siguiente para crear una instrucción Select Case y comprobar si el usuario hace clic en el botón "Cancelar" "Abrir" o:

Try

Select Case (DialogResult)

Caso es = System.Windows.Forms.DialogResult.OK

myFile = Me.OpenFileDialog1.OpenFile

Si (myFile IsNot ninguno) a continuación

'Insertar código para leer el archivo aquí

Terminara si

Caso es = System.Windows.Forms.DialogResult.Cancel

MessageBox.Show ( "Ha hecho clic en Cancelar.")

End Select

Catch ex As Exception

MessageBox.Show ( "No se puede leer el archivo desde el disco de error original:." Y ex.Message)

Finalmente

Si (myFile IsNot ninguno) a continuación

myFile.close ()

Terminara si

Try End

8 Pulse la tecla "F5" para ejecutar la aplicación y haga clic en "Button1" para ejecutar el código.