Ò׽ؽØͼÈí¼þ¡¢µ¥Îļþ¡¢Ãâ°²×°¡¢´¿ÂÌÉ«¡¢½ö160KB

VB,C#ʹÓÃVCµÄ.libºÍ.hÎļþ

——————————————————————————————————
ÔÚc#ÖÐÈçºÎʹÓÃÒÔÇ°c++µÄ.lib¿âºÍ.hÍ·Îļþ
zhujiang_1977£¨Öì½­£©
ÎÒÔø¾­Óöµ½¹ýÀàËƵÄÎÊÌ⣬ÎҵĽâ¾ö·½·¨ÊÇ£¬ÓÃVC½«“ÒÔÇ°c++µÄ.lib¿âºÍ.hÍ·Îļþ”±àÒë³ÉCOM£¬ÔÙÔÚC#ÖÐʹÓ㬽á¹ûÊǹ¦ÄÜÉÏ´óÌ嶼¿ÉÒÔʵÏÖ£¬µ«ÊÇËÙ¶ÈÉÏÉÔ΢ÓÐЩÂý¡£
fa2002£¨·çÏèÍòÀ
ÎÒд¹ý2¸öVCµÄ½Ó¿ÚÁ¬½Ó³ÌÐò£¬Ã»COMʲôÊ£¬ÎÒ½¨ÒéÄãµ½MSDNÖÐÑ°ÕÒ"·âËÍ´¦Àí" ¿´¿´MSµÄ½¨Òé·½·¨ÔÙ˵¡£
zeaing£¨£©
 ÄãµÄÎÊÌâÊǸöºÜ´óµÄÎÊÌ⣬ǣÉæµ½´úÂëµÄÖØÓá¢COM   DLLµÄÖØÓá¢Win32   API   DLLµÄÖØÓ㬵ȵȡ£Ö»ÄܸøÄãһЩ½¨Ò飺  
  1£©´úÂ뼶ÖØÓÃÊÇ×ö²»µ½µÄ¡£C++µÄ´úÂë²»ÄÜÖ±½ÓÓÃÔÚC#ÖС£  
  2£©ÄãÌáµ½Á˺ܶàÏÖÓеÄÀà¿â£¬ÀýÈçOpenGL¡¢DirectXµÈµÈ¡£ÕâЩÀà¿â£¬¶¼ÊÇÒÔDLLÐÎʽ³öÏֵģ¬ÒªÃ´ÊÇWin32   API   DLL£¬ÒªÃ´ÊÇCOM   DLL¡£ÎÞÂÛÊÇÄÄÒ»ÖÖ£¬¶¼¿ÉÒÔÔÚC#ÀïÃæͨ¹ýInteroperationÖØÓá£ÍøÉÏÓкܶàDLLImportºÍCOM   InteropµÄÀý×ÓºÍÎĵµ¡£  
  3£©Èç¹ûÐèÒªÖØÓÃ.libºÍ.h£¬¾ÍÐèÒªÇø±ðÇé¿ö¶Ô´ý¡£Èç¹û.libÊÇ´¿´âµÄAPIº¯Êý¿â£¬ÄÇ¿ÉÒÔ°Ñ.libºÍ.h±àÒë³É.dll£¬¾Í¿ÉÒÔÔÚC#ÀïÃæͨ¹ýDLLImportÀ´ÖØÓá£Èç¹û.libºÍ.hÀïÃæÓÐ×Ô¶¨µÄÀ࣬¾Í±È½ÏÂé·³£¬×îºÃÊÇ°ÑÔ´Âë¿Ù³öÀ´£¨Èç¹ûûÓÐÔ´Â룬¾Í×Ô¼ºÔÙÔÚÍâÃæ°üÒ»²ã×Ô¼ºµÄÀࣩ£¬È»ºóÓÃCOMµÄ·½·¨ÖØаüװһϣ¬ÔÙ±àÒë³ÉDLL£¬ÕâÑù¾Í¿ÉÒÔÔÚC#ÀïÃæÓÃCOM   InteropÀ´ÖØÓᣠ 
   
  unmanaged   codeÊÇÒ»¸öºÜ´óºÜ´óµÄ»°Ì⣬½¨ÒéÄãÂýÂýÌå»áÂýÂý×êÑУ¬Ç°Ãæzhujiang_1977,   fa2002ºÍ   Muf¸øµÄ½¨Ò鶼ºÜÓвο¼¼ÛÖµ¡£Ö»ÓжÔWin32   API   DLL¡¢COMÒÔ¼°.NETÖеÄInteroperation¶¼ÒѾ­ÊìϤÁË£¬²ÅÄÜÈÚ»á¹áͨµÄ´¦Àí´úÂëÖØÓõÄÎÊÌâ¡£Ò»¿ÚÊdzԲ»Ï´óÅÖ×ӵġ£
 
