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

Sie können die ForeColor -Eigenschaft verwenden, um die Farbe für Text in einem Steuerelement anzugeben.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.

BemerkungenRemarks

Sie können diese Eigenschaft für Steuerelemente in Formularen oder Berichten verwenden, um Sie leicht lesbar zu machen oder um eine besondere Bedeutung zu vermitteln.You can use this property for controls on forms or reports to make them easy to read or to convey a special meaning. Sie können beispielsweise die Farbe des Texts im UnitsInStock -Steuerelement ändern, wenn der Wert unter die Reihenfolge der Neuordnung fällt.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 auch in Berichten verwenden, um spezielle visuelle Effekte zu erstellen, wenn Sie mit einem Farbdrucker drucken.You can also use this property on reports to create special visual effects when you print with a color printer. Bei Verwendung in einem Bericht 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 den Wert der Textfarbe im Steuerelement darstellt.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-Generators können Sie benutzerdefinierte Farben für Text in Steuerelementen 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 Standardsteuerelement-Formatvorlage eines Steuer Elements 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 festlegen, indem Sie ein Makro oder eine Visual Basic-Ereignisprozedur verwenden, die in der Einstellung der OnPrint-Ereigniseigenschaft eines Bereichs 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 wird die RGB -Funktion verwendet, **** um die Eigenschaften Farbe, BackColorund ForeColor in Abhängigkeit vom Wert des txtPastDue -Textfelds festzulegen.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 auch die QBColor -Funktion verwenden, um diese Eigenschaften festzulegen.You can also use the QBColor function to set these properties. Wenn Sie den folgenden Code im Form_Current ()- Ereignis festlegen, werden die Eigenschaften der Steuerelemente angezeigt, 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.