vb.net 教程 12-5 webbrowser 与窗体交互2

发布时间：2020-12-17 08:13:24 所属栏目：百科来源：网络整理

导读：继续上一节内容，本节开始窗体代码。要实现网页上可以调用窗体代码，必须完成两项工作： 1、使窗体上的类对网页可见； 2、设置一个对象，使在webbrowser网页中的脚本能够访问。第一项工作有两个方法： 1、直接设置项目属性，使程序集 COM可见： 2、直接通

继续上一节内容，本节开始窗体代码。

要实现网页上可以调用窗体代码，必须完成两项工作：

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 教程目录

（编辑：李大同）

【声明】本站内容均来自网络，其相关言论仅代表作者个人观点，不代表本站立场。若无意侵犯到您的权利，请及时与联系站长删除相关内容!