易語言方面:函數
.版本 2 .子程序 show, , 公開 ' 本名稱子程序用做測試程序用,僅在開發及調試環境中有效,編譯發佈程序前將被系統自動清空,請將全部用做測試的臨時代碼放在本子程序中。 ***注意不要修改本子程序的名稱、參數及返回值類型。 載入 (窗口1, , 真) .子程序 add, 整數型, 公開 .參數 x, 整數型 .參數 y, 整數型 返回 (x + y)
VC調用方法:測試
void CWebcyzDlg::OnButton1() { //動態加載DLL的方法 HINSTANCE hMod = LoadLibrary("123.dll");//獲取dll實例 typedef int(WINAPI *aadd)(int,int);//聲明一個aadd函數 aadd myadd = (aadd)GetProcAddress(hMod,"add");//用聲明自定義一個myadd函數,並關聯實例和DLL中的函數名稱 CString str; str.Format("%d",myadd(20,5));//直接調用自定義函數便可完成DLL中函數的調用了 MessageBox(str); FreeLibrary(hMod); } void CWebcyzDlg::OnButton2() { // TODO: Add your control notification handler code here HINSTANCE hMod = LoadLibrary("123.dll");//獲取dll實例 typedef void(WINAPI *show)();//聲明一個show函數 show myshow = (show)GetProcAddress(hMod,"show");//用聲明自定義一個show函數,並關聯實例和DLL中的函數名稱 myshow();//調用自定義函數便可完成DLL中函數的調用 FreeLibrary(hMod); }