添加一个ActiveX的CommandButton1,双击,粘贴下列代码:
Private Sub CommandButton1_Click()
If CommandButton1.BackColor = -2147483641 Then
CommandButton1.BackColor = -2147483634
Else
CommandButton1.BackColor = -2147483641
End If
End Sub
添加一百个ActiveX的CommandButton1
这个 是什么意思,我少了这一步双击输入代码,然后关闭。然后前后一致,方框不变色。