vb封裝dll實(shí)例講解access

1、VB封裝封裝DLL實(shí)例講解（一）實(shí)例講解（一）一、DLL基本概念（一）概念DLL即動(dòng)態(tài)鏈接庫(kù)（DynamicLinkLibrary），是由可被其它程序調(diào)用的函數(shù)集合組成的可執(zhí)行文件模塊。DLL不是應(yīng)用程序的組成部分，而是運(yùn)行時(shí)鏈接到應(yīng)用程序中。（二）主要優(yōu)點(diǎn)：1、多個(gè)應(yīng)用程序可以共享一個(gè)DLL，而且當(dāng)多個(gè)應(yīng)用程序調(diào)用庫(kù)的同一個(gè)函數(shù)時(shí)，可執(zhí)行文件中裝入的只是該函數(shù)的內(nèi)存地址，從而節(jié)省內(nèi)存和磁盤(pán)空間；2、使用動(dòng)態(tài)鏈接庫(kù)易于我們維護(hù)用戶程序，

2、即使對(duì)動(dòng)態(tài)鏈接庫(kù)進(jìn)行修改也不會(huì)影響用戶程序；3、從ACCESS角度而言，還可以更好的確保核心代碼的安全。二、用VB封裝VBA代碼，構(gòu)建自定義的DLL動(dòng)態(tài)鏈接庫(kù)（一）ACCESS中實(shí)例代碼下面是一個(gè)“快速提取字符串中數(shù)字.mdb”實(shí)例（該實(shí)例在文件包中），單擊“提取結(jié)果”按鈕，將文本框中的數(shù)字在彈出消息顯示出來(lái)。我將就這個(gè)實(shí)例演示如何將該實(shí)例VBA代碼封裝成為DLL。?按鈕單擊事件代碼如下：PrivateSubCmdFindnumber_

3、Click()DimstrMAsString初始字符串DimstrOutAsString輸出字符串變量DimIstrM=Me.Text1從第一個(gè)字符向最后一個(gè)字符循環(huán)以提取每個(gè)字符FI=1ToLen(strM)判斷是否為0到9字符是則賦值輸出If(strMI1)Like“[09]“ThenstrOut=strOut&(strMI1)EndIfNextI用MsgBox函數(shù)進(jìn)行輸出測(cè)試MsgBoxstrOut步驟三：步驟三：修改類名步驟四：