החזרת נתון מסוג 'ארוך' המייצג את קוד הצבע 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 כדי לשנות את המאפיין BackColor של הטופס שהועבר MyForm לצבע שצוין על-ידי ColorCode. QBColor מקבל ערכי מספרים שלמים בין 0 ל- 15.
Sub ChangeBackColor (ColorCode As Integer, _
MyForm As Form)
MyForm.BackColor = QBColor(ColorCode)
End Sub
