החזרת Long המייצג את קוד הצבע RGB המתאים למספר הצבע שצוין.
תחביר
QBColor(color)
ארגומנט הצבעהנדרש הוא מספר שלם בטווח 0-15.
הגדרות
הארגומנט color כולל את ההגדרות הבאות:
| 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