Partager via

Propriété ObjectFrame.BorderColor (Access)

  • Article

Utilisez la propriété BorderColor pour spécifier la couleur de la bordure d’un contrôle. Long (en lecture/écriture).

Syntaxe

expression. Bordercolor

Expression Variable qui représente un objet ObjectFrame .

Remarques

Le paramètre de la propriété BorderColor est une expression numérique qui correspond à la couleur que vous souhaitez utiliser pour la bordure d’un contrôle.

Vous pouvez définir la valeur par défaut pour cette propriété à l’aide du style de contrôle par défaut d’un contrôle ou de la propriété DefaultControl dans Visual Basic.

Couleur de bordure d'un contrôle est visible uniquement lorsque la propriété SpecialEffect est définie à deux dimensions ou ombré. Si la propriété SpecialEffect est définie sur une valeur autre qu'à deux dimensions ou ombré, la définition de la propriété BorderColor modifie la propriété SpecialEffect la valeur à deux dimensions.

Exemple

L’exemple suivant utilise la fonction RGB pour définir les propriétés BorderColor, BackColor et ForeColor en fonction de la valeur de la zone de texte txtPastDue. Vous pouvez également utiliser la fonction QBColor pour définir ces propriétés.

Le fait de placer le code suivant dans l’événement Form_Current( ) définit les caractéristiques d’affichage du contrôle dès que l’utilisateur ouvre un formulaire ou passe à un nouvel enregistrement.

Sub Form_Current() 
 Dim curAmntDue As Currency, lngBlack As Long 
 Dim lngRed As Long, lngYellow As Long, lngWhite As Long 
 
 If Not IsNull(Me!txtPastDue.Value) Then 
 curAmntDue = Me!txtPastDue.Value 
 Else 
 Exit Sub 
 End If 
 lngRed = RGB(255, 0, 0) 
 lngBlack = RGB(0, 0, 0) 
 lngYellow = RGB(255, 255, 0) 
 lngWhite = RGB(255, 255, 255) 
 If curAmntDue > 100 Then 
 Me!txtPastDue.BorderColor = lngRed 
 Me!txtPastDue.ForeColor = lngRed 
 Me!txtPastDue.BackColor = lngYellow 
 Else 
 Me!txtPastDue.BorderColor = lngBlack 
 Me!txtPastDue.ForeColor = lngBlack 
 Me!txtPastDue.BackColor = lngWhite 
 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.