Dim CtrlRange As Object
创新互联坚持“要么做到，要么别承诺”的工作理念，服务领域包括：成都网站设计、网站制作、外贸营销网站建设、企业官网、英文网站、手机端网站、网站推广等服务，满足客户于互联网时代的镶黄网站设计、移动媒体设计的需求，帮助企业找到有效的互联网解决方案。努力成为您成熟可靠的网络建设合作伙伴！
On Error Resume Next
Do
Err.Clear()
CtrlRange = Ie.Document.Body.DomElement.createControlRange()
CtrlRange.Add(Ie.Document.DomDocument.GetElementById("verifypic"))
CtrlRange.execCommand("Copy") '获取验证码
If Clipboard.ContainsData(DataFormats.Bitmap) Then
PictureBox1.Image = Clipboard.GetData(DataFormats.Bitmap) '在Picture1控件上显示
End If
If Err.Number 0 Then WaitingMS(100) ‘延时
Loop While Err.Number 0
以前找的 vbnet里也可以用
两个思路：
1、加入到这台计算机的域，或者使用该计算机的帐号密码进行访问，就不会有此提示
2、使用VB，预先访问此计算机的共享，使用该计算机的账户和密码进行访问。大概的方法是：执行DOS命令：net use 的相关语法，提前获得该计算机的身份认证，后面就不会再出现你图中的那个验证窗口了。
个人建议，希望能帮到你
一般登陆网站时候首先要打开一个网页对吧？
那首先要 GET 一个网址。GetResponse后，得到的流就是这个页面的源码。
源码里肯定会包含这个验证码的提问段（可能是个图片的网址，也可能是个 5+5=？ 之类的字符串之类的），可以分析一下这段代码出现的位置，让程序自动寻找。找到这个图片的网址，把这个图片 GET 下来，然后，就是orc识别或你人工识别咯。。。
