Ò׽ؽØÍ¼Èí¼þ¡¢µ¥Îļþ¡¢Ãâ°²×°¡¢´¿ÂÌÉ«¡¢½ö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ÖÐÈçºÎ´´½¨ÉÁ˸(±êÓï)ÆÁ
´óÐÍÓ¦ÓÃϵͳÆô¶¯ÔËÐеÄʱ¼äÐèÒªºÜ³¤Ê±¼ä,Æäʱ¼ä»á¸ù¾ÝÐèÒª³õʼ»¯µÄÊýÁ¿ºÍÓû§ÏµÍ³µÄËٶȱ仯,Òò´ËÔÚÖ÷´°¿ÚÏÔʾǰ,Ó¦ÏÔÊ


Ïà¹ØÎĵµ£º

BarCode Ëã·¨ VBÀà¿â 1

 Option Explicit
' VB / VBA Functions for Code128(A, B,C), UCC/EAN 128
' Copyright 2004 by MW6 Technologies Inc. All rights reserved.
'
' This code may not be modified or distributed unless you purchase
' the license from MW6.
Public UFPrefixFunctions As Boolean
Private I As Integer
Pri ......

VB,C#ʹÓÃVCµÄ.libºÍ.hÎļþ

——————————————————————————————————
ÔÚc#ÖÐÈçºÎʹÓÃÒÔǰc++µÄ.lib¿âºÍ.hÍ·Îļþ
zhujiang_1977£¨Öì½­ ......

(VB)FTPÒì²½ÏÂÔØ

 ¸Ã·½·¨²»ÐèҪʹÓÃAPI¼°µÚÈý·½¿Ø¼þ
ÕâÀïʹÓõÄÊÇVBµÄUserControl¿Ø¼þµÄAsyncRead·½·¨
²½ÖèÈçÏÂ:
1¡¢Ìí¼ÓÒ»¸öÓû§¿Ø¼þ£¬ÉèÖÃInvisibleAtRuntimeÊôÐÔΪtrue£¬Ä¿µÄÊÇÔËÐÐʱ¸Ã¿Ø¼þ²»ÏÔʾÓû§½çÃæ£¬¾ÍÏóTimer¿Ø¼þÒ»Ñù¡£
2¡¢µ½×Ô¶¨Òå¿Ø¼þµÄ´úÂë´°¿Ú£¬Ìí¼ÓÈçÏ´úÂë
Option Explicit
'ÏÂÔØ½á¹ûö¾Ù
Public Enum Downloa ......

vbÒÆ¶¯´°ÌåµÄ´úÂë

Option Explicit
Private Declare Function ReleaseCapture Lib "user32" () As Long
Private Declare Function SendMessage Lib "user32" Alias "SendMessageA" (ByVal hwnd As Long, ByVal wMsg As Long, ByVal wParam As Long, lParam As Long) As Long
Const HTCAPTION = 2
Const WM_NCLBUTTONDOWN = &HA1
Pri ......

VBʵÏÖÈí¼þÊÔÓÃÆÚ

 ´ó¼Ò¶¼ÖªµÀ¹²ÏíÈí¼þ¶¼ÓÐËüÃǵÄÊÔÓÃÆÚ£¬¼´¸øÄãÒ»¸ö¹Ì¶¨µÄÆÚÏÞÃâ·ÑʹÓᣠ  
 Ó¦ÓеŦÄÜ£º
    1£©¸ø¶¨Ò»¸öÊÔÓÃÆÚÏÞ£¬ÔÚϵͳÿ´ÎÆô¶¯Ê±»áÅжÏÈí¼þÒѾ­Ê¹ÓÃÁ˼¸Ì죬»¹Óм¸Ìì¿ÉÒÔ¼°Æô¶¯µÄ´ÎÊý¡£
    2£©µ±ÏµÍ³ÈÕÆÚ±»Ð޸ijÉÍùÈÕµÄÈÕÆÚºó£¬ÏµÍ³ÄÜ×Ô¶¯Åб𣬽ûÖ¹ÐÞ¸ÄÈÕÆÚ £¬²»Ó ......
© 2009 ej38.com All Rights Reserved. ¹ØÓÚE½¡ÍøÁªÏµÎÒÃÇ | Õ¾µãµØÍ¼ | ¸ÓICP±¸09004571ºÅ