VB怎样获得鼠标处的超级连接 - VB / 基础类
VB怎样获得鼠标处的超级连接呢？
在WebBrowser控件中有这样一个事件:StatusTextChange(index As Integer, ByVal Text As String)
它的Text参数正是鼠标处的超级连接,但问题是如果我的浏览器正忙的时候他的Text并不会及时更新。
我又尝试用Navigate2他里面也有个URL参数，但是这个URL与文字或图片中的超级连接还是有不同的.
现在我的要求是，点击某个带有连接的文字或图片时我要先得到这个连接地址，然后去打开网页,上面的两个方法
都不能满足我的要求。
在这里请高人指点一下.
此贴提的问题很好，也能做到，只是很麻烦，所以到现在没人回此贴。帮忙顶一下。
友情Up ..................
因为链接不一定都是地址，也可能是一个脚本调用，所以在 BeforeNavigate2() 和 NewWindow2() 事件中获得 URL 比较靠谱。
呵呵......楼上的答话真让我忘了是来问，问题的.
既然微软能做到，我想肯定还是有办法的..........
这还用说，你写个浏览器内核肯定也能做到。
老大 收到站短了么？
我只知道在RichTextBox中鼠标移至链接时会有消息通知,这时可以处理,不知道WB是否也有类似的消息,你找找WB的资料
mark
下面两个方法都是针对点击链接能够在指定WebBrowser中打开的
而不是有些情况下会在IE中打开
一个使用NewWindow2()事件，应该能够解决问题，
放一个WebBrowse、一个commandbutton
VB code:
Option Explicit
Private Sub Command1_Click()
WebBrows
相关问答：
在下是vb的新手，想写段程序，在vb中，使用wscript调用一些外部的命令，但是程序执行一直有错误，请各位高手帮忙解答下，谢谢。
代码如下：
VB code:
Private Function getFile_CMD(filename, filepath) As Bo ......
各位大虾：
我是刚学VB，现在想用VB调用一个动态库，动态库里面有很多函数。我知道使用VB调用动态库调用函数，需要将要调用的函数在程序中声明即可，但是里面有很多函数，不会每一个函数都要声明吧。请� ......
本人使用的是VB6.0版本
假设有一个对象A，A内有类型为B的对象属性。现在的问题是，需要添加若干个B对象作为A对象的属性。如，
A.B1,A.B2,...
但具体添加多少个B对象作为A对象的属性则视具体情况不同而不同 ......
Private Sub Form_Load()
recs = Adodc1.Recordset.RecordCount '求当前记录数
If recs > 0 Then '已有考生
Adodc1.Recordset.MoveLast '移到最后一条记录
num = V ......
