怎么在Form1上动态添加一个图片框控件

如何在Form1上动态添加一个图片框控件？
为什么这样写没有作用？

Private   WithEvents   pp   As   PictureBox

  Set   pp   =   Form1.Controls.Add "VB.PictureBox ",   "pp ",Form1)
  pp.Move   10,   10,   100,   100
  pp.Visible   =   True
  pp.Appearance   =   1

[解决办法]
要是没有作用的话就用控件数组吧


[解决办法]
多了第三格参数，如果代码就在 Form1 中，应该用
Set pp = Form1.Controls.Add( "VB.PictureBox ", "pp ")