主题：嵌入IE时遇到activex

 如下代码，想嵌入echart ，但是会打开单独的ie浏览器并且报错。

提示acticeX被禁用。如何实现在窗体内？

Dim ie As Object = CreateObject("InternetExplorer.Application")
vars("ie") = ie
ie.menubar=0 '不显示IE对象菜单栏
ie.AddressBar=0 '不显示IE对象地址栏
ie.ToolBar=0 '不显示IE对象工具栏
ie.StatusBar=0 '不显示IE对象状态栏

ie.Width=e.Form.Controls("panel1").width '设置IE对象宽度
ie.Height=e.Form.Controls("panel1").height '设置IE对象高度
ie.left = 0
ie.Top = 0
ie.Resizable=1 '设置IE对象大小是否可以被改动
ie.Navigate("C:\Users\104143\Downloads\LTreport\prlt.html")
'ie.Navigate("www.baidu.com")
Application.DoEvents
Do While ie.Busy
    Application.DoEvents
Loop

System.Threading.Thread.Sleep(1000)
ie.visible=1 '设置是否可见

'上面是模拟一个打开的程序
vars("标题") = "百度一下"
Dim CallBack As New EnumWindowsProc(AddressOf EnumWindowsProcCallBack)
EnumWindows(CallBack, 0)
EnumWindows(CallBack, 0)