Propriété Form.Painting (Access)

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

Syntaxe

expression. Peinture

expressionVariable qui représente un objetForm.

Remarques

Cette propriété ne peut être définie et n'est accessible qu'en mode Formulaire et en aucun autre mode.

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

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

La propriété Painting est automatiquement définie sur True, chaque fois que le formulaire Obtient ou perd le focus. Lorsque vous travaillez sur un formulaire si vous ne souhaitez pas voir les modifications apportées au formulaire 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.