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

ÈçºÎÓÅ»¯VB³ÌÐò

ÈçºÎÈ¥ÓÅ»¯ÄãµÄVB³ÌÐò°ïÖú 
1¡¢ÈçºÎÈ¥ÓÅ»¯ÄãµÄVB³ÌÐò
Visual Basic ×÷ΪһÖָ߼¶±à³ÌÓïÑÔ£¬ËüÒ²ÓÐ×Ų»¿É±ÜÃâµÄȱµã---¿ª·¢³öµÄÓ¦ÓóÌÐòÔËÐÐËÙ¶ÈÂý¡£Èç¹ûÎÒÃÇÄܹ»³ÌÐò×öһЩÓÅ»¯£¬ÄÇôÇé¿ö½«»á´ó´ó¸ÄÉÆ¡£ÒªÓÅ»¯³ÌÐòÔËÐеÄʵ¼ÊËٶȣ¬³£Óõķ½·¨ÓÐÈýÖÖ£º
1.¾¡Á¿±ÜÃâʹÓà Variant ±äÁ¿¡£ÓÉÓÚVB²»ÄÜÈ·¶¨ Variant ±äÁ¿µÄ¾ßÌåÀàÐÍ£¬ËùÒÔËü»á¸ø¸ÃÀàÐͱäÁ¿·ÖÅä16¸ö×ֽڵĿռ䣬¶øÇÒÔÚÓñäÁ¿½øÐÐÔËËãʱ»¹Òª¿¼Âǵ½Êý¾ÝÀàÐ͵Äת»»¡£Õâ¼ÈÕ¼ÓÃÄڴ棬ÓÖÓ°ÏìÁËËٶȣ¬»áʹÉæ¼°µ½¸´ÔÓÔËËãµÄ³ÌÐòÂý¡£×¢Ò⣬һ¸ö±äÁ¿µÄȱʡÀàÐ;ÍÊÇ Variant£¬ÆäËüÀàÐ͵ıäÁ¿ÒªÓÃDimÓï¾äµ¥¶ÀÉùÃ÷¡£
2.ÔÚÓöµ½ÕûÐÍÊý¾Ýʱ¾¡Á¿Ê¹ÓÃLong±äÁ¿¡£ÒòΪLong±äÁ¿ÊÇ32λCPUµÄ±¾»úÊý¾ÝÀàÐÍ£¬ËùÒÔ´¦ÀíËٶȻáºÜ¿ì£¬ÓÈÆäÊÇÔÚÑ­»·ÌåÖС£
3.½«¿Ø¼þµÄ³£ÓÃÊôÐÔ±£´æÔÚ±äÁ¿ÖС£Ò»°ã¿Ø¼þ´æÔÚÓÚDLL»òOCXÕâÀàµÄÍⲿ³ÌÐòÖС£ÖÚËùÖÜÖª£¬µ÷ÓÃDLLÔ¶±È·ÃÎÊÄÚ´æÂý¡£ËùÒÔ¶ÔÓÚÄÇЩ·ÅÔÚÑ­»·ÌåÖеij£ÓÃÊôÐÔ£¬Èç¹û½«ËüÃDZ£´æÔÚ±äÁ¿ÖУ¬ÄÇôËٶȽ«»áÓгɰÙÉÏǧ±¶ÌáÉý¡£
ÎÒÃÇÔÚ±àд³ÌÐòʱӦעÒâµ½£¬ÔÚ½øÐг¤Ê±¼äµÈ´ý²Ù×÷ʱ£¬¿ÉÒÔ×öһЩ¶¯»­Ö®ÀàµÄЧ¹û£¬ºÃÈÃÓû§ÖªµÀ³ÌÐòÔËÐÐÕý³£¡£ÏÂÃæÊǼ¸¸ö³£ÓÃÓÅ»¯·½·¨£º
£¨1£©Ê¹Óà Splash ÆÁÄ»¡£Ò²¾ÍÊÇÎÒÃdz£¼ûµÄ»¶Ó­´°¿Ú¡£´óµÄÓ¦ÓóÌÐòÔÚÆô¶¯Ê±£¬ÍùÍù»áÖ÷¶¯»ò±»¶¯µØÔØÈëÒ»´ó¶ÑDLL£¬ÕâÒª»¨·ÑºÜ³¤Ê±¼ä¡£ËùÒÔÎÒÃÇÔÚÆô¶¯Ê±¿ÉÒÔÏÈÏÔʾһ¸ö¼òµ¥µÄ´°¿Ú£¬ÉÏÃæÖ»·ÅһЩ×÷Õß¡¢°æȨ֮ÀàµÄÐÅÏ¢£¬ÔÚÕâ¸ö´°¿ÚµÄForm_LoadʼþÖÐÓÃLoad·½·¨¶ÁÈëÄÇЩ×î³£ÓõĴ°ÌåÄ£¿é¡£ÕâÑù£¬ËäȻʵ¼ÊµÈ´ýµÄʱ¼äÑÓ³¤ÁË£¬µ«Óû§Ëù¿´µ½µÄÆÁÄ»×ÜÊDZ仯µÄ£¬ËùÒԸоõϳÌÐòÆô¶¯¼Ó¿ìÁË¡£¶øÇÒÓÉÓÚ³£Óô°ÌåÄ£¿éÊÂÏÈÒÑÔØÈëÄڴ棬ÒÔºóÖ»ÐèÓÃShow·½·¨À´ÏÔʾËü£¬Ìø¹ýÁËÔØÈë¹ý³Ì£¬ÔÚ³ÌÐòÔËÐйý³ÌÖÐÒ²»áºÜ¿ìµÄ¡£
£¨2£©Ê¹ÓÃTimer¿Ø¼þ¡£ÓÉÓÚTimer¿Ø¼þµÄ³öÏÖ£¬Ê¹µÃºǫ́×÷ÒµÓÐÁË¿ÉÄÜ¡£ÎÒÃÇ¿ÉÒÔÔÚÿ´ÎTimerʼþÖÐÍê³ÉһС²¿·ÖÈÎÎñ¡£ÕâÑù£¬ÓÉÓÚTimerÖеÄʼþÄܹ»Ôں̵ܶÄʱ¼äÄÚÍê³É£¬Óû§Ò»°ã²é¾õ²»µ½Ëٶȵı仯¡£Èç¹ûÒ»¶¨ÒªÔÚÒ»¸öÑ­»·ÄÚÍê³Éij¸öÈÎÎñ£¬ÄÇô²»ÒªÍüÁËÓÃDoEventsÀ´ÊÍ·ÅÓû§¡£
£¨3£©Ê¹Óýø¶ÈÌõ¡£ÒªÊ¹Óýø¶ÈÌõ£¬ÐèÒªÊÂÏÈÖªµÀÊý¾ÝÁ¿£¬ËùÒÔËüºÜÊʺÏÓÃÓÚ¶ÔÒÑÖªÊý¾ÝµÄ²Ù×÷£¬ÈçÊý¾Ý¿âµÄÅÅÐò¡£
×ÜÖ®£¬ÓÅ»¯³ÌÐòÒª´Ó×Ô¼º¡¢´ÓÓû§µÈ¶à·½Ã濼ÂÇ£¬Ê¹³ÌÐò¿ª·¢ÖÜÆڶ̣¬ÇÒ¸ßЧÒ×Óá£
2¡¢ÔÚVBÖÐÈçºÎ´´½¨ÉÁ˸(±êÓï)ÆÁ
´óÐÍÓ¦ÓÃϵͳÆô¶¯ÔËÐеÄʱ¼äÐèÒªºÜ³¤Ê±¼ä,Æäʱ¼ä»á¸ù¾ÝÐèÒª³õʼ»¯µÄÊýÁ¿ºÍÓû§ÏµÍ³µÄËٶȱ仯,Òò´ËÔÚÖ÷´°¿ÚÏÔʾǰ,Ó¦ÏÔÊ


