Visual Basic
Ver Más instrucciones
1
abierto VB y crear un nuevo proyecto en el que programar su aplicación de búsqueda con la tecla " Control- N . " Haga clic en el enlace que dice " Formulario de solicitud de Windows" para crear una aplicación que podrás personalizar con código de programa para llevar a cabo una búsqueda de Windows.
2
abierto el diseñador de formularios , haga clic en la opción " Diseño " en el menú "Windows " la partida.
3
Arrastre un control de etiqueta de la caja de herramientas de control , en el fondo de pantalla en el formulario. Haga clic en la etiqueta y seleccionar " Propiedades ", luego escriba " Nombre de carpeta " en el elemento " Texto" de la ventana " Propiedades" .
4
Crear otro sello como lo hizo la primera. Arrastre a una ubicación justo debajo de la primera etiqueta y usar instrucciones paso de 3 para dar la etiqueta de texto "Nombre de archivo ". Estas dos etiquetas pedirle al usuario de su programa para introducir los nombres de carpetas y archivos que el programa usará para hacer la búsqueda de Windows .
5
Arrastre un control de cuadro de texto a la derecha de la segunda etiqueta, y arrastre otra cuadro de texto a la derecha de la primera. El usuario deberá introducir los parámetros de búsqueda ( es decir, carpetas y nombres de archivos ) en estas cajas.
6
Arrastre un control Button desde el cuadro de herramientas hasta el formulario , debajo de los controles existentes. Haga doble clic en el botón para mostrar la ventana para introducir el código de programa para ejecutar la búsqueda .
7
Escriba la siguiente declaración sobre el texto "clase pública " . La declaración " Imports" hace que el . Código de la biblioteca NET disponibles para su programa.
Imports System.IO
8
Pega el siguiente comunicado sobre el " End Sub " declaración en el " Button1_Click " subrutina. Esta declaración hace un llamamiento a la rutina principal del programa, que voy a escribir a continuación.
WinSearch ()
9
Pega el siguiente código debajo de la "End Sub" línea de la " Button1_Click " subrutina . Esta subrutina funciona llamando GetFiles el . NET biblioteca de funciones para Windows busque el archivo especificado por el usuario .
Sub WinSearch ()
Dim d As String Dim f
As String
Prueba
d = TextBox2.Text
For Each f En Directory.GetFiles (d, TextBox1.Text )
MsgBox ( " El archivo ya está aquí. " )
Siguiente
Catch e como System.Exception
Debug.WriteLine ( e.Message )
End Try
End Sub
10
Ejecute el programa con la tecla " F5 ". Escriba un nombre de carpeta en el cuadro de texto de la parte superior del formulario. Escriba un nombre de archivo en el cuadro de texto inferior .
11
Pulse el botón de la forma de ejecutar el código del programa , que se ejecutará la búsqueda del archivo especificado . El programa mostrará ningún mensaje si no se encuentra el archivo . Se mostrará el mensaje " El archivo ya está aquí. " si lo hace buscar el archivo.