1、使窗体上的类对网页可见;
2、设置一个对象,使在webbrowser网页中的脚本能够访问。
第一项工作有两个方法:
1、直接设置项目属性,使程序集 COM可见:
<System.Runtime.InteropServices.ComVisibleAttribute(True)> Public Class Form4
第二项工作:
设置WebBrowser
.ObjectForScripting 属性。
Private Sub Form4_Load(sender As Object,e As EventArgs) Handles MyBase.Load wbMain.ObjectForScripting = Me End Sub
Public Sub getValue(ByVal args1 As String,ByVal args2 As String,ByVal options As String) Dim a1,a2 As Integer a1 = Integer.Parse(args1) a2 = Integer.Parse(args2) Dim values As Integer Select Case options Case "+" values = a1 + a2 Case "-" values = a1 - a2 Case "*" values = a1 * a2 Case Else values = a1 / a2 End Select Dim element As HtmlElement element = wbMain.Document.GetElementById("values") element.SetAttribute("value",values) End Sub
来看看运行结果:
需要说明的是,作为简单例子,代码中未涉及除错。
由于.net平台下C#和vb.NET很相似,本文也可以为C#爱好者提供参考。
学习更多vb.net知识,请参看 vb.net 教程 目录