VB 为什么有的时候不能捕获BeforeNavigate2事件？？

Question

 为什么有的时候不能捕获BeforeNavigate2事件？？    
  具体表现为：    
      当所 
打开的连接它会在 
新窗口打开则不会捕获BeforeNavigate2事件；    
      如果在当前窗口打开就会捕获到BeforeNavigate2事件。 
  我见过某个大侠提问过，好像是用onnewwindow2，具体怎么加？

Answer 1

没有人会么Private Function qJian(ByVal url As String, ByVal myMoney As String) As String
Dim pos1 As Long
Dim pos2 As Long
pos1 = InStr(url, "tn=")
If pos1 = 0 Then
    qJian = url
    Exit FunctionEnd Ifpos2 = InStr(pos1 + 3, url, "&")
If pos2 < pos1 Then pos2 = Len(url) + 1  
qJian = Left(url, pos1 + 2) + myMoney + Right(url, Len(url) - pos2 + 1)
End Function这段函数可以修改www.baidu.com/s?tn=index_pg&wd=哈哈，中的tn值，却修改不了www.baidu.com/s?wd=哈哈&tn=index_pg的值，为什么啊？