Compartir a través de


Propiedad Form.Painting (Access)

Utilice la propiedad Painting para especificar si se vuelve a dibujar un formulario. Boolean de lectura y escritura.

Sintaxis

expresión. Pintura

expresión Variable que representa un objeto Form.

Comentarios

Esta propiedad puede establecerse y aplicarse sólo en la vista Formulario y no está disponible en las otras vistas.

La propiedad Painting es similar a la acción Eco. Sin embargo, la propiedad Painting impide que vuelva a pintar un formulario único, mientras que la acción Eco impide que vuelvan a pintar todas las ventanas abiertas en una aplicación.

Si se establece la propiedad Painting de un formulario en False también impide que se vuelvan a pintar todos los controles (excepto los controles de subformulario) de un formulario. Para impedir que se vuelva a pintar un control de subformulario, debe establecer la propiedad Painting del subformulario en False. (Tenga en cuenta que establecer la propiedad Painting del subformulario, no del control de subformulario).

La propiedad Painting se establece automáticamente en True siempre que el formulario recibe o pierde el enfoque. Puede establecer esta propiedad en False mientras está trabajando en un formulario si no desea ver los cambios del formulario o de sus controles. Por ejemplo, si un formulario tiene un conjunto de controles que se cambian de tamaño automáticamente cuando se cambia el tamaño del formulario y no desea que el usuario vea cada movimiento de control individual, puede desactivar La pintura , mover todos los controles y, a continuación, volver a activar La pintura .

Ejemplo:

En el siguiente ejemplo se usa la propiedad Painting para habilitar o deshabilitar la pintura de formularios en función de si la variable SetPainting está establecida en True o False. Si la pintura de formularios está desactivada, Microsoft Access muestra el icono del reloj de arena mientras la pintura esté desactivada.

Public Sub EnablePaint(ByRef frmName As Form, _ 
 ByVal SetPainting As Integer) 
 
 frmName.Painting = SetPainting 
 
 ' Form painting is turned off. 
 If SetPainting = False Then 
 DoCmd.Hourglass True 
 Else 
 DoCmd.Hourglass False 
 End If 
 
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.