No se visualiza la información más reciente de la aplicación de bases de datos puede ser un problema si los datos que se utilizan para tomar decisiones críticas . Usted puede utilizar un control de cuadro de lista para mostrar la información de una tabla de base de datos mediante el uso de una consulta. Los " Requery " refresca la propiedad de consulta utilizado en el control de cuadro de lista para mostrar la información más reciente . Es una buena práctica para actualizar los datos de un control mediante programación en lugar de reiniciar la aplicación para actualizar sus datos. Cosas que necesitará
Northwind base de datos
Mostrar más instrucciones
1

Abra la base de datos Northwind , haga clic en el menú " Crear" y haga clic en " Diseño de formularios " en los "Formularios " panel . Haga clic en la pestaña " Diseño " y seleccione " List Box " en el panel " Controles". Haga clic en la " forma" en el área " Detalles" y arrastre el ratón mientras se mantiene pulsado el botón del ratón para dibujar un nuevo control de cuadro de lista. Haga clic en " Button " y utilizar la misma técnica para dibujar un nuevo botón en el formulario.
2

click derecho - su nuevo control de cuadro de lista y haga clic en "Propiedades ". Haga clic en la ficha "Formato " y escriba " 5 " al lado de " Número de columnas . "
3

clic en la pestaña "Datos" , y copiar y pegar el código SQL se enumeran a continuación junto a " . . . . Origen de la fila ":

SELECT Customers.Company , los clientes [ Apellido ] , Clientes [ Nombre ] , Clientes [ E - mail] Clientes [ Título del trabajo ] FROM Clientes ;
Página 4

click derecho - su nuevo botón en el formulario y haga clic en "Propiedades ". Haga clic en la ficha " Evento " y elegir la opción " [ Procedimiento de evento ]" junto a " On Click. " Haz clic en los puntos suspensivos para crear un nuevo procedimiento " button_click " y abra la ventana de Microsoft Visual Basic
5

Copia y pega el código que aparece a continuación en el procedimiento de botón para crear dos variables: .
< P > Dim dbs como base de datos

strSQL As String Dim
6

Copia y pega el código que aparece a continuación para definir la base de datos actual como la base de datos a utilizar :

Set dbs = CurrentDb
7

Copia y pega el código que aparece a continuación para insertar un nuevo cliente en la tabla " clientes ":

strSQL = "INSERT INTO usuarios ( Company, [ Apellido ] , [ Nombre ] , [E - mail] , [ Título del trabajo ] ) "

strSQL = strSQL &" VALUES ( ' Compnay 1 ', ' Smith ', ' John ', ' johnsmith @ yahoo . com ' , ' Administrador '); "

dbs.Execute ( strSQL )
8

Copia y pega la siguiente línea de código para actualizar la consulta en el control de cuadro de lista y visualizar el nuevo cliente añadido:

List0.Requery
9

volver a la ventana de Microsoft Access y haga clic en el icono " Ver". Haga clic en el botón para ejecutar el código. Desplácese por la lista y verá el nuevo cliente agregó.