关于WebBrowser1控件的提交问题

Question

WebBrowser1 对 提交 按钮，
用下列代码执行没有问题
<input type="submit" class="best-submit" name="signIn" id="signIn"  value="Sign in"> 
Dim doc
Set doc = WebBrowser1.DocumentFor i = 0 To doc.All.length - 1
If (LCase(doc.All(i).tagname)) = "input" Then
If (LCase(doc.All(i).Name)) = "signin" Then
WebBrowser1.Document.All(i).Click
End If
End IfNext i我下面对 send 提交按钮，做了一些类似的代码，怎么不执行呀
 <div Name="mysend" id="my-send" class="my2-send">Send</div>
Dim doc
Set doc = WebBrowser1.DocumentFor i = 0 To doc.All.length - 1
If (LCase(doc.All(i).tagname)) = "div" Then
If (LCase(doc.All(i).Name)) = "mysend" Then
WebBrowser1.Document.All(i).Click
End If
End IfNext i忘大家指点一下，难道 input 和div会是本质的不同吗，我的后面的代码 该怎么改呀。

Answer 1

div是标签<input type="submit" class="best-submit" name="signIn" id="signIn" value="Sign in">  这是一个按钮

Answer 2

请哥们指点一下，我的标签，该怎么样 修改代码，点击 Send 成功呀。多谢了

Answer 3

你点这个Send标签有什么用，点了又没反应，只是一个简单的文字标签，除非有onclick事件