网页验证码的问题，请教教我
Dim tmpimg As Object, cr As Object
Dim btnSubmit As HtmlElement = WebBrowser1.Document.All("changeimg_link")'看不清楚换一张
btnSubmit.InvokeMember("click")’看不清楚换一张click
tmpimg = WebBrowser1.Document.DomDocument.GetElementById("imgVerify")'获取验证码
cr = WebBrowser1.Document.Body.DomElement.createControlRange()’设置选区
cr.add(tmpimg)’加载到选区
cr.execCommand("Copy") '获取验证码
If Clipboard.ContainsData(DataFormats.Bitmap) Then '判断剪切板中是否存在图片。
PictureBox1.Image = Clipboard.GetData(DataFormats.Bitmap)’显示验证码
上面这段程序能正常显示验证码，但是，click事件后，显示的验证码总是和网页显示出来的验证码差一张。
如：
网页上显示的验证码第一张是1234 第二张显示的是4321
当网页显示第二张，也就是4321的时候，picturebox上显示的第一张，也就是1234，后面全是如此，始终差一张。。。。。
[解决办法]
WEBBROWSER控件倒是有DocumentComplete事件,你在这个事件里把每个URL都DEBUG.PRINT出来看看,能否判断出是更新了验证码.
