RGB Codes - VB#20

Code:
For the Sliders (put the minimum as 0 and the maximum as 255)
-Slider 1 is for the red
-Slider 2 is for the green
-Slider 3 is for the blue
-Slider 4 is for the opacity

Sliders_valuechanged event :

panel1.backcolor=color.fromargb(Trackbar4.value, Trackbar1.value,  Trackbar 2.value,  Trackbar 3.value)
label1.text="Color("+ Trackbar 4.value+", "+ Trackbar 1.value+", "+ Trackbar 2.value+", " Trackbar 3.value+")"