Evento Form.Current (Access)

Se produce cuando el enfoque se desplaza a un registro, haciendo que sea el registro actual, o cuando el formulario se actualiza o se somete a una nueva consulta.

Sintaxis

más sencilla.Actual

expresión Variable que representa un objeto Form.

Comentarios

Para ejecutar una macro o procedimiento de evento cuando se produzca este evento, establezca la propiedad OnCurrent en el nombre de la macro o en [procedimiento de evento].

Este evento se produce al abrir un formulario y también siempre que el enfoque deja un registro y pasa a otro. Microsoft Access ejecuta la macro actual o se muestra el procedimiento de evento antes del primer o siguiente registro.

Mediante la ejecución de una macro o procedimiento de evento cuando se produce el evento Current de un formulario puede, por ejemplo, mostrar un mensaje o sincronizar los registros de otro formulario relacionado con el registro activo. Por ejemplo, cuando el registro de un cliente es el registro activo, puede mostrar su pedido anterior. Cuando un registro de proveedor se actualiza, puede mostrar los productos fabricados por el proveedor en un formulario de proveedores . También puede realizar cálculos basándose en el registro actual o cambiar el formulario en respuesta a los datos del mismo.

Si la macro o el procedimiento de evento ejecuta una acción GoToControl o GoToRecord o el método correspondiente del objeto DoCmd en respuesta a un evento Open , se produce el evento actual .

El evento actual también se produce cuando actualiza un formulario o vuelve a consultar la tabla o consulta subyacente del formulario, por ejemplo, cuando elige Quitar, filtrar u ordenar en el menú Registros o usa la acción Requery en una macro o el método Requery en código de Visual Basic.

La primera vez que se abre un formulario, se producen los eventos siguientes, en el orden indicado:

OpenLoadResizeActivateCurrent

Ejemplo

En el siguiente ejemplo, un procedimiento de evento actual comprueba el estado de un botón de opción llamado Descontinuado. Si se selecciona el botón, en el ejemplo se establece el color de fondo del campo NombreDeProducto en rojo para indicar que el producto se ha dejado de fabricar.

Para probar el ejemplo, agregue el siguiente procedimiento de evento a un formulario que contiene una opción denominada Descontinuado y un cuadro de texto llamado NombreDeProducto.

Private Sub Form_Current() 
 If Me!Discontinued Then 
 Me!ProductName.BackColor = 255 
 EndIf 
End Sub

Soporte técnico y comentarios

¿Tiene preguntas o comentarios sobre VBA para Office o esta documentación? Vea Soporte técnico y comentarios sobre VBA para Office para obtener ayuda sobre las formas en las que puede recibir soporte técnico y enviar comentarios.