VB问题---怎么设置打勾CHECK后会让按牛发生变化?

添加两个check控件,分别是check1 ,check2,check1标名为[禁用按钮],check2为[改变按钮文字]
添加一个按钮,command1
程序如下:
Private Sub Check1_Click()
If Check1.Value = Checked Then
Command1.Enabled = False
Else
Command1.Enabled = True
End If
End Sub

Private Sub Check2_Click()
If Check2.Value = Checked Then
Command1.Caption = "你答对了"
Else
Command1.Caption = "你答错了"
End If
End Sub

问题是让按钮发生什么变化......