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

VB´ò°üÎÊÌâ - VB / ·Ç¼¼ÊõÀà

½ñÌìͻȻÏëµ½£¬VBÓÐûÓÐÏñDELPHIÒ»Ñù£¬ºÃ¶à¿Ø¼þÉú³ÉÒÔºó¶¼ÔÚÒ»¸öEXEÀïÃæ£¬È»ºó´ò¿ªEXE£¬×Ô¼º¾ÍÏàÓ¦µÄ×¢²á£¨»òÕß˵DELPHIµÄ²»ÏóCOM×é¼þ²»ÓÃ×¢²á£©ÁËÄÇЩ¿Ø¼þÄØ£¿
Ê×ÏÈÏëµ½µÄÊÇMoleBoxµ«ÊÇËÆºõÎÒҲûÓùý£¬Ó¦¸ÃûÓÐÄÇôţ±Æ¿ÉÒÔרÃŶԸ¶VB³ÌÐòרÃÅ×¢²áCOM×é¼þµÄ¡£ËùÒÔÇëÎʸ÷λ¸ßÊÖ£¿

VB´ò°ü³ÉÒ»¸öEXEÎļþ£¬µ«ÊDz»Êǰ²×°Îļþ£¬µã¿ª¾Í¿ÉÒÔÓõ쬲¢ÇÒÓÐ×¢²áCOM×é¼þ£¬ÄÜÈÃVB³ÌÐòÕý³£Ö´ÐеĴò°ü¹¤¾ßÂð£¿

ÍøÉÏËÑÁËÏ£¬»òÐíÊÇÎҹؼü´ÊËѵò»¶Ô£¬·´ÕýÎÒÊÇûÕÒµ½¡£µ«ÊÇûÓеϰ£¬ÎÒµ¹ÓиöÏë·¨£¬ÒÔǰ²»ÊÇ¿´¹ýÀÏÂíËûÄÇÓиöÌû×Ó¾ÍÊÇ˵£¬²»×¢²áCOM×é¼þ£¬Ö±½Óµ÷ÓÃÀïÃæµÄDllRegisterServerµÈ¼¸¸öº¯Êý½øÐвÙ×÷¡£àÅ£¬ÊµÔÚûÓеϰ£¬ÒÔºóÓÐʱ¼ä¿ÉÄÜ»á×ö¸ö¡£·½±ãÁË×Ô¼º£¬Ò²·½±ãÁË´ó¼Ò£¬¶øÇÒÒÔºóÒ²²»ÓÃÿ´ÎÍÏ×ſؼþÅÜ£¬»¹ÅÂ×Ô¼ºÐÁÐÁ¿à¿àдµÄ¿Ø¼þ±»±ðÈËÖ±½ÓÄÃÀ´Ö÷ÒåÈ¥ÓÃÁË¡£
Ò»¼¤¶¯´òÁ˺ܶà´í±ð×Ö¡­¡­

û¿´¶®LZµÄÒâ˼

ÎÒ¿´¶®ÁË¡£¡£¡£Â¥Ö÷ÊÇÏë×ö³ÉÂÌÉ«µÄµ¥¸öexe

д¸öÅú´¦Àí °Ñ¿ÉÄÜÓõĿؼþ¶¼ÓÃregsvr32 ÕûÒ»ÏÂÒ²²»Âé·³

Ë«»÷һϾÍOK


Ïà¹ØÎÊ´ð£º

vb¶ÁÈ¡ÓÃwordת»»³ÉµÄxmlÀïµÄÊý¾Ý - VB / »ù´¡Àà

Private Sub Command1_Click()
Dim MyString() As String
Open "a.xml" For Binary As #1 ' ´ò¿ª¸Õ´´½¨µÄÎļþ¡£
ReDim MyString(LOF(1) - 1)
  Put #1, , MyRecord ' ¶ÁÈëËùÓÐ×Ö·ûµ½±äÁ¿ÖÐ ......

vb¶ÁÈ¡xml - VB / »ù´¡Àà

ÏÖÔÚÓиöxmlÎļþÊÇ<?xml version="1.0"?>
<?mso-application progid="Excel.Sheet"?>
<Workbook xmlns="urn:schemas-microsoft-com:office:spreadsheet"
 xm ......

vb²Ù×÷excel - VB / »ù´¡Àà

ÎÊÌ⣺
ÏÖÔÚAccessÊý¾Ý¿âÖÐÓÐÁ½ÕűíTableAºÍTableB
TableAÖÐÓмǼÈçÏÂ:
×Ö¶Î1(Name) ×Ö¶Î2(Num)
  A 3
  A 4
  B 6
  ... ......

VB µ÷ÓÃInet¿Ø¼þÏÂÔØ³ö´í - VB / ÍøÂç±à³Ì

¸÷λ¸ßÊÖ£¬Ð¡µÜ×î½üÅöµ½Ò»¸öÎÊÌ⣺ԭÏÈдµÄ³ÌÐò´ó¸ÅµÄ˼·ÊÇ£ºÊ×ÏÈwebbrowser´ò¿ªÍøÖ·£¬ÍøÖ·ÏÔʾºó£¬µã»÷ÍøÖ·ÉϵÄijһ¸öÁ¬½Ó£¬µ±webbrowser¼ì²âµ½ÍøÖ·ÒѾ­Á¬½Óµ½ÏëÒªµÄµØÖ·Ê±ºò¾Í¿ªÊ¼ÏÂÔØÎļþ£¬µ±ÓÃIE6µÄʱºòÏÂÔ ......
© 2009 ej38.com All Rights Reserved. ¹ØÓÚE½¡ÍøÁªÏµÎÒÃÇ | Õ¾µãµØÍ¼ | ¸ÓICP±¸09004571ºÅ