十年網(wǎng)站開發(fā)經(jīng)驗 + 多家企業(yè)客戶 + 靠譜的建站團隊
量身定制 + 運營維護+專業(yè)推廣+無憂售后,網(wǎng)站問題一站解決
Private Declare function x Lib "dlltest.dll" (ByVal a As long, byval b as long) as long

創(chuàng)新互聯(lián)建站專注于赤城網(wǎng)站建設服務及定制,我們擁有豐富的企業(yè)做網(wǎng)站經(jīng)驗。 熱誠為您提供赤城營銷型網(wǎng)站建設,赤城網(wǎng)站制作、赤城網(wǎng)頁設計、赤城網(wǎng)站官網(wǎng)定制、微信小程序服務,打造赤城網(wǎng)絡公司原創(chuàng)品牌,更為您提供赤城網(wǎng)站排名全網(wǎng)營銷落地服務。
新建---類庫---把你的函數(shù)放在新建的類庫中-----生成ClassLibrary1
在net程序中---引用----對應目錄下的ClassLibrary1.dll
對應的代碼定義如:
Dim
mydll
As
New
ClassLibrary1.Class1
最后就可以用mydll調(diào)用你的函數(shù)MyFunction了:
mydll
.MyFunction(1,
2)
注意:vb.net編寫的DLL不能用
API函數(shù)
的方式通過Declare宣告,只能引用的方式使用
vb.net要編寫的DLL能被vb6.0引用,需要先在編譯屬性中選擇“為COM
互操作
注冊”打勾
然后在Visual
Studio
2008
命令提示中運用RegAsm命令加/tlb命令生成tlb文件
例如:c:\ReleaseRegAsm
ClassLibrary1.dll
/tlb回車就會在當前目錄生成ClassLibrary1.tlb文件
vb6.0中引用ClassLibrary1.tlb即可。
一、帶窗體的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應用程序并添加一個按鈕用來調(diào)用dll中的窗體,選 擇 “項目”-“添加引用”,選擇剛才創(chuàng)建的testdll
2、窗體代碼中先引用testdll,再定義一個testdll中的fm1對象,最后執(zhí)行對象的show方法
3、運行結果如下:
DLL在生成后,里內(nèi)的函數(shù)會有變化,所以你要先用軟件exesc查一下它變化的結果是什么
之后這樣寫,我是用C#寫的,對你應該有幫助
[DllImport("facecom.dll", EntryPoint = "?fnfacecom@@YAHXZ")]
public extern static int fnfacecom();
?fnfacecom@@YAHXZ
這個就是那個就是在軟件里查到的改變后的結果,你寫在入口號處就可以了
這個我用過了沒問題
.net 里面 項目-添加引用-瀏覽-找到你的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是個類庫,不能生成標準的 DLL 文件,不能采用declare ()的方式。應該在解決方案資源管理器下的需要引用的項目的引用欄點擊鼠標右鍵--添加對這個類庫[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ā)燒友的話,應該早就狂試出這種可以創(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開關,/EXPORT開關聲明了輸出函數(shù)mathadd。這樣就大功告成了,可以被其他語言引入,例如在VB中,只需要:
Private Declare Function mathadd
Lib "e:\\vbdll\\ProjectOK.dll"
(ByVal a As Long, ByVal b As
Long) As Long