VB如何让按钮切换?

我想用一按钮来实现自动切换,比如当我按第一次时实行出现一命令后,按钮名称自动切换到另一名,第二次按时就实行第二命令(主要是退回第一次命令未执行前的位置),按钮名称又自动切换回第一次的时候,举个例子,比如我想用一按钮施行画一段线,按钮初始名字为"开始画线",当点击按钮后,屏幕开始画一段线,画线完成后按钮名字更改为"返回初始",第二次点击后画线部分退回原来没画的位置,按钮名字又切换回"开始画线",也即第一和第二在轮流切换,希望各位前辈能指导小弟完成作业,不要求把上面的例子程序写出,只想得到那概念公式,谢谢!
是当点击按钮时执行命令后再更换按钮的文字,谢谢!

楼上的是正确的,我引用下
Private Sub Command2_Click()
If Command2.Caption = "开始画线" Then
'要运行的程序+这里
Command2.Caption = "返回初始"
Else
'要运行的程序+这里
Command2.Caption = "开始画线"
End If
End Sub

也可以用2个按钮来实现

Private Sub Form_Load()
Command1.Caption = "开始画线"
Command2.Caption = "返回初始"
Command2.Visible = False
End Sub
Private Sub Command2_Click()
'要运行的程序+这里
Command1.Visible = True
Command2.Visible = False
End Sub
Private Sub Command1_Click()
'要运行的程序+这里
Command2.Visible = True
Command1.Visible = False
End Sub
温馨提示:答案为网友推荐,仅供参考
第1个回答  2015-12-04
Private Sub CommandButton2_Click()
    CommandButton1.SetFocus'切换到CommandButton1
End Sub
Private Sub CommandButton1_Click()
    CommandButton2.SetFocus'切换到CommandButton2
End Sub

第2个回答  2008-06-23
Private Sub Command2_Click()
If Command2.Caption = "开始画线" Then
Command2.Caption = "返回初始"
Else
Command2.Caption = "开始画线"
End If

End Sub
相似回答