Ïà¹ØÎĵµ£º

VB: Ò»¸öÕýÔòÌáÈ¡¹¦ÄÜ

'ÒýÓãºMicrofoft VBScript Regular Expressions 5.5 'Ò»¸öÕýÔòÌáÈ¡¹¦ÄÜ
Public Function regGetStr_three(ByVal myString As String, ByVal patReg As String) As String()
   Dim objRegExp As RegExp
   Dim objMatch As Match
   Dim colMatches   As Ma ......

ÈçºÎÓÃvb²¥·Å»ÃµÆƬ

ÈçºÎÈûõÆƬÔÚvbµÄ¿ò¼ÜÀï²¥·Å
'Microsoft PowerPoint 9.0(Office 2000µÄ£¬Èç¹ûÊÇ97ÔòÊÇ8.0) Object Library)
''Microsoft PowerPoint 11.0(Office 2003) Object Library)
Private Declare Sub Sleep Lib "kernel32" (ByVal dwMilliseconds As Long) 'ÑÓʱAPIÉùÃ÷
Private Sub Form_Load()
Dim ppt As New PowerPoint. ......

ΪʲôÎÒµÄVBÏÔʾÕÒ²»µ½¿É²åÈëµÄISAM£¿

VB6ÀïÃæµÄ°²×°ÄÚÈÝÖÐÓÐJET £¨IISAM£©²¿¼þ£¬°²×°Ê±¼ÓÒÔÑ¡Ôñ,Äã¿ÉÒÔÐÞ¸´°²×°ÄãµÄVB6¡£¾ßÌå×ö·¨ÈçÏ£º
1¡¢ÖØÐÂÆô¶¯VB°²×°³ÌÐò£¬Ñ¡È¡¹¤×÷Õ¾¹¤¾ßºÍ×é¼þ=¡·Ìí¼Ó¡¢É¾³ý³ÌÐò=¡·Êý¾Ý·ÃÎÊ=¡·¸ü¸ÄÑ¡Ïî=¡·Ñ¡ÖÐJet IIsam

