版权声明:本文为博主原创文章,转载请在显著位置标明本文出处以及作者网名,未经作者允许不得用于商业目的。
继续上一节内容,本节开始窗体代码。
要实现网页上可以调用窗体代码,必须完成两项工作:
1、使窗体上的类对网页可见;
2、设置一个对象,使在webbrowser网页中的脚本能够访问。
第一项工作有两个方法:
1、直接设置项目属性,使程序集 COM可见:
2、直接通过代码方式,通过使用 ComVisibleAttribute 对类进行标记使其成为 COM 可见的类。
<System.Runtime.InteropServices.ComVisibleAttribute(True)>
Public Class Form4
第二项工作:
设置WebBrowser.ObjectForScripting 属性。
在Form4_Load时,添加如下代码:
Private Sub Form4_Load(sender As Object, e As EventArgs) Handles MyBase.Load
wbMain.ObjectForScripting = Me
End Sub
完成以上两项工作,设置网页要调用的方法为Public就可以了:
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教程 目录
————————————————
版权声明:本文为CSDN博主「VB.Net」的原创文章,遵循CC 4.0 BY-SA版权协议,转载请附上原文出处链接及本声明。