189 8069 5689
既然引用了COM组件，就可以直接使用了，无需用CreateObject创建。
创新互联建站专注于企业营销型网站建设、网站重做改版、荥经网站定制设计、自适应品牌网站建设、HTML5、成都做商城网站、集团公司官网建设、外贸网站建设、高端网站制作、响应式网页设计等建站业务，价格优惠性价比高，为荥经等各大城市提供网站开发制作服务。
Dim ScriptControl As New MSScriptControl.ScriptControl
ScriptControl.Language = "JavaScript" '设置语言种类
ScriptControl.AddCode("function TestFunc(){return 'Hello world!'}") '添加脚本代码
MsgBox(ScriptControl.Run("TestFunc")) '显示一下那段脚本的返回值（这里你将看到Hello world!字符)
VB.NET 2013有parentWindow的,
WebBrowser1.Document.DomDocument.parentWindow.execScript才有
不想用点击，直接执行，那么你肯定就不能用onclick事件了。
在网页中JS函数自动执行常用三种方法
在HTML中的Head区域中，有如下函数：
SCRIPT
LANGUAGE="JavaScript"
functionn
MyAutoRun()
{
//以下是您的函数的代码，请自行修改先！
alert("函数自动执行哦！");
}
/SCRIPT
下面，我们就针对上面的函数，让其在网页载入的时候自动运行！
①第一种方法
将如上代码改为：
SCRIPT
LANGUAGE="JavaScript"
functionn
MyAutoRun()
{
//以下是您的函数的代码，请自行修改先！
alert("函数自动执行哦！");
}
window.onload=MyAutoRun();
//仅需要加这一句
/SCRIPT
②第二种方法
修改网页的Body为：
body onLoad="MyAutoRun();"
或者改为：
body onLoad="javascript:MyAutoRun();"
③第三种方法
使用JS定时器来间断性的执行函数：
setTimeout("MyAutoRun()",1000); //隔1000毫秒就执行一次MyAutoRun()函数
实现方法，将最上面的那JS函数，改为：
SCRIPT
LANGUAGE="JavaScript"
functionn
MyAutoRun()
{
//以下是您的函数的代码，请自行修改先！
alert("函数自动执行哦！");
}
setTimeout("MyAutoRun()",1000);
//这样就行拉
/SCRIPT