Puede localizar un registro en un conjunto de registros en Microsoft Visual Basic utilizando la función Buscar y buscar métodos en ambos ( Microsoft ActiveX Data Objects ) y ADO ( Data Access Objects ) DAO , pero estos métodos se implementan de manera diferente en ambas bibliotecas de objetos . Busque funciona mejor que encontrar en ambos métodos , ya Seek requiere un índice con el fin de realizar una búsqueda , en gran medida la aceleración de los tiempos de rendimiento en la mayoría de los casos. Esto, sin embargo , impone la limitación de que el método Seek sólo se puede utilizar en los objetos de conjunto de registros que se basan en una tabla indexada . Ambos Buscar y buscar métodos requieren que los criterios de búsqueda pueden especificar con el fin de realizar la consulta . Cosas que necesitará de computadora 
 Microsoft Visual Basic 
 ADO o DAO bibliotecas en Microsoft Access 
 Programación conocimiento 
 Mostrar más instrucciones 
 Uso Busque en ADO < br > página 1 
 Abra la conexión a la base de datos Access . ( Sustituya las variables de << >> , según proceda ) : 
 
 Dim << >> Como conexión objeto ADODB.Connection 
 
 Juego << objeto de conexión > ; > = New ADODB.Connection 
 
 << conexión objeto >> Fútbol 
 Provider = " Microsoft.Jet.OLEDB.4.0 " 
 
 Abrir. . << camino hacia db >> Fútbol 
 End con fotos de 2 
 Crear el conjunto de registros : 
 
 Dim << >> Como objeto de registros ADODB . Recordset 
 
 Set << >> objeto recordset = New ADODB.Recordset 
 3 
 Seleccione el índice de pedidos en el conjunto de registros : 
 
 << objeto de registros . >> << Indice = variable Index >> 
 4 
 Abra la tabla . Utilice los siguientes valores fundamentales: 
 
 << objeto recordset >> Open Source : . = Variable de tabla << >> , _ 
 
 ActiveConnection : = << objeto de conexión >> , _ 
 
 CursorType : = adOpenKeyset , _ 
 
 LockType : = adLockOptimistic , _ 
 Opciones 
 : = adCmdTableDirect 
 5 
 Busque el registro utilizando el método Seek : 
 
 << >> objeto recordset Busque KeyValues : . = << >> criterios de búsqueda , SeekOption : = adSeekFirstEQ 
 6 
 Realice las acciones o procesamiento deseadas, tales como la impresión de la ficha de la pantalla 
 7 
 Cierre el objeto de registros : . 
 
 << >> objeto de registros . Cerrar 
 8 
 cerrar la conexión : . 
 
 << conexión objeto >> Cerrar 
 Uso de Buscar en ADO 
 < br > 9 
 abrir la conexión. 
 10 
 Abra la tabla . Utilice los siguientes valores fundamentales: 
 
 CursorType : = adOpenKeyset 
 
 LockType : = adLockOptimistic 
 11 
 encontrar el registro utilizando el método Find . Utilice la sintaxis siguiente , sustituyendo los elementos de la << >> con los valores apropiados : . 
 
 << Objeto recordset >> Buscar Criterios: = << criterios de búsqueda> > , SearchDirection : = adSearchForward 
 12 
 descubre que no se encontró un registro, es decir , comprobar que al final del archivo ( EOF ) condición no se cumple 
 13 
 . Recorrer todos los registros coincidentes y el proceso si lo deseas . 
 14 
 Cierre el objeto de registros. 
 15 
 cerrar la conexión . 
 < br >