十年網(wǎng)站開發(fā)經(jīng)驗 + 多家企業(yè)客戶 + 靠譜的建站團隊
量身定制 + 運營維護+專業(yè)推廣+無憂售后,網(wǎng)站問題一站解決
DLL(動態(tài)鏈接庫)是一個很有用的東西,在開發(fā)大項目的時候顯得非常重要,因為多人合作開發(fā)時,可以給每個人分配一個任務(wù),用DLL完成,最后組合起來,就不會出現(xiàn)互相沖突的問題。這里給出最簡單的DLL編寫與調(diào)用的示例
創(chuàng)新互聯(lián)主要從事成都做網(wǎng)站、成都網(wǎng)站制作、網(wǎng)頁設(shè)計、企業(yè)做網(wǎng)站、公司建網(wǎng)站等業(yè)務(wù)。立足成都服務(wù)樂都,10多年網(wǎng)站建設(shè)經(jīng)驗,價格優(yōu)惠、服務(wù)專業(yè),歡迎來電咨詢建站服務(wù):028-86922220
首先,我們打開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點虐 提示一個dll初始化失敗,這個問題是因為msoe.dll這個DLL文件失效了,重新注冊這個DLL文件就可以解決問題了。
上級目錄不可以,但是為了保證程序路徑改變,引用不會被破壞??梢杂袔讉€方法:
1.將DLL文件放在程序同級目錄
2.將DLL文件放在程序子目錄
3.將DLL文件放在System32目錄下(系統(tǒng)目錄,可以直接引用DLL)
4.可以將DLL文件打包成資源文件,融合到EXE程序中,每次執(zhí)行判斷同級目錄是否有DLL文件,不存在,釋放資源文件。
在您的代碼中,您已經(jīng)成功使用了RegAsm命令將DLL注冊為COM組件,并在VB6中成功引用了該組件的類型庫文件(TLB文件)。此外,您還在VB6代碼中聲明了一個YCImageDo類型的對象,并成功創(chuàng)建了該對象。
但是,當(dāng)您嘗試使用YCImageDo對象的屬性和方法時,卻發(fā)現(xiàn)這些成員不可見。這可能是因為在編寫DLL代碼時您沒有正確地聲明這些成員的可見性。
在VB.NET中,您可以使用"Public"關(guān)鍵字來聲明一個類型的成員(屬性、方法、過程等)對外可見,而使用"Private"關(guān)鍵字則聲明該成員僅在類型內(nèi)可見。如果您希望YCImageDo類型的成員在VB6代碼中可見,則應(yīng)將這些成員聲明為Public類型。
例如,如果您希望YCImageDo類型擁有一個名為"GetImage"的方法,則可以在DLL代碼中按如下方式聲明該方法:
Public Function GetImage() As String
' 在這里編寫方法的代碼
End Function
同樣,如果您希望YCImageDo類型擁有一個名為"ImagePath"的屬性,則可以在DLL代碼中按如下方式聲明該屬性:
Public Property ImagePath As String