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

vbÀàµÄÏú»Ùº¯ÊýºÎʱ±»µ÷Óã¿

ÎÒÊÇÔÚaccessµÄvbaÀﶨÒåÁËÒ»¸öÀàÄ£¿é£¬³õʼ»¯¼°µ÷Óö¼Õý³£
Private Sub Class_initialize()µÄµ÷ÓÃÊÇÕý³£µÄ

×îºó ¡°Set m_´°Ìå = Nothing ¡± ¡®m_´°Ìå ÊÇÀàµÄʵÀý
Private Sub Class_terminate() Õâ¸öÏú»Ùº¯Êý²¢Ã»Óб»µ÷Óã¿Ê²Ã´Ô­Òò°¡£¿

ÄÄλ´óÏÀÖ¸µãÏÂÔÚ´¿vbÏÂÊÇÔõÑùµÄ£¿
¹Ø×¢¡£¡£¡£¡£¡£

set object=nothing ÏȶԶÔÏóµÄÒýÓüÆÊý¼õÒ»£¬Èç¹ûÒýÓüÆÊýΪ0ʱ²ÅÏú»Ù¶ÔÏó¡£¹À¼ÆÊDZðµÄµØ·½»¹ÓжԶÔÏóµÄÒýÓÃ

àÞ£¬¹À¼ÆºÍÕâ¸öÓÐµã¹ØÏµ¡£
¾ßÌåÇé¿öÊÇ£º
³ÌÐòÖÐÖ»ÓÐÒ»¸öµØ·½°ÑÕâ¸öÀàʵÀý»¯£¨ÔÚÁíÍâÒ»¸ö´°ÌåÖУ©
ÔÚ´°Ì幨±Õʱ¡°Set m_´°Ìå = Nothing¡±£¬ÒýÓÃÓ¦¸ÃÖ»ÓÐÒ»¸ö
µ«ÊÇÔÚÕâ¸öÀàÖÐÓÖ¶¯Ì¬Éú³ÉÁËÆäËü¶ÔÏóÈ磺¡°Set dc_1 = CreateObject("Scripting.Dictionary")¡±
ÕâЩ¶ÔÏó²¢Ã»ÓÐÊÍ·Å£¬ÊDz»ÊÇÕâ¸öÔ­Òòµ¼Öµģ¿

±¾À´ÏëÔÚClass_terminate() Õâ¸öÏú»Ùº¯ÊýÖÐÈ¥Ïú»ÙÀà×Ô¼º¶¨ÒåµÄ¶ÔÏ󣬵«Ëû¸ù±¾Ã»Óб»µ÷Óã¿
³ÌÐòÔËÐÐÒ²Õý³££¬Ã»Óб¨ÈçºÎ´íÎó£¡
ÎÒµ£ÐÄÈç¹û¾ÍÕâÑù²»¹ÜËüÊÇ·ñ»áÔì³ÉÄÚ´æÐ¹Â¶µÄÎÊÌ⣿
ÓеĴóÏÀ˵VB¾Í¸ù±¾²»´æÔÚÄÚ´æÐ¹Â¶£¬ÄÄλ´óÏÀÄÜ·ñÔÙ·ÖÎöÏ£¿
 

¡°ÓеĴóÏÀ˵VB¾Í¸ù±¾²»´æÔÚÄÚ´æÐ¹Â¶£¬ÄÄλ´óÏÀÄÜ·ñÔÙ·ÖÎöÏ£¿¡±
ÄãÒª¿´ËûÊÇÔÚʲôÓᄈϽ²µÄ£¬ÏñÄãÕâÖÖdc_1ÈçÊǶ¨ÒåÔÚº¯ÊýÄÚ²¿µÄ£¬Ädz¬³öº¯ÊýÍâ¾Í»á×Ô¶¯set ...nothingµÄ
Set dc_1 = CreateObject("Scripting.Dictionary")

ÎÒÕâÀïµÄdc_1ÊÇ×÷ΪÀàµÄ¹«¹²±äÁ¿¶¨ÒåµÄ£¬×÷ΪÀàʵÀýºÍÍⲿ½»»»Êý¾ÝÓã¨Ã»ÓвÉÓÃPublic Property Set µÄ¶¨Ò巶ʽ£©
Public dc_1 As Object
ÔÚ¡°Private Sub Class_initialize()¡±Àï
Set dc_1 = CreateObject("Scripting.Dictionary")


Ïà¹ØÎÊ´ð£º

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

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

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

VBÔõÑù»ñµÃÊó±ê´¦µÄ³¬¼¶Á¬½Ó - VB / »ù´¡Àà

VBÔõÑù»ñµÃÊó±ê´¦µÄ³¬¼¶Á¬½ÓÄØ£¿
  ÔÚWebBrowser¿Ø¼þÖÐÓÐÕâÑùÒ»¸öʼþ:StatusTextChange(index As Integer, ByVal Text As String)
  ËüµÄText²ÎÊýÕýÊÇÊó±ê´¦µÄ³¬¼¶Á¬½Ó,µ«ÎÊÌâÊÇÈç¹ûÎÒµÄä¯ÀÀÆ÷Õýà ......

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

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

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

vb - VB / »ù´¡Àà

vbÖÐ ÏÖÔÚÎÒÒª°ÑÊý¾Ý¿âÀï´æ´¢µÄÒ»¸ö¸½¼þµÄÄÚÈÝÌæ»»ÁË£¬Ôõô×ö£¬Ö»ÊÇÌæ»»ÎÒÖ¸¶¨µÄλÖ㬲»ÊÇÈ«²¿Ìæ»»
Ç뽫ÎÊÌâ˵Ã÷°×£¬´æ´¢×ֶθñʽ£¬Èç¹ûÊÇBinary¸ñʽµÄ±È½ÏÂé·³£¬Èç¹ûÊÇ×Ö´®£¬Ö±½ÓÌæ»»¡£×îºÃ²»Òª½øÐÐÖ¸¶¨Î»ÖÃÌæ»»¡ ......

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

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