VB如何让按钮切换?

我想用一按钮来实现自动切换,比如当我按第一次时实行出现一命令后,按钮名称自动切换到另一名,第二次按时就实行第二命令(主要是退回第一次命令未执行前的位置),按钮名称又自动切... 我想用一按钮来实现自动切换,比如当我按第一次时实行出现一命令后,按钮名称自动切换到另一名,第二次按时就实行第二命令(主要是退回第一次命令未执行前的位置),按钮名称又自动切换回第一次的时候,举个例子,比如我想用一按钮施行画一段线,按钮初始名字为"开始画线",当点击按钮后,屏幕开始画一段线,画线完成后按钮名字更改为"返回初始",第二次点击后画线部分退回原来没画的位置,按钮名字又切换回"开始画线",也即第一和第二在轮流切换,希望各位前辈能指导小弟完成作业,不要求把上面的例子程序写出,只想得到那概念公式,谢谢!
是当点击按钮时执行命令后再更换按钮的文字,谢谢!
展开
 我来答
检静杉rL
2008-06-23 · TA获得超过903个赞
知道小有建树答主
回答量:1276
采纳率:0%
帮助的人:1304万
展开全部
楼上的是正确的,我引用下
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
庆年工坊
2015-12-04 · 知道合伙人互联网行家
庆年工坊
知道合伙人互联网行家
采纳数:4233 获赞数:8928

向TA提问 私信TA
展开全部
Private Sub CommandButton2_Click()
    CommandButton1.SetFocus'切换到CommandButton1
End Sub
Private Sub CommandButton1_Click()
    CommandButton2.SetFocus'切换到CommandButton2
End Sub
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
II个人的寂寞
2008-06-23 · TA获得超过1115个赞
知道小有建树答主
回答量:423
采纳率:0%
帮助的人:462万
展开全部
Private Sub Command2_Click()
If Command2.Caption = "开始画线" Then
Command2.Caption = "返回初始"
Else
Command2.Caption = "开始画线"
End If

End Sub
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
收起 更多回答(1)
推荐律师服务: 若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询

为你推荐:

下载百度知道APP,抢鲜体验
使用百度知道APP,立即抢鲜体验。你的手机镜头里或许有别人想知道的答案。
扫描二维码下载
×

类别

我们会通过消息、邮箱等方式尽快将举报结果通知您。

说明

0/200

提交
取消

辅 助

模 式