Partager via


Propriété Report.Painting (Access)

Utilisez la propriété Painting pour spécifier si un rapport est repeint. Boolean (en lecture/écriture).

Syntaxe

expression. Peinture

expression Variable qui représente un objet Report .

Remarques

La propriété Painting est similaire à l'action écho. Toutefois, la propriété Painting empêche la mise à jour d'un rapport unique, tandis que l'action Echo empêche la mise à jour toutes les fenêtres ouvertes dans une application.

Définition de la propriété Painting d'un rapport sur False empêche également tous les contrôles (à l'exception des contrôles de sous-état) dans un état à partir de la mise à jour. Pour empêcher un contrôle de sous-état à partir de la mise à jour, vous devez définir la propriété Painting du sous-état sur False. (Notez que vous définissez la propriété Painting du sous-état et non du contrôle de sous-état.)

La propriété Painting est automatiquement définie sur True, chaque fois que le rapport Obtient ou perd le focus. Lorsque vous travaillez sur un rapport si vous ne souhaitez pas voir les modifications apportées à l'état ou à ses contrôles, vous pouvez définir cette propriété sur False. Par exemple, si un formulaire a un ensemble de contrôles qui sont automatiquement redimensionnés lorsque le formulaire est redimensionné et que vous ne souhaitez pas que l’utilisateur voit chaque déplacement de contrôle individuel, vous pouvez désactiver la peinture , déplacer tous les contrôles, puis réactiver la peinture .

Exemple

L'exemple suivant utilise la propriété Painting pour autoriser ou interdire qu'un formulaire soit redessiné, selon que la valeur True ou False est attribuée à la variable SetPainting. Si redessiner le formulaire est désactivée, Microsoft Access affiche l'icône de sablier pendant redessiner est désactivée.

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

Assistance et commentaires

Avez-vous des questions ou des commentaires sur Office VBA ou sur cette documentation ? Consultez la rubrique concernant l’assistance pour Office VBA et l’envoi de commentaires afin d’obtenir des instructions pour recevoir une assistance et envoyer vos commentaires.