Question

vb中怎么实现点击按钮时，标签里显示该按钮的名称

比如：四个按钮A、B、C、D，一个标签空白，点A时标签里显示A，点B时该标签里显示B，依此类推......

Answer 1

1、打开VB软件，新锋桐建一个标准exe工程；
2、设计窗口中，添加一个Command控件和一个Label控件；掘做
3、Command控件的Caption属性设置为需要的名称，例如"测试按钮"；
4、双击Command控件进入代码界面，在Command1的命令行里添加代码如下：

Private Sub Command1_Click()
Label1.Caption = Command1.Caption
End Sub

5、运行新建的工程，单击按钮，发现Label1标签的内银散坦容变为按钮的标签了。

Answer 2

'楼主您好!
'不知道您说的是按钮的名称(Name)，还是标题(Caption)，其中标题是在控件上显示出来的，而名称是代码中用到的名称。
'控件名称如下：
'按钮粗模A:A
'按钮B:B
'按钮C:C
'按钮D:D
'标签:Label1
'若为名称(Name)，代码如下：
Option Explicit
Private Sub A_Click()
Me.Label1.Caption = Me.A.Name
End Sub
Private Sub B_Click()
Me.Label1.Caption = Me.B.Name
End 桥笑Sub
Private Sub C_Click()
Me.Label1.Caption = Me.C.Name
End Sub
Private Sub D_Click()
Me.Label1.Caption = Me.D.Name
End Sub
Private Sub Form_Load()
Me.Label1.Caption = ""
End Sub
'若为敏凳含标题(Caption)，代码如下：
Option Explicit
Private Sub A_Click()
Me.Label1.Caption = Me.A.Caption
End Sub
Private Sub B_Click()
Me.Label1.Caption = Me.B.Caption
End Sub
Private Sub C_Click()
Me.Label1.Caption = Me.C.Caption
End Sub
Private Sub D_Click()
Me.Label1.Caption = Me.D.Caption
End Sub
Private Sub Form_Load()
Me.Label1.Caption = ""
End Sub

Answer 3

label1.caption=commondA.caption