La mayoría de los programas de ordenador conectados a un archivo de base de datos permiten a los usuarios finales para 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 puede analizar , editar, eliminar o enviar 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 Visual Basic forma y la codificación, así como la consulta de base de datos . Cosas que necesitará
Visual Basic 6 software Base de datos del archivo
Mostrar más instrucciones
1
Cargue el entorno de Visual Basic desde el ordenador haciendo clic en "Inicio> Programas > , Microsoft Visual Studio 6.0 > Microsoft Visual Basic 6.0 EXE estándar "de la" caja de Nuevo Proyecto " cuadro de diálogo que aparece "
2
SELECT. " . Haga clic en botón "Abrir " para continuar.
3
arrastrar y soltar los controles de la "Caja de herramientas " en la forma de diseñar la interfaz y establecer las propiedades individuales después, bajo la ventana de " Propiedades" . Un buscador lo general tiene cuadros de texto donde los usuarios escribir palabras que buscan en la base de datos , etiquetas, algunos botones de comando , cuadrícula para mostrar el resultado , y el control de la base de datos que une 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 el código fuente para su proyecto.
5
Ir al evento " Form_Load " haciendo clic en el nombre del evento correspondiente de las cajas 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 los datos y se conecta la red al archivo de base de datos .
Adodc1.ConnectionString = " [ Escriba la cadena de conexión aquí] " . CursorType = adOpenKeyset.CursorLocation = adUseClient.LockType = adLockOptimistic.CommandType = adCmdTable.RecordSource = " [ Escriba el nombre de una tabla o consulta aquí] " . RefreshEnd Con
Grid1Set . DataSource = Adodc1.HighLight = flexHighlightWithFocus.ColWidth ( 0 ) = . ColWidth ( 0 ) + 1000 " esto es muestra de dimensión de columna , el cambio como preferred.ColWidth ( 1 ) = ColWidth ( 1 ) + 1800.ColWidth ( 2 ) = ColWidth ( 2 ) + 1800.ColWidth ( 3 ) = ColWidth ( 3 . . . ) + 2300.Refresh.TabIndex = 0End con fotos de 6
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 se escriba las letras en el cuadro de búsqueda . Si se encuentran coincidencias , los registros se mostrarán en la cuadrícula. En la sección de código , vaya a " Text1_Change ()" del evento y la entrada de un código similar al siguiente :
Dim t as String
Si Text1.Text < > "" ThenIf Adodc1 . Recordset.RecordCount < > 0 Thent = "* " Text1.Text + " * " Adodc1.Recordset.Filter = "Apellido como " + + t + "' " End IfElseAdodc1.Recordset.Filter = adFilterNoneEnd Si
Página 7
Pulse la tecla " F5 " para ejecutar el proyecto. Probar el programa y comprobar si está funcionando como debería.
8
Guarde el proyecto haciendo clic en "Archivo > Guardar proyecto como" en el menú y proporcionar un nombre de archivo descriptivo.