Microsoft Access
Ver Más instrucciones
1
Open Access y haga clic en el menú "Crear " la partida , seguido de " Tabla ". Vamos a crear una pequeña mesa para realizar una especie de VBA .
2 Haga doble clic en la columna " de la Tabla 1 " la partida y el tipo "Nombre ", escriba varios nombres en esa columna. Asegúrese de que cada nombre empieza con una letra diferente del alfabeto para que pueda ver claramente el efecto de la VBA especie que sigue. Por la misma razón , asegúrese de introducir el nombre de una orden sin clasificar. Por ejemplo , escriba los nombres de " Carol ", " Bob" y " Amanda ", en ese orden.
3
Presione " Ctrl" + " S ", a continuación, escriba " UserInfo " para el nombre de la tabla .
4 Haga clic en el menú " Crear " la partida , a continuación, haga clic en el botón " Query Design ", el " Otro" del panel. Vamos a crear una consulta para el programa tipo VBA para ejecutar .
5
Haga doble clic en el elemento " UserInfo " en el cuadro de diálogo " Mostrar tabla" , a continuación, haga clic en el botón "Cerrar" del cuadro de diálogo .
6
Arrastra la " * ", que representa a todos los campos de una tabla , en el primer color de la cuadrícula de la consulta .
7
Haga clic en la " Consulta1 ", luego seleccione " Vista SQL " . Escriba el siguiente inmediatamente después de la "FROM UserInfo " cláusula : .
ORDER BY . " FirstName "
órdenes Esta nueva cláusula de la de datos cuando Access ejecuta la consulta
8 < p> Presione " Ctrl" + " S ", a continuación, escriba " Q1 " para el nombre de la consulta.
9
Pulse " Alt " + "F11 " para entrar en el entorno de desarrollo integrado VBA ( IDE ) , que es donde deberá introducir el código del programa para ordenar la tabla " UserInfo "
10
clic item " Module" del menú "Insertar " y luego pegar el siguiente código de programa en la ventana del módulo. :
Pública doQuery Sub ( )
Const qName = " q1 "
db1 As DAO.Database
RS1 As DAO.Recordset
Set db1 = CurrentDb
Set RS1 = db1.OpenRecordset ( qName )
Do While Not rs1.EOF
Debug.Print "Nombre :" & rs1 ! [ Nombre]
rs1.MoveNext
Loop
rs1.Close
db1.Close
End Sub
< p > Este programa se abre y muestra los registros de un objeto virtual llamado un conjunto de registros . Los resultados de registros de ejecución de la consulta que acaba de crear .
11
Haga clic en cualquier declaración en el programa, a continuación, pulse la tecla "F5 " para ejecutar el programa. Pulse la tecla "Ctrl " + "G " si usted no ve la ventana " inmediata " . Esta ventana muestra los resultados de la " Q1 " ordenados consulta creada .