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

VBÖÐWinsock¿ØÖƵÄUDPЭÒéµÄʹÓÃ

¡¡¡¡UDPЭÒé»ù´¡£º
¡¡¡¡UDP(User Datagram
Protocol)ÊÇÒ»ÖÖÎÞÁ¬½ÓЭÒ飬ÓëTCP²Ù×÷²»Í¬£¬¼ÆËã»ú¼ä²¢²»ÐèÒª½¨Á¢Ò»¸öÁ¬½Ó£¬Í¬Ê±£¬Ò»¸öUDPÓ¦ÓÿÉͬʱ×÷ΪӦÓõĿͻ§»ò·þÎñÆ÷·½¡£
¡¡¡¡ÓÉÓÚUDPЭÒé²¢²»ÐèÒª½¨Á¢Ò»¸öÃ÷È·µÄÁ¬½Ó£¬Òò´Ë½¨Á¢UDPÓ¦ÓÃÒª±È½¨Á¢TCPÓ¦Óüòµ¥µÃ¶à¡£ÔÚTCPÓ¦ÓÃÖУ¬Ò»¸öWinsock¿ØÖƱØÐëÃ÷È·µØÉèÖóɓ¼àÌý”£¬¶øÆäËüWinsock¿ØÖÆÔò±ØÐëʹÓÃConnect·½·¨À´³õʼһ¸öÁ¬½Ó¡£
¡¡¡¡Ê¹ÓÃUDPЭÒ飬ÔÚÁ½¸öWinsock¿ØÖÆ¼ä½øÐÐÊý¾ÝµÄ·¢ËÍ£¬ÔÚÁ¬½ÓµÄÁ½¶Ë±ØÐëÍê³ÉÒÔÏÂÈý²½£º
¡¡¡¡1.ÉèÖÃRemoteHostÊôÐÔΪÆäËü¼ÆËã»úµÄÃû³Æ£»
¡¡¡¡2.ÉèÖÃRemotePortÊôÐÔΪµÚ¶þ¸öWinsock¿ØÖƵÄLocalPortÊôÐÔµÄÖµ£»
¡¡¡¡3.ÉêÇëBind·½·¨¡£
¡¡¡¡Í¨¹ýʹÓ÷½·¨Bind£¬Ôò¿É½«¸ÃWinsock¿ØÖÆÀ¦°óµ½Ò»¸ö±¾µØ¶Ë¿Ú£¬ÒÔ±ã¸ÃWinsock¿ØÖÆÊ¹Óøö˿ÚÀ´½øÐÐÀàËÆTCPµÄ“¼àÌý”¹¦ÄÜ£¬²¢·ÀÖ¹ÆäËüÓ¦ÓÃʹÓøö˿ڡ£
¡¡¡¡Ê¹ÓøÃЭÒé´«ËÍÊý¾Ý£¬Ê×ÏÈÉèÖÿͻ§¼ÆËã»úµÄLocalPortÊôÐÔ¡£¶ø×÷Ϊ·þÎñÆ÷µÄ¼ÆËã»ú½öÐèÒªÉèÖÃRemoteHostÊôÐÔΪ¿Í»§¼ÆËã»úµÄIPµØÖ·»òÓòÃû¼´¿É£¬²¢½«ÆäRemotePortÊôÐÔÉèÖóɿͻ§¼ÆËã»úÉϵÄLocalPortÊôÐÔ¼´¿É£¬È»ºó¾Í¿Éͨ¹ýÉêÇëSendData·½·¨À´¿ªÊ¼ÐÅÏ¢·¢ËÍ£¬¿Í»§¼ÆËã»úÔò¿ÉÔÚÆäDataArrialʼþÖÐʹÓ÷½·¨GetDataÀ´»ñÈ¡·¢Ë͵ÄÐÅÏ¢¡£
¡¡¡¡ÏÂÀý¾ßÌåÑÝʾÁËÒ»¸ö“̸»°”Ó¦Óã¬ÒÔÔÊÐíÏ໥¼ä½øÐÐʵʱµÄ½»Ì¸¡£
¡¡¡¡UDPÓ¦ÓÃÒ»£º
¡¡¡¡½¨Á¢Ò»¸öбê×¼EXE¹¤³ÌÎļþ£¬ÍÏ·ÅÒ»¸öWinsock¿ØÖƵ½±íµ¥ÉÏ£¬Ìí¼ÓÁ½¸öÎı¾¿òµ½±íµ¥ÉÏ£¬È»ºó½øÐÐÒÔÏÂÊôÐÔµÄÉèÖãº
¡¡¡¡±íµ¥(Form):Name=“frmPeerA” Caption=“UDP Application(1)”
¡¡¡¡Winsock¿ØÖÆ£ºName=“udpPeerA” Protocol=“sckUDPProtocol”
¡¡¡¡Îı¾¿ò1(TextBox):
Name“txtSend”
¡¡¡¡Îı¾¿ò2(TcxtBox): Name=“txtOutput” MultiLine£­True ScrollBars=2
¡¡¡¡È»ºó´ò¿ª´úÂë´°¿Ú£¬·Ö±ðÔÚÏàÓ¦µÄʼþÏÂÊäÈëÒÔÏ´úÂ룺
¡¡¡¡Private Sub Form_Load()
¡¡¡¡ With
udpPeerA
¡¡¡¡ .RemoteHost=“197.1.1.2” 'ÒªÁ¬½Óµ½µÄ¼ÆËã»úÃû
¡¡¡¡ .RemotePort=1010
'ÒªÁ¬½Óµ½µÄ¶Ë¿ÚºÅ
¡¡¡¡ .LocalPort=1011 '¸ÃWinsock¿ØÖƽ«ÒªÊ¹Óõı¾µØ¶Ë¿ÚºÅ£¬±ãÓÚÆäËü¶ËÓë¸ÃWinsockͨѶ
¡¡¡¡
.Bind 1011 '½«¸ÃWinsock¿ØÖư󶨵½¸Ã±¾µØ¶Ë¿Ú
¡¡¡¡ EndWith
¡¡¡¡End Sub
¡¡¡¡Private Sub
txtSend_Change()
¡¡¡¡ udpPe


