添加ShockwaveFlash控件会引发错误

Question

将VB6迁移到vb.net代码添加ShockwaveFlash控件抛出错误：

Public WithEvents ShockwaveFlash1 As AxShockwaveFlashObjects.AxShockwaveFlash

ShockwaveFlash1 = Controls.Add("ShockwaveFlash.ShockwaveFlash", "ShockwaveFlash1", Me)

以上行抛出错误

  

“String”类型的值无法转换为   'System.Windows.Forms.Control的'

但它在VB6中运行良好。