Propriété Image.BorderColor (Access)
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 Image .
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.