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

淡淡的烟草味﹌ 2022-09-11 09:20 13阅读 0赞

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

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

1、使窗体上的类对网页可见；

2、设置一个对象，使在webbrowser网页中的脚本能够访问。

第一项工作有两个方法：

1、直接设置项目属性，使程序集 COM可见：

![Center][]

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

来看看运行结果：![Center 1][]

需要说明的是，作为简单例子，代码中未涉及除错。

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

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

————————————————  
版权声明：本文为CSDN博主「VB.Net」的原创文章，遵循CC 4.0 BY-SA版权协议，转载请附上原文出处链接及本声明。

[Center]: /images/20220828/86561db5290240909adad9cd1c455327.png
[Center 1]: /images/20220828/5f249c6e6c1c400785899d6308d4e2e5.png
[vb.net]: https://www.xin3721.com/eschool/vbnetxin3721/