Ò׽ؽØͼÈí¼þ¡¢µ¥Îļþ¡¢Ãâ°²×°¡¢´¿ÂÌÉ«¡¢½ö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 ²Ù×÷Excel£¬¸½Èí¼þͼ

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

VBÓëMatlab»ìºÏ±à³Ì

VBÓëMatlab»ìºÏ±à³ÌÓжàÖÖ·½Ê½£¬ÕâÀïÌÖÂÛMatlab½«MÎļþ±àÒë³Écom×é¼þ¹²VBµ÷Óõķ½Ê½¡£
Matlab°æ±¾£ºMatlab 7.7. 0.471 R2008b
VB°æ±¾£ºVB 6.0 & VB 2008
Ê×ÏÈдºÃÍê³Éij¸ö¹¦ÄܵÄmÎļþ£¬±ÈÈçÔÚmÎļþÖÐдÈëÈçϺ¯Êý
function [returns,stderr]=GetReturns(prices)
    returns=price2ret(prices)&nbs ......

VB.NETÖÐÄܲ»ÄܶÔDATASETÔÙÓÃSQLÓïÑÔ

¿ÉÒÔɸѡÊý¾Ý£¬µ«²»ÄÜÊDZê×¼µÄSQLÓï¾ä£º
Me.DsUserManager1.Tables(0).Select("id > 5 and id <20")
---------------------------------------------------------------
1.ɸѡ£º
dataset.tables("tabname").select("id=1")'Ï൱ÓÚSQLÖÐWHEREºóµÄÌõ¼þÄÚÈÝ
2.±£´æµ½ÄÄ£¿Õâµ¹ÊDz»Öª ......

ÔÙ̸ÓÃVBÎÞ´°¿Ú͸Ã÷Usercontrol±àд͸Ã÷¸¡¶¯°´Å¥

'* ************************************************************** *
'* ³ÌÐòÃû³Æ£ºButton.ctl
'* ³ÌÐò¹¦ÄÜ£ºÍ¸Ã÷¸¡¶¯°´Å¤
'* ×÷Õߣºlyserver£¬×îºóÐÞ¸ÄÈÕÆÚ£º2009Äê11ÔÂ
'* ÁªÏµ·½Ê½£ºhttp://blog.csdn.net/lyserver
'* ************************************************************ ......

VBʵÏÖ¿ÉÖ´ÐÐÎļþÔËÐÐʱ×Ôɾ³ý

    ÓÐʱ£¬ÎªÁËʵÏÖ¶¯Ì¬¸üУ¬ÎÒÃÇÐèÒª¶ÔÕý´¦ÓÚÔËÐÐ״̬µÄÓ¦ÓóÌÐò½øÐÐ×Ôɾ³ý£¬¾ÍÏñ360°²È«ÎÀÊ¿ÔÚÏßÉý¼¶ÄÇÑù¡£µ«ÊÇ£¬WindowsÊDz»ÔÊÐíɾ³ýÕý´¦ÓÚÔËÐÐ״̬µÄÓ¦ÓóÌÐòµÄ£¬Ôõô°ì£¿Ò»°ãÀ´Ëµ£¬ÎÒÃÇ¿ÉÒÔʹÓÃÁ½¸ö³ÌÐòÀ´ÊµÏÖ£¬Ò»¸öרߺÔð°æ±¾¼ì²âºÍɾ³ý£¬Ò»¸ö²ÅÊÇÒµÎñÐèÒªµÄÖ÷Ó¦ÓóÌÐò¡£Äܲ»Äܽ«¶þÕߺ϶þΪһÄØ£¿´ ......
© 2009 ej38.com All Rights Reserved. ¹ØÓÚE½¡ÍøÁªÏµÎÒÃÇ | Õ¾µãµØͼ | ¸ÓICP±¸09004571ºÅ