2¡¢ÖØ×°VB£¬°²×°Ê±Ñ¡×Ô¶¨Ò壬ȫ²¿Ñ¡ÖС£ ......

vbÉèÖô°Ìå²»¿ÉÒƶ¯

Option Explicit
Private Declare Function GetSystemMenu Lib "user32" (ByVal hWnd As Long, ByVal bRevert As Long) As Long
Private Declare Function DeleteMenu Lib "user32" (ByVal hMenu As Long, ByVal nPosition As Long, Optional ByVal wFlags As Long = 0&) As Long
Private Declare Function DrawMenu ......

ÖÆ×÷VB°²×°³ÌÐòÎÊ´ð(Package & Deployment)

À
±¾ÎÄ·¢±íÔÚ2000Äê4ÔÂ17ÈÕ ¡¶¼ÆËã»úÊÀ½ç¡·25ÆÚ

ÖÆ×÷°²×°³ÌÐòÍùÍùÊdzÌÐòÉè¼ÆµÄ×îºóÒ»²½£¬Í¬Ê±Ò²ÊÇÖØÒªµÄÒ»²½£¬ÒòΪÔËÐа²×°³ÌÐòÍùÍùÊÇÓû§µÄµÚÒ»¸ö²Ù×÷¡£ÏÂÃæ¾Í½éÉÜһЩÖÆ×÷
Visual Basic
°²×°³ÌÐòʱ³£Óöµ½ÎÊÌâµÄ½â¾ö·½·¨¡£
1
¡¢Ò»¸ö·Ç³£¼òµ¥µÄ
VB
³ÌÐòÊÇ·ñ¿ÉÒÔ²»ÖÆ×÷°²×°³ÌÐò
ÎÊ£º¼ÙÈçÎÒµÄ
VB5
¿ª·¢µÄ³ÌÐ ......
© 2009 ej38.com All Rights Reserved. ¹ØÓÚE½¡ÍøÁªÏµÎÒÃÇ | Õ¾µãµØͼ | ¸ÓICP±¸09004571ºÅ