Online Reference

Home

Microsoft Reference
Knowledge Developer Database Internet Resource Forum
VBA
General Function
ดาวน์โหลดคู่มือ

QBColor Function

VBA Function, ส่งออกค่าเป็นประเภทข้อมูล Long ที่แสดงรหัสสี RGB ตามหมายเลขสีที่กำหนด

ไวยากรณ์

QBColor(color )

อากิวเมนต์ color เป็นเลขจำนวนเต็มในช่วง 0-15

การตั้งค่า

อากิวเมนต์ color ตั้งค่าได้ ดังนี้

หมายเลข สี หมายเลข สี
0 ดำ (Black) 8 เทา (Gray)
1 น้ำเงิน (Blue) 9 น้ำเงินอ่อน (Light Blue)
2 เขียว (Green) 10 เขียวอ่อน (Light Green)
3 Cyan 11 Light Cyan
4 แดง (Red) 12 แดงอ่อน (Light Red)
5 Magenta 13 Light Magenta
6 เหลือง (Yellow) 14 เหลืองอ่อน (Light Yellow)
7 ขาว (White) 15 Bright Yellow

ลักษณะการประยุกต์

อากิวเมนต์ color แสดงค่าของสีที่ใช้กับภาษา Visual Basic เวอร์ชันเริ่มแรก (เช่น Microsoft Visual Baisc สำหรับ MS-DOS และคอมไพล์เลอร์ภาษา Basic) การเริ่มต้นด้วยไบต์ที่น้อยที่สุด เพื่อการระบุค่าสีแดง, เขียว และน้ำเงิน โดยการตั้งค่าสีในระบบ RGB

ดูเพิ่มเติม

ฟังก์ชัน RGB

ตัวอย่าง

ตัวอย่างการใช้ฟังก์ชัน QBColor เพื่อเปลี่ยนคุณสมบัติ BackColor ของฟอร์ม จากการส่งผ่านค่าใน MyForm เป็นสีที่ระบุด้วย ColorCode ฟังก์ชัน QBColor ยอมรับค่าจำนวนเต็มระหว่าง 0 ถึง 15

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