visual basic內(nèi)嵌匯編語(yǔ)言解決方案

1、VB簡(jiǎn)單易用，但功能有時(shí)候受限制。VC、Delphi都可以直接在程序中寫(xiě)匯編代碼，可惱的是，VB不行。我在網(wǎng)上也看過(guò)許多有關(guān)于VB嵌入?yún)R編的方法，不過(guò)有些方法，過(guò)于復(fù)雜，而且也沒(méi)相應(yīng)的介紹。我這里提供一種方法，也許大家以后可能有用！基本思路：匯編代碼，可以存在一個(gè)byte類型的數(shù)組中，然后通過(guò)某種手段，把系統(tǒng)控制權(quán)，轉(zhuǎn)交給這段匯編代碼，我們的匯編代碼段，就得到了執(zhí)行。但如何讓這段匯編代碼，獲得系統(tǒng)的控制權(quán)限呢？查查WINAPI手冊(cè)，就可

2、以知道有CallWindowProc這個(gè)函數(shù)。這個(gè)函數(shù)本是用于調(diào)用用戶自己定義的窗口過(guò)程的，其原形如下：FunctionCallWindowProcLib“user32“Alias“CallWindowProcA“(ByVallpPrevWndFuncAsLongByValhWndAsLongByValMsgAsLongByValwParamAsLongByVallParamAsLong)AsLong它有5個(gè)參數(shù)。lpPrevWnFun

3、c是一個(gè)long型，等于用戶自己窗口過(guò)程的地址，其余3個(gè)都是窗口過(guò)程所必須的參數(shù)，詳見(jiàn)MSDN。我們只需要關(guān)心第一個(gè)參數(shù)：lpPrevWndFunc，窗口過(guò)程地址。如果，我們把自己的匯編代碼地址，傳進(jìn)去會(huì)怎么樣？當(dāng)然，CallWindowProc就把這個(gè)地址，當(dāng)成窗口過(guò)程地址，然后，調(diào)用這段匯編代碼了。我們的匯編代碼便得到執(zhí)。。當(dāng)然，也得裝摸做樣的吧，將其余4個(gè)參數(shù)傳進(jìn)去，就傳4個(gè)0算了，因?yàn)檫@4個(gè)參數(shù)，我們更本不用，但又是CallWi

4、ndowProc必須的，不要忘了，我們傳進(jìn)去的lpPrevWndFunc，并非真正的窗口過(guò)程地址，而是自己的匯編碼地址。具體一點(diǎn)，比如，我們要嵌入一段什么也不干的匯編代碼：DimAsmCode()asbyteredimAsmCode(8)生成機(jī)器代碼AsmCode(0)=參數(shù)入棧push0push0push0pushxxxx00afh；（當(dāng)執(zhí)行call時(shí)，自動(dòng)執(zhí)行）為了能讓窗口過(guò)程執(zhí)行結(jié)束后堆棧指針保持平衡，當(dāng)然要執(zhí)行相應(yīng)的pop指令，