Çë½ÌC++DLLµÄÎÊÌ⣬ÎÒÓÐÒ»¸ö.hºÍ.libÎļþ£¬ÇëÎÊÄÜÉú³ÉDLLÎļþÂð£¿
popy007£¨Twinsen£©
½¨Á¢Ò»¸öDLLµÄ¹¤³Ì£¬°Ñ.hºÍ.libÎļþµ¼Èë½ø¹¤³Ì£¬È»ºóÄ㽨Á¢Ò»Ð©×Ô¼ºµÄ·½·¨£¬Ã¿Ò»¸ö·½·¨ºÍ.hºÍ.libÖеÄÒ»¸ö·½·¨¶ÔÓ¦£¬²¢°Ñÿһ¸öºóÕß·â×°µ½Ò»¸ö¶ÔÓ¦µÄÇ°Õß¡£×îºó£¬µ¼³öDLLºó£¬Äã¿ÉÒÔʹÓÃ×Ô¼º±àдµÄ·½·¨£¬¶øÕâ·½·¨·â×°µÄ¶¼Ê


Ïà¹ØÎĵµ£º

VB È¡µØÖ·º¯Êý´óÈ«

Public Declare Function VarPtrArray Lib "msvbvm60.dll" Alias "VarPtr" (Var() As Any) As Long
Public Declare Function VarPtrStringArray Lib "msvbvm60.dll" Alias "VarPtr" (Var() As Any) As Long
È¡¶ÔÏóµØÖ·: ObjPtr
È¡OLE¶ÔÏóµÄµØÖ·: OLE_NAME.LpOleObject
È¡º¯ÊýµØÖ·: AddressOf
È¡×Ö·û´®µØÖ·: StrPtr
È¡ ......

VBÈ¡µÃÏ߳̾ä±ú

 Private Declare Function OpenThread Lib "kernel32" (ByVal dwDesiredAccess As Long, ByVal bInheritHandle As Long, ByVal dwThreadId As Long) As Long
Private Const THREAD_ALL_ACCESS = &H1F03FF
 OpenThread(THREAD_ALL_ACCESS, 1, Ïß³ÌID)    'ÓÉÏß³ÌIDÈ¡µÃÏ߳̾ä±ú,·µ»ØÏß³Ì¾ä± ......

VB: È¡ÍøÒ³Ô´Âë

Private Declare Function URLDownloadToFile Lib "urlmon" Alias "URLDownloadToFileA" ( _
    ByVal pCaller As Long, _
    ByVal szURL As String, _
    ByVal szFileName As String, _
    ByVal dwReserved As Long, _
  ......

VBÖеõ½ÆÁĻ֧³ÖµÄ·Ö±æÂʺÍɫλ

http://topic.csdn.net/t/20030306/11/1497896.html#
 ¹¤³ÌÎļþÃû£ºChdsp.vbp  
Type=Exe
Reference=*\G{00020430-0000-0000-C000-000000000046}#2.0#0#..\PWIN95\SYSTEM\\STDOLE2.TLB#OLE Automation
Module=Module1; ChDsp.bas
Form=ChDsp.frm
Startup="Form1"
He ......
© 2009 ej38.com All Rights Reserved. ¹ØÓÚE½¡ÍøÁªÏµÎÒÃÇ | Õ¾µãµØͼ | ¸ÓICP±¸09004571ºÅ