VBµ÷ÓÃDLLÖеĺ¯Êý - VB / COM/DCOM/COM+
ÎÒÏëµ÷ÓÃDLLÖк¯Êý
ÒýÓÃ
dim obj as Object
set obj=new ¡¡
obj.function()
ÄãµÄdllÊÇʲôÀàÐ͵ģ¿
Èç¹ûÊÇAPIÀàÐ͵ģ¬ÄãµÃÏÈÉùÃ÷ÐèÒªµ÷Óõĺ¯Êý
Èç¹ûÊÇActive X Dll£¨active dll¾ÍÊÇ·â×°ÁË×é¼þµÄdll£©£¬ ÄÇôÄã¾ÍÒªÏÈÒýÓã¬È»ºóÉùÃ÷¶ÔÏ󣬲¢ÊµÀý»¯¡£ÔÙ½øÐе÷ÓÃ
ÏÈÒªÇå³þDLLÀï·â×°ÁËʲôÑùµÄº¯Êý ¼°Æä²ÎÊýÀàÐÍ
ÖªµÀÁËÖ®ºóÖ±½Ó¼ÓÔØÒýÓþͿÉÒÔÁË
xuexile
·ÖÇå³þdllÊÇʲôÀàÐ͵Ä
activex dll£¬¿ÉÒÔʹÓà createobject£¬Èç¹ûÕâ¸öcomÖ§³Ö×Ô¶¯»¯½Ó¿ÚµÄ»°¡£
·ñÔò¿ÉÒÔÓÃcoinitialize cocreateinstanceµÈһϵÁÐapi¡£
native dll£¬¿ÉÒÔʹÓÃdeclareÉùÃ÷º¯ÊýÔÐÍ£¬È»ºóʹÓ㬻òÕßʹÓÃLoadLibrary¶¯Ì¬¼ÓÔØ¡£
.net dll£¬¿ÉÒÔÏȰü×°³Écom dll£¬È»ºóʹÓá£
ÌáÎʵÄÒ¯.
·ÖÇå³þdllÊÇʲôÀàÐ͵Ä
activex dll£¬¿ÉÒÔʹÓà createobject£¬Èç¹ûÕâ¸öcomÖ§³Ö×Ô¶¯»¯½Ó¿ÚµÄ»°¡£
·ñÔò¿ÉÒÔÓÃcoinitialize cocreateinstanceµÈһϵÁÐapi¡£
native dll£¬¿ÉÒÔʹÓÃdeclareÉùÃ÷º¯ÊýÔÐÍ£¬È»ºóʹÓ㬻òÕßʹÓÃLoadLibrary¶¯Ì¬¼ÓÔØ¡£
.net dll£¬¿ÉÒÔÏȰü×°³Écom dll£¬È»ºóʹÓá£
End_rbody_64640724//-->
¸Ã»Ø¸´ÓÚ2010-04-14 08:55:19±»¹ÜÀíԱɾ³ý
¶ÔÎÒÓÐÓÃ[0]
¶ª¸ö°åש[0]
ÒýÓÃ
¾Ù±¨
¹ÜÀí
TOP
vvhh33qq13
(vvhh33qq13)
µÈ¡¡¼¶£º
#9Â¥ µÃ·Ö£º0»Ø¸´ÓÚ£º2010-04-14 11:59:20
Ïà¹ØÎÊ´ð£º
ÏÖÔÚÎÒÏë¸ù¾ÝtreeviewÉÏÿ¸ö½ÚµãµÄȨÏÞ£¬Ã»ÓÐȨÏ޵Ľڵ㲻Äܱ»Ñ¡ÖУ¬¶øÇҳɻÒÉ«£¬ÔõôʵÏÖ£¬ÔÚÏߵȡ£¡£¡£
Õâ¸ö£¿¡£¡£¡£
Ã²ËÆÃ»·¨¡£
ÊÔÊÔÄܲ»ÄܸÄijЩnodeµÄÑÕÉ«£¬¼Ç¼ÏÂÉϴεÄnodeclickÀïµÄnode¡£
Ï´εã»÷µÄÈç¹ ......
ÎÒÏë°ÑwordÁí´æÎªxmlÖ®ºó£¬ÓÃvb¶ÁÈ¡Õâ¸öxmlµÄÄÚÈÝ£¬ÇëÎÊÈçºÎʵÏÖ£¿
dim f as integer
dim b() as byte
dim s as string
dim L as long
f=freefile()
open "abc.xml" for binary access read as #f
......
Ôõô°ÑÒÑÖªµÄÊý¾Ý±£´æ³ÉxmlÎļþ£¬ÏÖÔÚÒÑÖªµÄÊý¾ÝÊÇ
<?mso-application progid="Excel.Sheet"?>
<Workbook xmlns="urn:schemas-microsoft-com:office:spreadsheet"
xmlns:o=& ......
form1ÖÐÓÐtext1-8£¬ ºÍcommand1
text8ÖÐΪ³ÌÐò´úÂ루Éú³É´°ÌåΪform2£¨ÒÑ×öºÃ£©£©
µ¥»÷command1ºó½«text2ÖеĴúÂëÉú³ÉEXEµ½d:\ ²¢ÇÒtext1-7·Ö±ð¶ÔÓ¦
²úÆ·Ãû ¹«Ë¾Ãû ºÏ·¨°æÈ¨ ºÏ·¨É̱ê ÎļþÃèÊö ×¢ÊÍ ±êÌâ
......
¸Õ½¨ÁËÒ»¸öȺ:ÖÐɽVB±à³Ì(105787219)
ÓÐÔÚÖÐɽ¼°ÖÐɽÖܱߵijÌÐòÔ±Çë¼ÓÈë.´ó¼ÒÒ»Æð̽ÌÖÎÊÌâ.ºÏ×÷ÏîÄ¿.
¾¡¹Ü°³²»ÊÇÖÐɽµÄ£¬Ò²½øÀ´²ä·Ö¡¡
·ðɽµÄÐÐÂð,¹ãÖݵÄÐÐÂð?
ÓÑÇéÖ§³Ö
»Ø¸´ÄÚÈÝÌ«¶ÌÁË£¡
°ï¶¥ ......