Question

VB中如何用代码实现按下command按钮时command按钮变成红色？

Answer 1

将Command1的Style属性改为1-Graphical，在写上如下代码即可
Private Sub Command1_Click()
Command1.BackColor = vbRed
End Sub

Answer 2

吧按钮的style属性设置为1，
Private Sub Command1_Click()
Command1.BackColor = vbRed
End Sub
这段代码可以实现。

Answer 3

'添加一个CommandButton 把Command的Style设置成1 然后代码如下：
Private Sub Command1_Click()
Command1.BackColor = vbRed
End Sub

Answer 4

在COMMAND的点击事件下粘贴下面代码
CommandButton1.BackColor = &HFF&

Answer 5

通过属性窗口把 按钮的 Style 属性设置为 1－Graphical
然后把按钮的 Downpicture 属性设置为 一个红色图片文件（应当预先制作一个纯红色的图片文件备用）