vb利用滚动条调单个颜色_vb怎么用滚动条改变字体颜色

Private Sub Form_Load()

HScroll1(0).Min = 0

HScroll1(1).Min = 0

End Sub

Private Sub HScroll1_Change(Index As Integer)

VScroll1(0).Min = 0

VScroll1(1).Min = 0

Value)End Sub.

Dim i%

HScroll1(i).Min = 0

HScroll1(i).Value = 0

Next

Sub

Form_Load()

VScroll1(0).Min

=

0

VScroll1(0).Max

VScroll1(1).Min

VScroll1(1).Max

SubPrivate

VScroll1_Change(Index

As

Integer)

Label1.ForeColor

RGB(VScroll1(0).Value,

VScroll1(1).Value,

Value)End

Sub.

以上就是土嘎嘎小编大虾米为大家整理的相关主题介绍,如果您觉得小编更新的文章只要能对粉丝们有用，就是我们最大的鼓励和动力,不要忘记讲本站分享给您身边的朋友哦！！