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

2024-12-25 20:32:04

推荐回答（4个）

回答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

回答2：

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

回答3：

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

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

回答4：

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