הפונקציה QBColor

חל על
Access של Microsoft 365 Access 2024 Access 2021 Access 2019 Access 2016

החזרת נתון מסוג 'ארוך' המייצג את קוד הצבע RGB המתאים למספר הצבע שצוין.

תחביר

QBColor(color)

ארגומנט הצבעהנדרש הוא מספר שלם בטווח 0-15.

הגדרות

ארגומנט הצבע כולל את ההגדרות הבאות:

Number צבע Number צבע
0 שחור 8 אפור
1 כחול 9 כחול בהיר
2 ירוק 10 ירוק בהיר
3 ציאן 11 תכלת בהיר
4 אדום 12 אדום בהיר
5 מגנטה 13 מגנטה בהיר
6 צהוב 14 צהוב בהיר
7 לבן 15 לבן בהיר

    

הערות

הארגומנט color מייצג ערכי צבע המשמשים גירסאות קודמות של Basic (כגון Microsoft Visual Basic for MS-DOS ומהדר בסיסי). החל מהבתים הפחות משמעותיים, הערך המוחזר מציין את הערכים האדום, הירוק והכחול המשמשים לקביעת הצבע המתאים במערכת ה- RGB המשמשת את Visual Basic for Applications.

דוגמה

הערה

הדוגמאות הבאות מדגימות את השימוש של פונקציה זו במודול Visual Basic for Applications‏ (VBA). לקבלת מידע נוסף אודות עבודה עם VBA, בחר הפניית מפתח ברשימה הנפתחת שליד חיפוש והזן מונח אחד או יותר בתיבת החיפוש.

דוגמה זו משתמשת בפונקציה QBColor כדי לשנות את המאפיין BackColorMyForm של הטופס שהועבר אל הצבע שצוין על-ידי ColorCode. QBColor מקבל ערכי מספרים שלמים בין 0 ל- 15.

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