Estampación el registro de una tabla de base de datos en Microsoft Access supone introducir una fecha elegida por el usuario en el registro . El usuario puede introducir la fecha en la mano o con Visual Basic para Aplicaciones para estampar automáticamente la fecha . Cosas que necesitará
Microsoft Access
Ver Más instrucciones
1

Abra Microsoft Access y crear una base de datos de muestra haciendo clic en "Archivo > Nuevo> Plantillas de ejemplo > Eventos " y luego en el botón " Crear". Haga clic en el " Panel de navegación " en la parte izquierda de la pantalla, a continuación, los " objetos que apoyan " la partida para exponer la " Agenda " icono de la tabla . Haga doble clic en ese icono para abrir la tabla de eventos de entrada de datos.
2

Ingrese dos filas de datos de ejemplo en la tabla de eventos con el texto siguiente , que corresponde a los campos " Título ", " Hora de inicio "y" Tiempo final ". No entre las comas, que le muestran dónde pulse la tecla "Tab" . No reemplace los campos con hoy y fechas de mañana.

Cortar el césped, , Pintar la casa, ,
3

Comienza la programación necesaria para acabar con la hora de inicio de forma automática, creando primero un formulario en el que se ejecutará el programa : pulse " Crear> Form ". Haga clic en la ficha de la nueva forma "Event " y seleccione " Vista Diseño ".
4

Pulse el botón " Habilitar contenido " en la barra de herramientas para permitir la ejecución de macros en esta base de datos.
5

Haga clic en el campo " sello de la fecha" y seleccionar "Propiedades ", haga clic en la ficha "Evento " en la ventana " Hoja de propiedades " . Haga clic en la flecha hacia abajo en el "On Got Focus" fila y seleccione " [Procedimiento de evento] . " Haga clic en el botón con los puntos suspensivos , que se encuentra justo a la derecha de la flecha hacia abajo , para entrar en el entorno de desarrollo integrado de Visual Basic ( IDE).
6

Pega el siguiente código de programa en el código del IDE ventana:

Private Sub Start_Time_GotFocus () Dim x Como VariantIf ( IsNull ( Start_Time ) ) thenm = Mes ( Ahora ()) d = día ( Now ( ) ) y = Año ( Ahora ()) x = m & " /" & d & " /" & yStart_Time = xend IfEnd Sub
7

Volver al acceso con la tecla " alt - f11 ", a continuación, haga clic en la pestaña " Eventos " y seleccione " formulario View " para activar el formulario para la entrada de datos.
8

Tab a través de todos los campos de cada registro de la muestra que ha introducido hasta el" id "muestra de campo " ( Nuevo) . " Tab hasta el campo " Start time" y note el efecto de la macro, que ha llenado en la hora de inicio con la fecha actual .
9

Sello de fecha en el campo " Hora de finalización " de re - entrar en el IDE y pegar el siguiente código debajo del código que ha introducido previamente :

Private Sub End_Time_GotFocus () ' Cambia el 1 en la siguiente declaración en el número deseado de días después del comienzo datetm = DateAdd ("d " , 1 , Start_Time ) End_Time = tmEnd Sub
10

Vuelva a ejecutar el formulario , asegurándose de que el campo " hora de finalización " muestra una fecha un día después del campo " hora de inicio " .