excelvba用代码在窗体中添加控件（excel vba 中没有的控件怎么添加）

实例代码：

//在picture1上面添加一个commandbutton

PrivateSubForm_Load()

Form1.Controls.Add"VB.CommandButton","cmdOk",Picture1//动态添加控件

WithForm1.cmdOk

.Visible=True

.Width=500

.Caption="确认(&Y)"

EndWith

EndSub