Question

vb，command按钮，点击一次，backcolor就换一个颜色，代码怎么写？

Answer 1

首先在属性窗口把Command1的Style属性设为1（这个属性不能在运行过程中修改的），然后输入以下代码：

Private Sub Command1_Click()
Command1.BackColor = RGB(Int(Rnd * 256), Int(Rnd * 256), Int(Rnd * 256))
End Sub

Private Sub Form_Load()
Randomize
End Sub

Answer 2

随机换吗
做一个事件　就可以了　也可以用循环　　代入颜色代码　不是很难

Answer 3

Private Sub Command1_Click()
Randomize
Command1.BackColor = RGB(255 * Rnd, 255 * Rnd, 255 * Rnd)
End Sub