vb按钮触发事件

来源:百度知道 编辑:UC知道 时间:2024/05/22 19:59:04
程序里用A按钮创建了B按钮,B按钮的点击事件代码怎么写?
谢谢!
妮可,你这是一个按钮的代码,如果我生成若干个按钮,那这些生成的按钮的点击代码应该怎么写,谢谢!

试试吧..新建工程,新建一个按钮command1,按它后生成一个cmda,再那个按钮弹出以话框,代码如下:

Private WithEvents cmdObject As CommandButton

Private Sub Command1_Click()
Set cmdObject = form1.Controls.Add("VB.CommandButton", "cmda")
With form1!cmda
.Caption = "test"
.Visible = True
End With
End Sub

Private Sub cmdObject_click()
MsgBox "您选中的是动态增加的按钮!"
End Sub

恐怕你是想问A按钮生成B按钮的代码怎么写吧。。A创建B的方法比较难。。。可以用一个投机取巧的办法。。先把两个按钮都画出来。。把B的visible属性设置为false,然后在A的点击事件中写B.visible=true

在Click事件里会传递一个参数也就是INDEX,根据Index来判断

专家
就是专家