楼上说的很对，尤其要注意将Visible属性设置为True.
以按钮为例
Dim cmdStart As CommandButton
Set cmdStart = Controls.Add("VB.CommandButton", "cmdStart", Me)
With cmdStart
.Caption = "创建对象"
.Font.Size = 12
.Left = 1000
.Top = 1000
.Width = 1500
.Height = 600
.Visible = True
End With
内容全部来源于网络收集，如有侵权，请联系网站删除：QQ：24596024