ListBox. ForeColor-Eigenschaft (Access)ListBox.ForeColor property (Access)

Mit der ForeColor-Eigenschaft können Sie die Farbe für Text in einem Steuerelement angeben.You can use the ForeColor property to specify the color for text in a control. Long mit Lese-/Schreibzugriff.Read/write Long.

SyntaxSyntax

Ausdruck. ForeColorexpression.ForeColor

Ausdruck Eine Variable, die ein ListBox -Objekt darstellt.expression A variable that represents a ListBox object.

HinweiseRemarks

You can use this property for controls on forms or reports to make them easy to read or to convey a special meaning.You can use this property for controls on forms or reports to make them easy to read or to convey a special meaning. Beispielsweise können Sie die Farbe des Texts im UnitsInStock -Steuerelement ändern, wenn der Wert unter der neusortierungs Ebene liegt.For example, you can change the color of the text in the UnitsInStock control when its value falls below the reorder level.

Sie können diese Eigenschaft für Berichte verwenden, um spezielle optische Effekte zu erzielen, wenn Sie mit einem Farbdrucker arbeiten.You can also use this property on reports to create special visual effects when you print with a color printer. Wenn Sie in einem Bericht verwendet wird, gibt diese Eigenschaft die Druck-und Zeichnungs Farbe für die Methoden Print, Linie und Circle an.When used on a report, this property specifies the printing and drawing color for the Print, Line, and Circle methods.

Die ForeColor-Eigenschaft enthält einen numerischen Ausdruck, der dem Wert der Textfarbe des Steuerelements entspricht.The ForeColor property contains a numeric expression that represents the value of the text color in the control.

Sie können den Farb Generator verwenden, um diese Eigenschaft festzulegen, indem Sie die Generator -Schaltfläche rechts neben dem Eigenschaftenfeld im Eigenschaftenfenster auswählen.You can use the Color Builder to set this property by choosing the Build button to the right of the property box in the property sheet. Mithilfe des Farb-Editors können Sie benutzerdefinierte Rahmenfarben für Steuerelemente definieren.Using the Color Builder enables you to define custom colors for text in controls.

Sie können die Standardeinstellung für diese Eigenschaft mithilfe der standardmäßigen Steuerelementformat Vorlage eines Steuerelements oder der DefaultControl-Eigenschaft in Visual Basic festlegen.You can set the default for this property by using a control's default control style or the DefaultControl property in Visual Basic.

Für Berichte können Sie die Circle -Eigenschaft nur mit einem Makro oder einer Visual Basic Ereignisprozedur festlegen, die in der Einstellung der OnPrint -Ereigniseigenschaft eines Abschnitts angegeben ist.For reports, you can set the Circle property only by using a macro or a Visual Basic event procedure specified in a section's OnPrint event property setting.

BeispielExample

Im folgenden Beispiel werden die Eigenschaften BorderColor, BackColor und ForeColor mit der RGB-Funktion in Abhängigkeit vom Wert des txtPastDue-Textfelds festgelegt.The following example uses the RGB function to set the BorderColor, BackColor, and ForeColor properties depending on the value of the txtPastDue text box. Sie können diese Eigenschaften auch mit der QBColor -Funktion festlegen.You can also use the QBColor function to set these properties. Durch das Einfügen des folgenden Codes in das Form_Current ()- Ereignis werden die Anzeigemerkmale des Steuerelements festgelegt, sobald der Benutzer ein Formular öffnet oder zu einem neuen Datensatz wechselt.Putting the following code in the Form_Current( ) event sets the control display characteristics as soon as the user opens a form or moves to a new record.

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

Support und FeedbackSupport and feedback

Haben Sie Fragen oder Feedback zu Office VBA oder zu dieser Dokumentation?Have questions or feedback about Office VBA or this documentation? Unter Office VBA-Support und Feedback finden Sie Hilfestellung zu den Möglichkeiten, wie Sie Support erhalten und Feedback abgeben können.Please see Office VBA support and feedback for guidance about the ways you can receive support and provide feedback.