vb如何根据ie地址栏的地址来判断网页
不是像下面这句一样根据窗口标题来判断
hwnd1 = FindWindow("IEFrame", "百度——全球最大中文搜索引擎 - Microsoft Internet Explorer")
我想根据ie窗口的地址栏里的地址来判断网页是不是百度，应该咋写？最好说详细点 我很菜！谢谢
IE地址栏的句柄是可以通过枚举IE子窗口枚举到，地址栏的类名是Edit（IE7版本）。
最好说详细点 LZ很菜！
VB code:
Option Explicit
Private Sub Command1_Click()
Text1.Text = ""
EnumWindows AddressOf EnumProc, 0
If Text1.Text = "" Then Text1.Text = "没有启动 IE 浏览器"
End Sub
注:IE8用不了
首先打开VB，建立一个新工程，点击菜单 Projects | References 项，在Available References 列表中选择
'Microsoft Internet Controls项将Internet对象引用介入到工程中。添加一个ListBox到Form1，然后在Form1中添加上面代码
VB code:
Private Sub Command1_Click()
Dim objShell, objWindows, objIE, strURL
strURL = "http://www.baidu.com"
Set objShell = CreateObject("Shell.Application") 'New ShellWindows
Set objWi
相关问答：
我有厂家做的ASP的监控录像（DVR）的局域网播放的源程序与控件，想要用ASP.net做一个视频回放的程序（利用他的控件）但不知如下去做，望各位指点。
先搞清楚他们的控件是怎么用的,
然后就直接用好了.
不过,如 ......
一个查询某信息的ASP网页，提交采用的是post方法，查找结果的网页必须右键点击“查看源文件”才能看到真正查询结果网页的源代码，用浏览器菜单看到的是查询前的源代码
用VB有什么办法可以获取到这个查询后的源代� ......
TF1.text = " <_2_ZCHGZBH> " & MSFlexGrid1.TextMatrix(k, 1) & " </_2_ZCHGZBH> "
大家好，我用上面一个东西赋值 TF1.text = & ......
Option Explicit
Private Sub Command1_Click()
WebBrowser1.Navigate "http://mc.qeedoo.com/servers.php"
End Sub
Private Sub WebBrowser1_DocumentComplete(ByVal ......
