ຟັງຊັນ Green

ສົ່ງຄືນຄ່າສ່ວນປະກອບສີຂຽວ (Green component) ຂອງລະຫັດສີປະສົມທີ່ໃຫ້ມາ.

ໄວຍາກອນ:


Green (Color As Long)

ປະເພດຄ່າທີ່ສົ່ງກັບ:

ຈຳນວນຖ້ວນ

ພາຣາມິເຕີ:

Color: ນິພົດຈຳນວນຖ້ວນແບບຍາວ (Long integer) ທີ່ກຳນົດລະຫັດສີປະສົມເພື່ອໃຫ້ສົ່ງຄືນຄ່າສ່ວນປະກອບສີຂຽວ.

ລະຫັດຂໍ້ຜິດພາດ:

5 ການເອີ້ນໃຊ້ໂປຣຊີເຈີບໍ່ຖືກຕ້ອງ

ກ່ອງໂຕ້ຕອບຕົວເລືອກສີ ຈະສະແດງລາຍລະອຽດສ່ວນປະກອບສີແດງ, ສີຂຽວ ແລະ ສີຟ້າ ຂອງລະຫັດສີປະສົມ, ລວມທັງນິພົດເລກຖານສິບຫົກຂອງມັນ. ການປ່ຽນສີຂໍ້ຄວາມ ແລະ ການເລືອກ ສີກຳນົດເອງ ຈະສະແດງກ່ອງໂຕ້ຕອບຕົວເລືອກສີ.

ຕົວຢ່າງ:


Sub ExampleColor
Dim lVar As Long
    lVar = rgb(128,0,200)
    MsgBox "The color " & lVar & " contains the components:" & Chr(13) &_
        "red = " & red(lVar) & Chr(13)&_
        "green = " & green(lVar) & Chr(13)&_
        "blue = " & blue(lVar) & Chr(13) , 64,"colors"
End Sub