VB当中怎么用一个按钮实现两个命令？

Question

就是单击一个按钮 将另一个按钮隐藏 再单击这个按钮 将另一个按钮显示？

Answer 1

如果你是为了相同的按钮操作不同的事件，只需要一个按钮就可以了

那你可以用下面这个：

'先在form上放一个command
Private Sub Command1_Click()
If Me.Command1.Caption = "打开" Then
Me.Command1.Caption = "关闭"
'执行你的代码
Else
Me.Command1.Caption = "打开"
'执行你的代码
End If

End Sub

如果你非要用二个不同的按钮，那就用下面的代码：

'先在form上放二个command,如果你要让二个按钮在同一位置，那就把它们重叠在一起
Private Sub Command1_Click()
Me.Command1.Visible = False
Me.Command2.Visible = True
'执行你的代码
End Sub
Private Sub Command2_Click()
Me.Command2.Visible = False
Me.Command1.Visible = True
'执行你的代码
End Sub

Answer 2

你这个完全可以用一个按钮来实现，就是通过筛选按钮的标题来实现。在一种Case结束时把按钮的Caption设成另一个。

select case commandbutton.caption
case ...

case....

end select

Answer 3

简单啊！想好2个按钮的名称，你先判断按钮的caption值，然后用IF判断就行了啊

Answer 4

'在窗体上画两个按钮，输入以下代码
Private Sub Command1_Click()
If Command2.Visible = True Then
Command2.Visible = False
Else
Command2.Visible = True
End If
End Sub

Answer 5

private sub command1_click()
command2.visible=not(command2.visible)
end sub