vb.net 教程 12-4 msHtml 5 偷梁换柱

概述这节学习如何替换网页的javascript语句。。。。 代码简单，主要是使用mshtml的 HTMLWindow2.execScript()方法。 直接上代码： Private Sub Button6_Click(sender As Object, e As EventArgs) Handles Button6.Click Dim strScript As String 这节学习如何替换网页的JavaScript语句。。。。 代码简单，主要是使用msHTML的 HTMLWindow2.execScript()方法。 直接上代码：

    Private Sub button6_Click(sender As Object,e As EventArgs) Handles button6.Click        Dim strScript As String = ""        strScript &= "function check()"        strScript &= "{"        strScript &= "  if (sampleform.studentname.value.length <2)"        strScript &= "  {"        strScript &= "      alert(""姓名长度不符合"");"        strScript &= "      return false;"        strScript &= "  }"        strScript &= "  if (sampleform.studentage.value.length <2)"        strScript &= "  {"        strScript &= "      alert(""年龄太小"");"        strScript &= "      return false;	"        strScript &= "  }"        strScript &= "  sampleform.submit();"        strScript &= "}"        Dim win As msHTML.HTMLWindow2        win = wbMain.document.Window.DomWindow        win.execScript(strScript,"JavaScript")    End Sub

原来网页上的check()代码:

function check(){	if(sampleform.studentname.value=="")	{		alert("姓名没有填写");		return false;	}	if(sampleform.studentage.value.length>2)	{		alert("年龄长度超过2位");		return false;		}	sampleform.submit();}

直接修改后的代码：

function check(){  if (sampleform.studentname.value.length <2)  {      alert("姓名长度不符合");      return false;  }  if (sampleform.studentage.value.length <2)  {      alert("年龄太小");      return false;  }  sampleform.submit();}

看看效果： 使用前：
使用后： 如果原来的网页中没有check()呢？自然会创建一个。

由于.net平台下C#和vb.NET很相似，本文也可以为C#爱好者提供参考。

学习更多vb.net知识，请参看 vb.net 教程 目录

总结

以上是内存溢出为你收集整理的vb.net 教程 12-4 msHtml 5 偷梁换柱全部内容，希望文章能够帮你解决vb.net 教程 12-4 msHtml 5 偷梁换柱所遇到的程序开发问题。

如果觉得内存溢出网站内容还不错，欢迎将内存溢出网站推荐给程序员好友。