如何用VB检测IE7当前是第几个标签。

来源：百度知道 编辑：UC知道 时间：2024/06/23 22:26:06
想写一个工具条工具，是IE7的，想问一下如何获取当前获得焦点的标签，就是那个IE7的多页功能，假如开了3页，当前页在第二页，我如何才可以用程序获得这信息呢？IE的句柄我是有的。谢谢！
希望能附上代码，谢谢！

我是VB6来的，我对.net不太熟悉，merryxmashere如果可以的话能留下你QQ吗？

建立一个新工程，添加timer1，修改timer1的频率为1000，加入引用“microsoft internet controls”。然后粘贴下面的代码，希望你就能明白如何解决问题了。再有问题请告诉我或者添加补充。

Private Sub Form_Load()
On Error Resume Next
Dim SWs As New SHDocVw.ShellWindows
Dim iex As SHDocVw.InternetExplorer

For Each iex In SWs
Debug.Print iex.hWnd & " " & iex.Document.hasFocus() & " " & iex.Document.Title
Next

End Sub

Private Sub Timer1_Timer()
Form_Load
End Sub

SSTab1.Tab = i