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

¹ØÓÚVB´®¿ÚµÄÎÊÌâ

  ÊÇÕâÑùµÄ£¬ÎÒÏëÓÃpc»úºÍÏÂλµ¥Æ¬»ú½øÐÐͨѶ¡£¸Õѧvb²»¾Ã£¬ÊÇÕâÑùдµÄ£º
Private Sub com_OnComm()
    Select Case com.CommEvent
    Case comEvReceive
    text2 = com.Input
    com.InBufferCount = 0
    End Select
End Sub

Private Sub Command1_Click()
    com.OutBufferCount = 0
    com.Output = text1.Text
End Sub

Private Sub Command2_Click()
    End
End Sub

Private Sub Form_Load()
    com.CommPort = 1
    com.Settings = "19200,n,8,1"
    com.PortOpen = True
End Sub

  È»ºóÎÒ½«µçÄԵĴ®¿ÚµÚ¶þÕëºÍµÚÈýÕë¶Ë½Ó£¬°´ÕÕ³£ÀíÕâÑùµÄ»°ÎÒÿ´Î·¢ËÍÒ»¸öÊý¾ÝÔÚtext2µÄtextÖоÃÓ¦¸ÃÄÜ¿´µ½¸Õ²Å·¢µÄÊý¾ÝÁË£¬µ«Êǽá¹ûû·´Ó¦¡£
  ÏÂÀ´ÎÒÓý«Á½Ì¨µçÄÔÓô®¿ÚÏßÁ¬½Ó£¬Ö®¼äµÄÌøÏßÎÒ¶¼ÒѾ­È·±£ÎÞÎ󣬻úÆ÷1ÉÏÓõÄÊǸղŵÄvb³ÌÐò£¬»úÆ÷¶þÉÏÓõÄÊÇÍøÉÏdownµÄ´®¿Úµ÷ÊÔÖúÊÖ£¬½á¹ûÊÇ£ºÎÒÓÃÎÒµÄvb³ÌÐò·¢ËÍÒ»¸öÊý¾ÝÁîһ̨»úÆ÷µÄ´®¿Úµ÷ÊÔÖúÊÖÄÜÕýÈ·ÎÞÎóµÄÊܵ½£¬¶øÎÒÓÃÁîһ̨»úÆ÷µÄ´®¿Úµ÷ÊÔÖúÊÖ·¢Êý¾ÝµÄʱºòÓÃvbµÄ»úÆ÷1¾ÓÈ»ºÁÎÞ·´Ó¦£¡£¡£¡£¡
  Çë¸÷λ´ó¸ç´ó½ã°ï°ïСµÜ£¡£¡Ð¡µÜÎÒÊdzõѧ£¡£¡£¡
ͨ³£ÊÇÄã9-9µÄ½ÓÏßÎÊÌ⣺
ÕÕÏÂÃæµÄ׼ȷÎÞÎó£º
¿´¿´ÎÒ֮ǰ¸øÈ˼һظ´µÄ£¬ÎÊÌâÒ»Ñù£º
LZÌáÐÑÄãÏ ×îºÃ±ðÓÃUSBת´®¿ÚµÄͨÐÅ·½Ê½ ×îºÃÊÇÖ±½Óµç·ÉϵÄ9Õë¶Ǫ̂ʽ»úºóµÄ9Õ루ÆäʵֻҪ3Õë¾Í¿ÉÒÔ£¬2-2£¬3-3£¬5-5£©
ÎªÊ²Ã´ÄØ£¿ÒòΪתÏ£¬Èç¹ûÊ


Ïà¹ØÎÊ´ð£º

VBÖÐÔõôÑùÔÚ±í¸ñÖÐÐÞ¸Ä×ÖÌ壿 - VB / »ù´¡Àà

±ÈÈç˵ҪÔÚ1±íÖеĵÚÈýÁеڶþÐе¥ÔªÖÐÊäÈë¡°Ò»¶þÈý¡±Ò»Òª´ÖÌåËÎÌå12ºÅ×Ö£¬¶þ ²»Òª´ÖÌå 15ºÅ×Ö ÈýбÌå5ºÅ×Ö
´úÂëÓ¦¸ÃÔõô´ò£¿
LZÖ¸µÄÊǸöʲô±í¸ñ¿Ø¼þÄØ£¬Ã²ËÆÖ»ÄÜÉèÖÃÕû¸ö±íµÄ×ÖÌ壬»òÕßij¼¸Ðлò¼¸ÁУ¬Ã»Óе¥¶ÀÉèÖ ......

ÓÃVB±àдTXTÎĵµ - .NET¼¼Êõ / VB.NET

ÎÒÊÇVBµÄгÉÔ±£¬ÏÖÔÚÏëÓÃVBÀ´×ö¸öTXTÎĵµ£¬Çë´ó¼Ò¸øÎÒ´úÂë¼°½éÉÜÒ»ÏÂÏàÓ¦µÄ¿Ø¼þ£¡
·Ç³£¸Ðл£¡£¡£¡£¡£¡£¡
¿ÉÒÔÓÃһЩOFFICE¿Ø¼þ

googleÉÏÕÒһϰÉ,VBдÈëTXT,ºÜ¶àÑùÀý´úÂëµÄ

Ö±½Óµ÷²éÓþͿÉÒÔÁË

Ãæ¶ÔÃÀÅ® ......

°ïÎҸĸÄÕâVBÌâ - VB / »ù´¡Àà

°ïÎÒ¸Ä¸Ä ÎÒ×ܾõµÃÓÐÎÊÌâ
Type ID
  number As Single
  score As Integer
  name As String * 6
End Type
Dim personl As ID, i%
Private Sub Command1_Click()
 i = 0
&nbs ......

ÇóÖú£ºVBµ÷Óö¯Ì¬¿âÎÊÌâ - VB / »ù´¡Àà

¸÷λ´óϺ£º
  ÎÒÊǸÕѧVB£¬ÏÖÔÚÏëÓÃVBµ÷ÓÃÒ»¸ö¶¯Ì¬¿â£¬¶¯Ì¬¿âÀïÃæÓкܶຯÊý¡£ÎÒÖªµÀʹÓÃVBµ÷Óö¯Ì¬¿âµ÷Óú¯Êý£¬ÐèÒª½«Òªµ÷Óõĺ¯ÊýÔÚ³ÌÐòÖÐÉùÃ÷¼´¿É£¬µ«ÊÇÀïÃæÓкܶຯÊý£¬²»»áÿһ¸öº¯Êý¶¼ÒªÉùÃ÷°É¡£Çë¸ ......

vb¿ÉÒÔÕâÑù×ö²»£¿ - VB / ·Ç¼¼ÊõÀà

¿ÉÒÔÂð
ºÃÆæ¹ÖµÄÌâÄ¿¶î£¡£¡

¿ÉÒÔ¸æËßÎÒÃÇÄãµ½µ×ÏëÎÊʲô £¿

2·Ö¸øÎҵϰ¾Í¿ÉÒÔ¡£

........................¿ÉÒÔÂð

¿ÉÒÔ!


  ¾À½á£¬

29. vb¿ÉÒÔÕâÑù×ö²»£¿ ( H )¡Ì
 A. ......
© 2009 ej38.com All Rights Reserved. ¹ØÓÚE½¡ÍøÁªÏµÎÒÃÇ | Õ¾µãµØÍ¼ | ¸ÓICP±¸09004571ºÅ