vb题:利用滚动框改变背景颜色
答案:2 悬赏:70
解决时间 2021-01-03 16:57
- 提问者网友:雨之落き
- 2021-01-03 08:30
vb题:利用滚动框改变背景颜色
最佳答案
- 二级知识专家网友:不服输就别哭
- 2021-01-03 08:42
Private Sub Form_Load()
HScroll1.Max = 15
HScroll1.Min = 0
HScroll1.SmallChange = 1
End Sub
Private Sub HScroll1_Change()
Form1.BackColor = QBColor(HScroll1.Value)
End Sub
HScroll1.Max = 15
HScroll1.Min = 0
HScroll1.SmallChange = 1
End Sub
Private Sub HScroll1_Change()
Form1.BackColor = QBColor(HScroll1.Value)
End Sub
全部回答
- 1楼网友:滚刀废物浮浪人
- 2021-01-03 09:10
内容标题框,不知道,你指文本标签label还是文本框text。另外颜色名,你是先要什么格式的?颜色有rgb格式、&h16进制格式。而且系统可认不出是红色、绿色、蓝色等颜色名称,除非程序认进行设定。
另外滚动条的值的范围是多少?如果是rgb格式必须要有三个滚动条,来分别对r、g、b三种颜色进行赋值(值在0-255之间)。还是说你自己只定义了几个颜色的种类(用数组的方式),利用滚动条来改变数组的索引号,以实现颜色的改变。
其实无论你的原来意思是如何,程序算法是一样的
以label为例。
在水平滚动条2的change事件里,写入以下代码:
lablel1.backcolor=hscroll1.value
label3.caption=hscroll1.value
我要举报
如以上问答内容为低俗、色情、不良、暴力、侵权、涉及违法等信息,可以点下面链接进行举报!
大家都在看
推荐资讯