ส่งกลับ Long ที่แสดงค่าสี RGB
ไวยากรณ์
RGB( สีแดง สีเขียว สีน้ําเงิน )
ไวยากรณ์ของฟังก์ชัน RGB มีอาร์กิวเมนต์ดังนี้
|
อาร์กิวเมนต์ |
คำอธิบาย |
|
แดง |
จำเป็น ตัวแปร (จํานวนเต็ม) ตัวเลขในช่วง 0-255 ครอบคลุม ที่แสดงถึงส่วนประกอบสีแดงของสี |
|
เขียว |
จำเป็น ตัวแปร (จํานวนเต็ม) ตัวเลขในช่วง 0–255 ครอบคลุม ที่แสดงถึงส่วนประกอบสีเขียวของสี |
|
น้ำเงิน |
จำเป็น ตัวแปร (จํานวนเต็ม) ตัวเลขในช่วง 0–255 ครอบคลุม ที่แสดงถึงส่วนประกอบสีน้ําเงินของสี |
ข้อสังเกต
วิธีการและคุณสมบัติของแอปพลิเคชันที่ยอมรับข้อกําหนดสีคาดว่าข้อกําหนดดังกล่าวจะเป็นตัวเลขที่แสดงค่าสี RGB ค่าสี RGB ระบุความเข้มสัมพัทธ์ของสีแดง สีเขียว และสีน้ําเงินเพื่อให้แสดงสีที่เฉพาะเจาะจง
ค่าสําหรับ อาร์กิวเมนต์ ใดๆ ถึง RGB ที่เกิน 255 จะถือว่าเป็น 255
ตารางต่อไปนี้แสดงสีมาตรฐานและค่าสีแดง สีเขียว และสีน้ําเงินได้แก่:
|
สี |
ค่าสีแดง |
ค่าสีเขียว |
ค่าสีน้ําเงิน |
|
สีดำ |
0 |
0 |
0 |
|
สีน้ำเงิน |
0 |
0 |
255 |
|
สีเขียว |
0 |
255 |
0 |
|
สี ฟ้า |
0 |
255 |
255 |
|
สีแดง |
255 |
0 |
0 |
|
ม่วงมาเจนต้า |
255 |
0 |
255 |
|
เหลือง |
255 |
255 |
0 |
|
สีขาว |
255 |
255 |
255 |
ค่าสี RGB ที่ส่งกลับโดยฟังก์ชันนี้ไม่เข้ากันกับค่าที่ใช้โดยระบบปฏิบัติการ Macintosh ซึ่งอาจใช้ภายในบริบทของแอปพลิเคชัน Microsoft สําหรับ Macintosh แต่ไม่ควรใช้เมื่อการสื่อสารเปลี่ยนสีโดยตรงกับระบบปฏิบัติการ Macintosh
ตัวอย่าง
หมายเหตุ: ตัวอย่างต่อไปนี้จะสาธิตการใช้ฟังก์ชันนี้ในโมดูล Visual Basic for Applications (VBA) สําหรับข้อมูลเพิ่มเติมเกี่ยวกับการทํางานกับ VBA ให้เลือก การอ้างอิงสําหรับนักพัฒนา ในรายการดรอปดาวน์ที่อยู่ถัดจาก ค้นหา แล้วใส่คําอย่างน้อยหนึ่งคําในกล่องค้นหา
ตัวอย่างนี้แสดงวิธีใช้ฟังก์ชัน RGB เพื่อส่งกลับจํานวนทั้งหมดที่แสดงค่าสี RGB ซึ่งใช้สําหรับวิธีการและคุณสมบัติของแอปพลิเคชันที่ยอมรับข้อมูลจําเพาะของสี วัตถุ MyObject และคุณสมบัติของวัตถุจะถูกใช้เพื่อวัตถุประสงค์ในภาพประกอบเท่านั้น ถ้าไม่มี MyObject อยู่ หรือถ้าไม่มีคุณสมบัติ สี จะเกิดข้อผิดพลาดขึ้น
Dim RED, I, RGBValue, MyObject
' Return the value for Red.
Red = RGB(255, 0, 0)
' Initialize offset.
I = 75
RGBValue = RGB(I, 64 + I, 128 + I)
' Same as RGB(75, 139, 203).
' Set the Color property of MyObject to Red.
MyObject.Color = RGB(255, 0, 0)
