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

vb×öºÃµÄocx£¬ÔõÑùÔÚ°²×°³ÌÐòÖÐ×¢²á°²×°

×öºÃÁË£¬Ò»¸öocx¿Ø¼þ¡£ÔõÑùÔÚvbµÄ°²×°³ÌÐòÖÐ×¢²áʹÓð¡¡£¾ÍÊǰÑ×öºÃµÄocx¿Ø¼þ°üº¬µ½°²×°³ÌÐòÖÐÒ»ÔËÐа²×°³ÌÐò¾Í°ÑÕâ¸ö¿Ø¼þ°²×°µ½±¾»ú°¡¡£

лл¸÷λÁË£¡£¡£¡

±¾È˵ÚÒ»´ÎÓÃvb×ö¶«Î÷£¡£¡
´Ó¶øÊ¹±¾»úÄÜʹÓÃÕâ¸ö¿Ø¼þ

ÔËÐÐ----Regsvr32 ocx¿Ø¼þµÄ·¾¶----È·¶¨

ÎÒÖªµÀÔõôÔÚ³ÌÐòÀïÃæÔõôע²á£¬¾ÍÊDz»ÖªµÀÔõô°ÑÕâ¾ä»°ÔÚ°²×°µÄ¹ý³ÌÖÐÖ´ÐÐ

×ܲ»ÄÜÈÃÓû§£¬ÊÖ¶¯×¢²á.ocx¿Ø¼þ°É

1.ÔÚ±¾»úµÄ»° Äã¿ÉÒÔÔÚ×óϽǵ㠿ªÊ¼ ÔËÐÐ ÊäÈë regsvr32 ?:\windows\system32\???.ocx

2.ÒªÔÚ¿Í»§¶Ë°²×°µÄ»°, Äã¿ÉÒÔ°Ñ???.ocxÀ¦ÔÚ ×ÊÔ´Îļþ ÖÐ,ÔÚ¿Í»§¶ËÊͷŲ¢×¢²á.

VB code:
Shell "Regsvr32 C:\WINDOWS\system32\VCFI32.OCX"


µ±ÄãÉ趨ºÃºó,°²×°µÄ¹ý³ÌÖа²×°Èí¼þ×Ô¶¯¸øOCX,dll×¢²á.

À¦°óÔÚ×ÊÔ´ÇøÖУ¬Èç¹ûÄãÖªµÀPEÎļþÀïÓÐ×ÊÔ´ÇøÕâô»ØÊµĻ°£¬µ÷ÓÃapiµÄbeginupdateresourceµÈº¯Êý½«ÄãµÄocxдÈë´æ´¢£¬ÔÙ³ÌÐòÖмÓÈëÒ»¾äÊÍ·Å×ÊÔ´µÄ´úÂ룬ÓÃloadresdata¾ÍºÃÁË£¬vbÄÚÖõģ¬ÔÙ¼ÓÒ»¾äshellµÄ´úÂë¾ÍºÃÁË£¬ÓÃshellµ÷ÓÃregsvr32À´×¢²áVB code:
Sub main()
If Dir(CheckFilePath(App.Path) & "123456.ocx") = vbNullString Then
Call ResShiFang(CheckFilePath(App.Path) & "CnCalendar.ocx")
Sleep 1000
Shell "regsvr32 " & CheckFilePath(App.Path) & "123456.ocx /s", vbNo


Ïà¹ØÎÊ´ð£º

¡¾¼±Çó¡¿VBÖÐʹÓÃWScriptµ÷ÓÃÍⲿÃüÁî - VB / »ù´¡Àà

ÔÚÏÂÊÇvbµÄÐÂÊÖ£¬Ïëд¶Î³ÌÐò£¬ÔÚvbÖУ¬Ê¹ÓÃwscriptµ÷ÓÃһЩÍⲿµÄÃüÁµ«ÊdzÌÐòÖ´ÐÐÒ»Ö±ÓдíÎó£¬Çë¸÷λ¸ßÊÖ°ïæ½â´ðÏ£¬Ð»Ð»¡£
´úÂëÈçÏ£º
VB code:

Private Function getFile_CMD(filename, filepath) As Bo ......

³õѧvb£¬Çë¸÷λ´óϺ¸øµã½¨Òé - .NET¼¼Êõ / VB.NET

¸Õ½Ó´¥vb6.0£¬ÓÐЩÃþ²»µ½µÄ¸Ð¾õ£¬¾´Çë¸÷λ´óϺ¸øµã½¨Ò飡£¡£¡
²»»á°É£¬ÍƼöѧϰ.NET¡£Ë³±ãÍÆ¼öʵÓôúÂëÍøÕ¾http://bingning.net/free/source/index.html¡£

Èç¹ûû»ù´¡ ¾ÍÓÃÒ×ÓïÑÔ°É ÖÐÎıà³ÌÄØ ´úÂë¶¼ÊÇÖÐÎÄ ......

vbÉú³Éexe´íÎó - VB / »ù´¡Àà

±¨Õâ¸ö´í:
compile Error
sub or function not defined
ºÍÎÒÒýÓÃÕâ¸ö¿âº¯ÊýÓйØÏµÂð£¿
Private Declare Function GetPrivateProfileString Lib "kernel32" Alias _
  "GetPrivatePr ......

¹ØÓÚVB DIM ds as new DataSetÎÊÌâ - VB / »ù´¡Àà

DIM ds as new DataSet
ÎÒÕâÑùÉùÃ÷ ÔõÀÏÊDZ¨ Óû§¶¨ÒåÀàÐÍ䶨Ò壿 Õâ¸öÐèÒªÒýÓÃʲôÂ𣿣¿
ǰÌáÊÇDataSet¶ÔÏóÒª´æÔÚ,¾ÍÊǶÔÏóä¯ÀÀÆ÷ÖÐÓÐËü.ûÓоÍÒªÒýÓÃ.

datasetÊÇADO.NET¶ÔÏó
Èç¹ûÄãÓõÄÊÇvb.net£¬ÄÇôÔÚ´ ......

¹ØÓÚvbÓïÒô¿ª·¢µÄÎÊÌ⣿ - VB / ¶àýÌå

ÔÚÍøÉÏÏÂÔØÁËspeechsdk51LangPack°²×°ºó£¬ÓÃvb¿ÉÒÔ·¢Òô£¨ÖÐÎÄ£©£¬ÀïÃæÓиögirl xiaokunµÄ·¢Òô£¬¶ÔÖÐÎĺܺÃÌý¡£µ«ÊÇÕâ¸öspeechsdk51LangPackÓÐ100¶àM£¬ÎÒµÄvbÏîÄ¿´ò°üºó£¬Ôõô²Å¿ÉÒÔ×°µ½ÆäËû»ú×ÓÉÏÒ²ÄÜÓã¿£¿×ܲ»ÄÜÿ ......
© 2009 ej38.com All Rights Reserved. ¹ØÓÚE½¡ÍøÁªÏµÎÒÃÇ | Õ¾µãµØÍ¼ | ¸ÓICP±¸09004571ºÅ