QBColor-FunktionQBColor function

Gibt einen Long-Wert zurück, der den RGB-Farbcode darstellt, der der angegebenen Farbe entspricht.Returns a Long representing the RGB color code corresponding to the specified color number.

SyntaxSyntax

QBColor (Farbe)QBColor(color)

Das erforderliche Color - Argument ist eine ganze Zahl im Bereich 0-15.The required color argument is a whole number in the range 0-15.

EinstellungenSettings

Das Argument Farbe hat folgende Einstellungen:The color argument has these settings:

ZahlNumber FarbeColor ZahlNumber FarbeColor
00 SchwarzBlack 88 GrauGray
11 BlauBlue 99 HellblauLight Blue
22 GrünGreen 10 10 HellgrünLight Green
33 CyanCyan 1111 Helles ZyanLight Cyan
44 RotRed 1212 HellrotLight Red
55 MagentaMagenta 1313 Helles MagentaLight Magenta
66 GelbYellow 1414 HellgelbLight Yellow
77 WeißWhite 1515 Hellweiß.Bright White

HinweiseRemarks

Das Argument _Farbe_stellt Farbwerte dar, die in früheren Versionen von Basic verwendet wurden (beispielsweise Microsoft Visual Basic für MS-DOS und dem Basic Compiler).The color argument represents color values used by earlier versions of Basic (such as Microsoft Visual Basic for MS-DOS and the Basic Compiler). Beginnend mit dem am wenigsten signifikanten Byte gibt der Rückgabewert die Rot-, Grün- und Blauwerte an, die verwendet werden, um die entsprechende Farbe im von Visual Basic for Applications verwendeten RGB-System festzulegen.Starting with the least-significant byte, the returned value specifies the red, green, and blue values used to set the appropriate color in the RGB system used by Visual Basic for Applications.

BeispielExample

In diesem Beispiel wird die QBColor -Funktion verwendet, um die BackColor -Eigenschaft des Formulars MyForm zu ändern, das in ColorCodeder von dargestellten Farbe übergeben wird.This example uses the QBColor function to change the BackColor property of the form passed in as MyForm to the color indicated by ColorCode. QBColor akzeptiert ganzzahlige Werte zwischen 0 und 15.QBColor accepts integer values between 0 and 15.

Sub ChangeBackColor (ColorCode As Integer, MyForm As Form)
    MyForm.BackColor = QBColor(ColorCode)
End Sub

Siehe auchSee also

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.