vb.net 調(diào)用其他文件 如 dll

DLL（動態(tài)鏈接庫）是一個很有用的東西，在開發(fā)大項目的時候顯得非常重要，因為多人合作開發(fā)時，可以給每個人分配一個任務(wù)，用DLL完成，最后組合起來，就不會出現(xiàn)互相沖突的問題。這里給出最簡單的DLL編寫與調(diào)用的示例

10年積累的網(wǎng)站設(shè)計、網(wǎng)站建設(shè)經(jīng)驗，可以快速應(yīng)對客戶對網(wǎng)站的新想法和需求。提供各種問題對應(yīng)的解決方案。讓選擇我們的客戶得到更好、更有力的網(wǎng)絡(luò)服務(wù)。我雖然不認(rèn)識你，你也不認(rèn)識我。但先建設(shè)網(wǎng)站后付款的網(wǎng)站建設(shè)流程，更有鄂城免費網(wǎng)站建設(shè)讓你可以放心的選擇與我們合作。

首先，我們打開VB.NET，選擇類庫，名稱改為test

然后輸入以下代碼

Public?Class?test

Public?Function?test(ByVal?a?As?Long,?ByVal?b?As?Long)?As?Long

Return?a?+?b

End?Function

End?Class

保存后，生成DLL文件。

這就是最簡單的一個DLL，下面是調(diào)用該DLL的示例

新建一個工程，單擊“項目” -- 添加引用

找到剛才生成的DLL，雙擊它

添加引用以后，似乎什么也沒發(fā)生，這時我們輸入以下代碼：

Imports test.test

這樣，就包含了該DLL的類。

然后我們定義一個類

Dim test As New test.test

這樣，就可以使用里面的函數(shù)了，下面是程序示例

Imports?test.test

Public?Class?Form1

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

Dim?test?As?New?test.test

MsgBox(test.test(1,?2))

End?Sub

End?Class

運行該程序，可以看到，調(diào)用了DLL內(nèi)的函數(shù)。

這就是最簡單的DLL示例，可以將一些復(fù)雜的代碼集成到DLL里，以后升級或重用都比較方便。

vb.net無法引用C++編寫的dll怎么辦？

如果DLL不是你寫的,且你要調(diào)用的函數(shù)不是__stdcall聲明,VB直接調(diào)用是會報錯的

如果DLL是你寫的,注意調(diào)用約定問題,并看以下代碼

***************************************************

以下是DLL代碼

.cpp里這么寫

1extern "C"__declspec(dllexport) void __stdcall HelloWorld()

2{3 MessageBox(NULL,"HelloWorld","HelloWorld",NULL);4}

.def里這么寫

LIBRARY "XXXX"

EXPORTS

; 此處以下添加

HelloWorld@1

*************************************************

vb里這么寫

1 Public Declare Sub HelloWorld Lib "XXXX.dll" ()

然后調(diào)用就可以了,上面是VB的代碼,或許VB.net的也差不多

怎樣用VB.NET寫和調(diào)用DLl窗體

一、帶窗體的dll創(chuàng)建

1、先新建 類庫（testdll），在項目中添加兩個窗體form1(主窗體)、form2,為了與后面的調(diào)用區(qū)分分別命名為fm1,fm2；并在fm1窗體中添加一個按鈕用來調(diào)用fm2如下圖

2、在fm1窗體代碼中先引用fm2, ? ?按鈕代碼調(diào)用fm2.如圖

