VB的webbrowser控件如何用代码来点击超链接

我想楼主是想问用WebBrowser自动点这个链接吧。
Dim Str1 As String
Str1 = "发送" '判断是否为要点击的A标签的特征字符
'历遍所有A标签，查找含有"发送"字符的A标签并点击
Set aSet = WebBrowser1documentAlltags("A")
For i = 0 To aSetlength - 1
If (InStr(1, aSet(i)innerText, Str1)) Then
aSet(i)onclick
' 如果aSet(i)onclick不能点击的话，请试试aSet(i)click
End If
Next i

HtmlElement btn=thiswebBrowser1DocumentgetElementById("这里填写按钮或a标签的id");

btnClick+=btn_Click;

private void btn_Click(object sender,HtmlElementEventArgs e){

//这里是你的打开新的窗口Form1的 *** 作

1、在打开的ie浏览器窗口右上方点击齿轮图标，选择“Internet选项”，如下图所示：

2、在打开的Internet选项窗口中，切换到安全栏，在安全选卡中点击“自定义级别”，如下图所示：

3、在“安全设置-Internet 区域”界面找到“Java 小程序脚本”、“活动脚本”，并将这两个选项都选择为“禁用”，然后点击确定,如下图所示：

url是支持打开文件的，格式为file://路径，这里的路径的\要换成/。
如果是相对路径，可以用EnvironmentCurrentDirectory获得其对应的绝对路径。例如文件放在/pagehtm里，可以用
urlPath=UriUriSchemeFile+ UriSchemeDelimiter PathGetFullPath(EnvironmentCurrentDirectory+"pagehtm")Replace(PathDirectorySeparatorChar, '/');
当然也有更简洁的写法，但这种写法能跨平台。
然后就可以把这个字符串传给webbrowser了

---