<td width="80" align="center" valign="middle"><input type="image" src="http://148.16.23.4:81/images/load.gif" width="57" height="18" /></td>
我试过
Dim img As Object
For Each img In WebBrowser1.Document.images
    If img.src = "http://148.16.23.4:81/images/load.gif" Then
        img.Click
        Exit For
    End If
Next
但是他就是不行!如果用
For i = 0 To vDoc.All.length - 1 
If UCase(vDoc.All(i).tagName) = "INPUT" Then 
    Set vTag = vDoc.All(i)
    if vtag.src = "http://148.16.23.4:81/images/load.gif" then
   vtag.click这样他会出来一大堆是点击别的地方才出来的提示或别的,郁闷中