tghk.net
当前位置:首页>>关于vb 用滚动条设计实现一个简单调色板.用三个滚动条...的资料>>

vb 用滚动条设计实现一个简单调色板.用三个滚动条...

授人鱼不如授人以渔.. 思路:(按照我的说明书自己去DIY) 画三个scrollbar 分别把这三个scrollbar的min,max,改成0,255 假如你想让窗体背景变色,那么在每一个scrollbar的scroll和changed事件里粘贴上如下代码: form1.backcolor=rgb(hscroll1.valu...

Private Sub Form_Load() HScroll1.Min = 0: HScroll1.Max = 255 HScroll2.Min = 0: HScroll2.Max = 255 HScroll3.Min = 0: HScroll3.Max = 255 End Sub Private Sub HScroll1_Change() '红色 Picture1.BackColor = RGB(HScroll1.Value, HScroll...

1个Picture1控件,作为取色盘; 1个VScroll1控件组,VScroll1(0),VScroll1(1),VScroll1(2),分别调节颜色:红、绿、蓝。 分别设置属性:Max=255,Min=0,其它采用默认值。 另加一个文本框Text1,作为改变颜色用的实验控件。 用法:滚动VScroll1...

Dim a As Integer Dim b As Integer Dim c As Integer Private Sub Form_Load() HScroll1.Max = 255 HScroll2.Max = 255 HScroll3.Max = 255 Label1 = "调色区" End Sub Private Sub HScroll1_Change() a = HScroll1.Value Label1.BackColor = R...

楼上说的对。要代码不?我有时间给你写写看

网站首页 | 网站地图
All rights reserved Powered by www.tghk.net
copyright ©right 2010-2021。
内容来自网络,如有侵犯请联系客服。zhit325@qq.com