1个回答
展开全部
使用webbrowser空间实现很简单
一。 首先在窗体头部定义 Dim WithEvents MyDom As MSHTML.HTMLDocument
其次找到element对象 myDom=WebBrowser1.Document.getElementsByName("sa")
最后执行onclick : mydom.onclick
二.还有想要实现点击，直接执行点击的相应函数即可例如：假设想实现点击下面的Inputbox
<input id="busT1" name="busT" type="radio" value="1" class="input5" checked="checked" onclick="busSwitchDiv('changeDiv')" tabindex="18"/>
那么直接执行onclick里的函数busSwitchDiv('changeDiv')即可，执行语句如下：
WebBrowser1.Document.parentwindow.execscript "busSwitchDiv('changeDiv')"
一。 首先在窗体头部定义 Dim WithEvents MyDom As MSHTML.HTMLDocument
其次找到element对象 myDom=WebBrowser1.Document.getElementsByName("sa")
最后执行onclick : mydom.onclick
二.还有想要实现点击，直接执行点击的相应函数即可例如：假设想实现点击下面的Inputbox
<input id="busT1" name="busT" type="radio" value="1" class="input5" checked="checked" onclick="busSwitchDiv('changeDiv')" tabindex="18"/>
那么直接执行onclick里的函数busSwitchDiv('changeDiv')即可，执行语句如下：
WebBrowser1.Document.parentwindow.execscript "busSwitchDiv('changeDiv')"
本回答被提问者采纳
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
推荐律师服务：
若未解决您的问题，请您详细描述您的问题，通过百度律临进行免费专业咨询
