VS2010 VB创建DLL

VS2010 VB如何生成DLL文件，调用DLL

 

一.创建dll文件

1.在vs2010中创建Class Library（类）库；

 

   注意  根命名空间（R）   MyfirstDll  ，下面会引用到

2.输入代码

 

[vb] view plaincopyprint?

1. Public Class Dlltest  
2.   
3.     Public Function dlltestmsg() As String  
4.         dlltestmsg = "HELLO WORLD,@ZZUZPB with Dll"  
5.     End Function  
6.   
7. End Class  

Public Class Dlltest

 

    Public Function dlltestmsg() As String

        dlltestmsg = "HELLO WORLD,@ZZUZPB with Dll"

    End Function

 

End Class

 

3.按F6编译生成Dll文件（\MyfirstDll\bin\Debug\myFirstDll.dll）

 

 

二.调用dll文件

1.在vs2010中新建window窗体应用程序（WindowsApplication1）。

2.将第一步生成的Dll文件（\myFirstDll\bin\Debug\myFirstDll.dll）拷贝到新建window窗体应用程序（WindowsApplication1）。

3.在vs2010的解决方案浏览器（Solution Explorer）中右击引用（references）添加引用（Add Reference）

选择browse选项卡，找到刚才拷贝过来的myFirstDll.dll文件，选中，ok

 

 

4.编辑代码

 

[vb] view plaincopyprint?

1. Public Class Form1  
2.     '声明DLL MyfirstDll.Dlltest类   
3.     Dim mytest As MyfirstDll.Dlltest  
4.   
5.     Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load  
6.         'DLL的一个新实例   
7.         mytest = New MyfirstDll.Dlltest  
8.         'MessageBox.Show(mytest.dlltestmsg)   
9.         'Label1=返回DLL的HELLO WORLD   
10. 10.         Label1.Text = mytest.dlltestmsg  
11. 11.   
12. 12.     End Sub  

13. End Class  

Public Class Form1

    '声明DLL MyfirstDll.Dlltest类

    Dim mytest As MyfirstDll.Dlltest

 

    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

        'DLL的一个新实例

        mytest = New MyfirstDll.Dlltest

        'MessageBox.Show(mytest.dlltestmsg)

        'Label1=返回DLL的HELLO WORLD

        Label1.Text = mytest.dlltestmsg

 

    End Sub

End Class

 

5.编译运行