版权声明：本文为博主原创文章，转载请在显著位置标明本文出处以及作者网名，未经作者允许不得用于商业目的。
上一节讲了如何自动填充网页数据，这一节讲如何提交网页数据。
方法一：使用 HtmlElement 类提供的RaiseEvent()方法：
当获得网页元素（HtmlElement）后，调用RaiseEvent(参数)方法，该方法中参数是该元素对应的事件，例如onclick、onchanged等。
代码如下：
Private Sub btnSubmit1_Click(sender As Object, e As EventArgs) Handles btnSubmit1.Click
Dim htmlAlls As HtmlElementCollection
htmlAlls = wbMain.Document.All
For Each htmlSingle As HtmlElement In htmlAlls
Select Case htmlSingle.GetAttribute("name")
Case "submit1"
htmlSingle.RaiseEvent("onclick")
Case Else
'不处理
End Select
Next
End Sub
方法二、比上一个方法更简单，使用HtmlDocument类的InvokeScript()方法。
这个方法直接调用网页内的已经定义的脚本。
在本例中我们直接调用网页上的 check()，代码如下：
Private Sub btnSubmit2_Click(sender As Object, e As EventArgs) Handles btnSubmit2.Click
wbMain.Document.InvokeScript("check")
End Sub
看起来更简洁。
当然InvokeScript()还有个重载的方法：
Public Function InvokeScript (scriptName As String, args As Object() ) As Object
参数scriptName：要调用的脚本的名称。
参数args：要传递给脚本scriptName的参数。
例如下面的html代码(PS:此网页已经传到我的网站：http://www.qqrec.com/vblessons/vbnet20-2-2.htm)：
<html>
<head>
<title>这是配合vb.net教程的网页</title>
<script language="javascript">
function check(studentname,studentage)
{
if(studentname=="")
{
alert("姓名没有填写");
return false;
}
if(studentage.length>2)
{
alert("年龄长度超过2位");
return false;
}
alert("数据木有问题:"+studentname+"的年龄是"+studentage);
}
</script>
</head>
<body>
<input type="button" name="submit" id="submit" value="检查数据" οnclick="check('张三','12')">
</body>
</html>
其中使用脚本check()检查数据，脚本包含两个参数，一个是学生姓名，一个是学生年龄。
我们在代码中采用如下方法调用脚本：
Private Sub btnCheck_Click(sender As Object, e As EventArgs) Handles btnCheck.Click
Dim scriptName As String = "check"
Dim args As Object() = {"李四", "8"}
wbMain.Document.InvokeScript(scriptName, args)
End Sub
当直接按下网页上的按钮：
当按下窗体上的”检查数据“按钮：
由于.net平台下C#和vb.NET很相似，本文也可以为C#爱好者提供参考。
学习更多vb.net知识，请参vb.net教程目录
版权声明：本文为CSDN博主「VB.Net」的原创文章，遵循CC 4.0 BY-SA版权协议，转载请附上原文出处链接及本声明。
