在VB中，怎样使一个按钮有两种命令

一个按钮何止只能实现两种命令：
1. 通过改变caption属性可实现多种命令，即每次按下都去改变Caption,根据不同Caption执行不同的命令；
2. 根据MouseMove、Mousedown、MouseUp等事件及Shift值可实现至少21种不同的操作；
3. 定义一个全局变量，每次按下按钮后使此全局变量递增，再根据其值进行不同的操作；
4. 其他事件的响应操作，可参照VB中CODE模块右上方的事件列表框的提示；
5. 不同的KEY操作和mouse操作类似，也能实现很多不同的命令。

Private Sub Command1_Click()
If Command1.Caption = "开始" Then
Command1.Caption = "暂停"
MsgBox "程序开始了"
Else
Command1.Caption = "开始"
MsgBox "程序暂停了"
End If
End Sub

和你说个最笨最简单的法

在窗体中添加两个一样大小的按钮 重叠在一起

Private Sub Command1_Click()

If Command1.Value = True Then

Command1.Visible = False
Command2.Visible = True

'/////////////你要实现的代码////////////////////
End If

End Sub

Private Sub Command2_Click()
If Command2.Value = True Then

Command1.Visible = True
Command2.Visible = False

'/////////////你要