怎么使VB的按钮每次按下去都不同
来源:百度知道 编辑:UC知道 时间:2024/05/29 23:06:47
怎么使VB的按钮每次按下去都不同???请给出代码,谢谢!
每次点击所得的效果都不同
每次点击所得的效果都不同
是要按下去的时候和没按的时候不同
还是要一次按和下一次按不同
第一种可以用代码
Private Sub Command1_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single)
command1.picture="..."
End Sub
第二种要在后台设个计数器
我设计了一段编码实现按钮背景色的渐变:
先将按钮的“Style”属性值改为1
Private Sub Command1_Click()
Static k As Integer
k = k + 1
If k <= 8 Then
Command1.BackColor = RGB(10 * k, 20 * k, 30 * k)
Else
k = 0
Command1.BackColor = RGB(10 * k, 20 * k, 30 * k)
End If
End Sub
由于你没有说明白什么不同,所以很难帮到你
怎么个不同??