Cómo hacer un formulario de búsqueda para un proyecto de Visual Basic

La mayoría de los programas de ordenador conectados a un archivo de base permiten a los usuarios finales puedan ver y manipular los datos sin tener que interactuar directamente con la base de datos. En una aplicación de entrada de datos, un formulario de búsqueda permite al usuario buscar registros específicos en una tabla que coincide con los criterios establecidos. Esto limita la cantidad de datos descargados de la base de datos y se muestran en el formulario. La información recuperada se pueden analizar, editar, borrar o enviado a la impresora para producir una copia impresa. Para crear un formulario de búsqueda para un proyecto de Visual Basic, el programador debe tener conocimientos básicos en el diseño de formularios de Visual Basic y codificación, así como la consulta de base de datos.

Instrucciones

1 Cargar el entorno de Visual Basic desde el ordenador haciendo clic en "Inicio> Programas> Microsoft Visual Studio 6.0> Microsoft Visual Basic 6.0".

2 Seleccione "EXE estándar" en el cuadro de diálogo "Nuevo proyecto" que aparece. Haga clic en el botón "Abrir" para continuar.

3 Arrastrar y con mandos de la "Caja de herramientas" en la forma de diseñar la interfaz y establezca las propiedades individuales después debajo de la ventana "Propiedades". Un formulario de búsqueda por lo general tiene cuadros de texto donde los usuarios escriben palabras para buscar la base de datos, etiquetas, algunos botones de comando, cuadrícula para mostrar el resultado, y el control de la base de datos que vincula a la forma en la tabla dentro de la base de datos. Continuar con el diseño de la forma como se prefiera.

4 Haga clic en "Ver> Código" en el menú para ir a la sección de código. Aquí es donde usted va a escribir los códigos fuente para su proyecto.

5 Ir al evento "Form_Load" haciendo clic en el nombre del evento apropiado desde los cuadros desplegables en la sección de códigos. Introduzca un código similar a la de abajo. Este código será establecer las propiedades de conexión de su control de datos y se conecta a la red el archivo de base de datos.

con Adodc1

.ConnectionString = "[Type your connection string here]"

.CursorType = AdOpenKeyset

.CursorLocation = AdUseClient

.LockType = AdLockOptimistic

.CommandType = AdCmdTable

.RecordSource = & Quot; [Escriba el nombre de una tabla o consulta aquí] & quot;

.Refrescar

Terminar con

con Grid1

Set .DataSource = Adodc1

DESTACAR = flexHighlightWithFocus

.ColWidth (0) = .ColWidth (0) + 1000 & # 039; esto es dimensión de la columna de la muestra; cambiar como preferida

.ColWidth (1) = .ColWidth (1) + 1,800

.ColWidth (2) = .ColWidth (2) + 1800

.ColWidth (3) = .ColWidth (3) + 2300

.Refrescar

.TabIndex = 0

Terminar con

6 Haga doble clic en el cuadro de texto donde el usuario introduzca los criterios de búsqueda. Por ejemplo, el usuario desea buscar ciertos apellidos de la base de datos y que va a escribir las letras en el cuadro de búsqueda. Cuando se encuentran coincidencias, los registros se mostrarán en la parrilla. En la sección de código, vaya a "Text1_Change ()" evento y un código similar al siguiente entrada:

Dim t as String

Si Text1.Text <> "" Entonces

If Adodc1.Recordset.RecordCount <> 0 Then

t = & quot; * & quot; + + Text1.Text & quot; * & quot;

Adodc1.Recordset.Filter = & quot; Apellido gustaría & # 039; & quot; + T + & quot; & # 039; & quot;

Terminara si

Más

Adodc1.Recordset.Filter = adFilterNone

Terminara si

7 Pulse la tecla "F5" para ejecutar el proyecto. Probar el programa y comprobar si se está ejecutando como debiera.

8 Guarde el proyecto haciendo clic en "Archivo> Guardar proyecto como" en el menú y proporcionar un nombre de archivo descriptivo.