VB.net封装DLL文件

    工作原因,需要将vb.net的程序代码分享出去,但是一些核心的算法又不能够让太多的人知道,所以想了一个办法,将核心的代码进行封装DLL文件,然后在程序里面进行调用。

    上网查找了一些资料,然后测试了一下,还算顺利。

    在这里做个记录,留个备忘。


    工具:VS 2010

    步骤:

    1、新建项目——类库,名称改为mydll;

    2、如我在里面添加一段或许本地计算机IP地址的代码,代码如下:

    

1
2
3
4
5
6
7
8
9
10
11
12
13
14
Public Class GetIP
    Function str_IP() As String
        Dim As String, b As String
        Dim ipa As System.Net.IPAddress()
        Dim HostName As String = System.Net.Dns.GetHostName
        str_IP = ""
        a = My.Computer.Clock.LocalTime
        b = My.Computer.Info.OSFullName
        ipa = System.Net.Dns.GetHostAddresses(HostName)
        For i = 0 To ipa.Length - 1
            str_IP += ipa(i).ToString + vbCrLf
        Next
    End Function
End Class

    点击菜单栏生成,生成mydll.dll

    3、下面是如何调用这个dll;

        再新建一个项目,这次我们新建一个窗口程序,在窗口上加一个button按钮,在对这个button按钮编程之前,必须先引用上面生成的mydll.dll文件,在“解决方案资源管理器中”选中项目右键“添加引用”,将刚刚生成的哪个mydll.dll引用过来,这样后面就可以使用了,下面面向button按钮编程,代码如下:

1
2
3
4
5
6
7
8
9
Imports mydll '引用mydll.dll
Public Class Form1
 
 
    PRivate Sub Button1_Click(ByVal sender As System.ObjectByVal As System.EventArgs) Handles Button2.Click
        Dim getip As New GetIP
        MsgBox(getip.str_IP)
    End Sub
End Class

    启动调试,运行程序,点击button按钮,这时候会弹出对话框,显示我们需要的IP地址,程序成功运行。

添加回复:

◎欢迎参与讨论,请在这里发表您的看法、交流您的观点。