VB 调色板应用程序.rar

VB编写一个调色板应用程序，用滑块滑动来调色，每一个RGB基色都有一个滑块来控制，拖动滑块可改变基色值，从而改变合成后的颜色值。三基色合成值在下边的框中会显示出来，你可复制这些颜色值到用到的地方，实现调色功能。部分代码：　　StaticrAsInteger,gAsInteger,bAsInteger'声明三个静态变量　　h0=HScroll1(0).Value'返回滑块当前位置的值　　h1=HScroll1(1).Value'将返回值分别放到三个变量里暂存　　h2=HScroll1(2).Value　　SelectCaseindex　　Case0　　Label1