Cómo pasar una cadena a un comando similar en Microsoft Access

Consulta de los datos de una tabla de base de datos utilizando caracteres comodín en Microsoft Access no es tan difícil como usted puede pensar . En Access puede utilizar Visual Basic para Aplicaciones ( VBA) para automatizar procesos tales como la consulta de datos . En VBA puede crear sentencias SQL para consultar una tabla para encontrar valores que coincidan con un patrón especificado. El operador " igual que" se puede utilizar en las sentencias SQL para especificar un criterio como "Me gusta" D * " " que devolverá todos los valores de campo que comienzan con la letra D. Cosas que necesitará
Northwind base de datos

Ver Más instrucciones
1

clic en la ficha " Herramientas de base de datos" , haga clic en "Visual Basic ", y haga clic en el menú " Insertar". Haga clic en " módulos" para insertar un nuevo módulo de código
2

Crear un nuevo procedimiento sub escribiendo lo siguiente : .

Private Sub useLikeCommand ()

3

Declare las variables que va a utilizar para consultar una tabla de base de datos , añadiendo el siguiente código VBA :

datastring dévil como secuencia

Dim dbs como base de datos

Dim Como primer Recordset

Dim X As Integer

Set dbs = CurrentDb
4

Define la cadena que se pasa a la instrucción SQL :

datastring = " a * "
5

Escriba el siguiente código para abrir un conjunto de registros mediante una instrucción SQL que utiliza el operador Like :

Set rst = dbs.OpenRecordset ( "Empleados SELECT . [ Apellido ] , los empleados . [ Nombre ] " _

y " FROM Empleados " _

&" WHERE ( ( ( Employees. [ Nombre ] ) Like ' "& ( datastring ) & " " ) ) ; ")
6

Crear un " For ... Loop "para mostrar los resultados devueltos por la consulta utilizando la ventana Inmediato :

primera . MoveFirst

para x = 0 Para rst.RecordCount

Debug.Print rst.Fields ( " [ Nombre ]" ) . Valor

Debug.Print rst.Fields ( " [ apellido] " ) Valor

rst.MoveNext

Siguiente X
7

Finalizar el procedimiento añadiendo el siguiente código: .
< p > rst.Close

dbs.Close

End Sub
8

Presione " Ctrl" y " G" para mostrar la ventana Inmediato. Pulse la tecla "F5 " para ejecutar el procedimiento .