3、生成dll,(class1.vb中不需要寫任何代碼）

二、調(diào)用dll

1、新建 一個windows應(yīng)用程序并添加一個按鈕用來調(diào)用dll中的窗體，選 擇 “項目”－“添加引用”，選擇剛才創(chuàng)建的testdll

2、窗體代碼中先引用testdll,再定義一個testdll中的fm1對象，最后執(zhí)行對象的show方法

3、運行結(jié)果如下：

vb 如何調(diào)用 NET寫的DLL?

VB.net語言

1、創(chuàng)建組件定義

新建一個Probject，在代碼中寫入：

Public Interface IDemo

Function Test() As String

End Interface

2、實現(xiàn)組件定義

新建一個Probject，添加對上述Probject的引用后，在代碼中寫入

Public Class Demo

Implements IDemo.IDemo

Public Function Test() As String Implements IDemo.IDemo.Test

Test = "Hello World!"

End Function

End Class

3、編譯出Demo.dll組件

4、使用.net的工具 Visual Studio .Net 2003 Command Prompt，輸入以下命令

Regasm Demo.dll /tlb:Demo.tlb

把Demo.dll注冊為一個com對象（這個com對象不等同于普通的用VB編寫的Com對象），并導(dǎo)出類型庫Demo.tlb

5、新建一個VB工程，添加對Demo.tlb和IDemo.tlb的引用

6、定義兩個全局變量

Dim vbDemo As Demo.Demo

Dim vbIDemo as IDemo.IDemo

7、在Form_Load事件中初始化

'初始化實體類

Set vbDemo = New Demo.Demo

'將實體類引用到抽象類

Set vbIDemo = vbDemo

8、然后，我們就可以用 vbIDemo.Test 這樣的方法了

VB.NET EXE怎么調(diào)用指定的DLL

一般VB.NET調(diào)用DLL可以通過Declare 語句在模塊級用于聲明對動態(tài)鏈接庫 (DLL) 中的外部過程的引用。

Private Declare Sub

myFunc1 Lib "mylib.dll"

(ByVal strName As String)

但是，VB.NET,C#.NET創(chuàng)建的DLL是個類庫，不能生成標(biāo)準(zhǔn)的 DLL 文件，不能采用declare ()的方式。應(yīng)該在解決方案資源管理器下的需要引用的項目的引用欄點擊鼠標(biāo)右鍵--添加對這個類庫[mylib.dll]的引用即可。

以下為VB.NET調(diào)用DLL代碼示例：

DllImport("kcomm.dll", CharSetCharSet:

=CharSet.Ansi, SetlastError:=True)

Private Shared Function gettxt(ByVal

port As Integer, ByVal wait As

Integer, ByVal _date As Long,

ByVal _time As Long, ByVal

filename As String) As Integer

End Function

根據(jù)實際情況更改你的DLL名稱、函數(shù)名、參數(shù)名和類型。

VB.NET調(diào)用DLL的只是COM組件，無法作為輸出函數(shù)的DLL，其實這只是個錯誤的說法。其實MS非常狡猾，如果你是個VB瘋狂發(fā)燒友的話，應(yīng)該早就狂試出這種可以創(chuàng)建輸出函數(shù)的DLL的方法。

VB編譯文件實際上采取了兩次編譯的方法，首先是調(diào)用C2.exe產(chǎn)生*.OBJ文件，然后調(diào)用Link.EXE連接。如果在LINK的時候添加EXPORT選項，實際上是可以輸出函數(shù)的。但是，在VB的工程選項中將這些屏蔽了。而且過分的是：VB在Build完成后會將OBJ文件刪除，這樣就無法手動通過Link來創(chuàng)建我們需要的DLL了。不過我找到一個比較齷鹺的變通的方法，就是先創(chuàng)建一個Exe工程，在Form_Load事件里面寫下面的語句:

Sub Main

If MsgBox("哈哈",

vbOKCancel) = vbOK Then

Shell "link2.exe "

Command$

End If

End Sub

然后編譯為LinkTemp.EXE，接下來將LINK.EXE改名為Link2.exe，將LinkTemp.EXE改名為Link.EXE。這樣在VB調(diào)用Link.EXE時會彈出對話框，處理就會中斷。這時就可以有機會將OBJ文件拷貝出來了。

然后我創(chuàng)建了一個ActiveX DLL工程，在這個工程里面添加一個Module并創(chuàng)建一個Public函數(shù)mathadd：

Public Function mathadd

(ByVal a As Long, ByVal

b As Long) As Long

mathadd = a + b

End Function

編譯這個工程，在Link的時候就會中斷。然后把創(chuàng)建的Class1.obj、Module1.obj、Project1.obj備份出來。然后就可以調(diào)用Link2.exe連接OBJ到DLL了，我的連接代碼是：

Link2.exe "e:\\vbdll\\Class1.obj"

"e:\\vbdll\\Module1.obj"

"e:\\vbdll\\Project1.obj"

"E:\\Program Files\\Microsoft

Visual Studio\\VB98\\VBAEXE6.LIB"

/ENTRY:__vbaS /EXPORT:mathadd /OUT:

"e:\\vbdll\\ProjectOK.dll"

/BASE:0x11000000 /SUBSYSTEM:

WINDOWS,4.0 /VERS

注意里面的/ENTRY和/EXPORT開關(guān)，/EXPORT開關(guān)聲明了輸出函數(shù)mathadd。這樣就大功告成了，可以被其他語言引入，例如在VB中，只需要：

Private Declare Function mathadd

Lib "e:\\vbdll\\ProjectOK.dll"

(ByVal a As Long, ByVal b As

Long) As Long

vb.net引用Dll的問題

上級目錄不可以，但是為了保證程序路徑改變，引用不會被破壞。可以有幾個方法：

1.將DLL文件放在程序同級目錄

2.將DLL文件放在程序子目錄

3.將DLL文件放在System32目錄下（系統(tǒng)目錄，可以直接引用DLL）

4.可以將DLL文件打包成資源文件，融合到EXE程序中，每次執(zhí)行判斷同級目錄是否有DLL文件，不存在，釋放資源文件。