怎样利用BHO取得IE地址栏的网址，并把取得的网址修改后再次打开网址？

Begin VB.UserControl uctlIe 这句我复制上去提示“缺少语句结束”
Attribute VB_Name = "uctlIe"

Attribute VB_GlobalNameSpace = False
Attribute VB_Creatable = True
Attribute VB_PredeclaredId = False
Attribute VB_Exposed = True  这几句提示“语句错误”
我用的是VB6.0。是不是要先加载什么？要是多点注释就更好了。

 

 

 

用exe我已经搞定了，不过那个家伙非得要我用BHO，好在今天找到了。主要是这个接口IObjectWithSite_GetSite刚开始不知道怎么去实现。