Ïà¹ØÎĵµ£º

vb Active ¿Ø¼þ¡¡¼¯ºÏÀà¡¡ÎÊÌâ

ÒýÑÔ:
         ×öÒ»¸ö¿Ø¼þ, ÓÃÓÚ Êý¾Ý²ÉÑùÈçʾ²¨Æ÷, ¿ÉÒÔÌí¼Ó,ɾ³ýÇúÏß, ÉèÖÃÇúÏßµÄÏà¹ØÊôÐÔ: ÏßÐÍ,ÑÕÉ«,µÈ...
¹ý³Ì:
        ¡¡ÏÈ´´½¨ Ïß Àà,  ÔÚÓû§¿Ø¼þÀïʵÏÖ Ïß ¶ÔÏó´´½¨,  ²¢ÉùÃ÷Ò»¸ö ¼¯ºÏ, ÓÃÓÚ ´æ·Å½¨Á¢µÄÏß¶ÔÏó.
ÎÊÌâ ......

VB È¡µÃÖ¸¶¨exeÎļþ°æ±¾ºÅ

¡¾º¯Êý¡¿  
  GetFileVersionInfo  
   
  ¡¾²Ù×÷ϵͳ¡¿  
  Win9X:Yes  
  WinNT:Yes  
   
  ¡¾ÉùÃ÷¡¿  
  GetFileVersionInfo   Lib   "version.dll"     Alias   "GetFileVersionInfoA" &n ......

VB ²Ù×÷Excel£¬¸½Èí¼þͼ

Ò»¡¢ VB¶ÁдEXCEL±í£º
¡¡¡¡VB±¾ÉíÌá×Ô¶¯»¯¹¦ÄÜ¿ÉÒÔ¶ÁдEXCEL±í£¬Æä·½·¨ÈçÏ£º
¡¡¡¡1¡¢ÔÚ¹¤³ÌÖÐÒýÓÃMicrosoft ExcelÀàÐͿ⣺
¡¡¡¡´Ó"¹¤³Ì"²Ëµ¥ÖÐÑ¡Ôñ"ÒýÓÃ"À¸£»Ñ¡ÔñMicrosoft Excel 9.0 Object Library£¨EXCEL2000£©£¬È»ºóÑ¡Ôñ"È·¶¨"¡£±íʾÔÚ¹¤³ÌÖÐÒªÒýÓÃEXCELÀàÐͿ⡣
¡¡¡¡2¡¢ÔÚͨÓöÔÏó ......

VB³õ¼¶ÄæÏòÓëÀûÓÃ

½ñÌì×öÒ»¸öVB³ÌÐòµÄ×ÔÏÔ×¢²áÂë¡£ÎÒÒ²²»ÖªµÀ¸ÃÔõô½Ð£¬¾ÍÊÇÕÒµ½³öÏÖ×¢²áÂëµÄµØ·½£¬È»ºóÓöԻ°¿òµ¯³öÀ´¡£Ëµ°×Á˾ÍÊÇÓÃMessageBox°ÑÒ»¸ö×Ö·û´®¸øµ¯³öÀ´£¨Ã»×·Ç󰢡£¡£¡££©
    ÎªÁËÓеã×·Ç󣬽ñÌì²»µ¼Èëuser32ÀïÃæµÄAPI£¬¶øÊǰÑVBÀïÃæ×Ô´øµÄMsgboxº¯Êý¸øÍÚ³öÀ´µ÷Ó㬾ÍÊÇÒýÓÃMSVBVM60.rtcMsgBoxº¯Êý¡£ÎÒÊ ......

ÀûÓÃVB×ÔÖÆOCX¿Ø¼þ

¡¡¡¡Èç½ñOCX¿Ø¼þÔÚ±à³ÌÖÐÒÑÕ¼ÁìÁ˺ÜÖØÒªµÄµØÎ»,ÎÒÃÇ¿ÉÒÔÀûÓÃOCX¿Ø¼þÍê³ÉһЩÏ൱¸´Ôӵıà³Ì²Ù×÷.ͬʱOCX ¿Ø¼þ»¹ÓÐÀûÓÚÖ÷³ÌÐòµÄ¼òµ¥»¯¡¢¹¦ÄܵÄÖØÓá¢Òþ³£³ÌÐòʵÏÖϸ½Ú¡¢±ãÓÚÉý¼¶¡¢´«²¥·½±ãµÈÓŵ㡣ÏÖÔÚÎÒÃÇ¿ÉÒÔÀûÓÃVB 5.0·½±ãµÄÖÆ×÷³ö×Ô¼ºµÄOCX¿Ø¼þ¹©ÎÒÃÇÔÚ±à³ÌÖÐʹÓÃͬʱ»¹¿ÉÒÔ°ÑËüË͸øÄãÖÜΧϲ»¶±à³ÌµÄÅóÓÑ!
ÏÂÃæÁгöÖÆ× ......
© 2009 ej38.com All Rights Reserved. ¹ØÓÚE½¡ÍøÁªÏµÎÒÃÇ | Õ¾µãµØÍ¼ | ¸ÓICP±¸09004571ºÅ