Question

VB 运行时给窗体添加控件，如何给这些控件写事件。

比如我现在只有一个窗体，现在在程序运行时添加了一个新窗体FORM2，并在新窗体上添加了一个按钮button2. 代码为dim form2 as new form dim button2 as new button
form2.controls.add(button2)。那么现在，我想编写一个button2点击的事件应当如何写。

Answer 1

给你个参考代码
Dim WithEvents Com1 As CommandButton
Private Sub Form_Load()
Set Com1 = Controls.Add("VB.CommandButton", "ccc1")
Com1.Caption = 1
Com1.Visible = True
Com1.Move 840, 480, 1455, 375
End Sub
Private Sub Com1_Click()
Com1.Caption = "ABC"
End Sub

Answer 2

button2点击的事件直接在button2双击后就弹出关于这个事件的代码段了，

追问

麻烦看题目看的认真点。我已经说了，那个按钮是程序生成的，并非是画上去的，如何能双击呢。

Answer 3

没遇到过种。
也没有必要去这样做。

因为：我们原本就在设计代码。

Answer 4

是vb6还是vb.net?
如果是vb6的话就留个邮箱,给你一个小例子