比如说添加一个文本框：
Dim t As TextBox
Set t = Controls.Add("VB.TextBox", "t1")
t.Move 300, 150, 3000, 2400
t.Visible = True
VB.TextBox 是文本框的类名，其他控件也有对应的类名，你可以自己去查。比如按钮就是 VB.CommandButton 。另外，代码建立的控件其Visible属性默认是False的（也就是不显示），要改为True才行。
内容全部来源于网络收集，如有侵权，请联系网站删除：QQ：24596024