想要左键单击按钮之后按钮变红，右键单击恢复原色的代码怎么写啊

康康孩子吧就剩这个了我已经尽力了

用mouseclick事件，判断按钮是左还是右。然后改变按钮背景色

'Command1的Style属性设置为1
Private Sub Command1_MouseUp(Button As Integer, Shift As Integer, X As Single, Y As Single)
If Button = vbLeftButton Then
Command1.BackColor = vbRed
ElseIf Button = vbRightButton Then
Command1.BackColor = vbButtonFace
End If
End Sub