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

ÐÂÊÖÇë½Ì¹ØÓÚVBÖд®¿ÚͨÐÅMSCOMM£¨Ïëͬʱ·¢Á½¸öÃüÁ

¸÷λºÃ£¬ÎÒÏÖÔÚÒªÓÃһ̨¼ÆËã»úͬʱ¼à¿Ø32̨ÐźŽÓÊÕ»ú£¨ÓõÄÊÇMOXA¿¨À©Õ¹32¸ö´®¿Ú£©¡£Ïȵ÷ÊÔ8̨¡£ÏÖÔÚµÄÎÊÌâÊÇ£¬ÎÒÓÐÁ½¸öÃüÁîÐèÒªÏò½ÓÊÕ»ú·¢ËÍ£¬Ò»¸öÊǼà¿Ø½ÓÊÕ»úÉϵÄÐźÅËø¶¨×´Ì¬£¬Ò»¸öÊÇ»ñÈ¡½ÓÊÕ»úÄ¿Ç°µÄ¸÷À๤×÷״̬¡£ÐźÅËø¶¨×´Ì¬ÒѾ­µ÷ºÃÁË£¬µ«ÎҾͲ»ÖªµÀÔõô¼ÓÈëµÚ¶þ¸öÃüÁîÁË¡£ÎÒ·¢µÚÒ»¸öÃüÁîµÄ·½Ê½ÊÇͨ¹ýÒ»¸öʱ¼ä¿Ø¼þÿ¸ô500ºÁÃë¾Íͬʱͨ¹ý8¸öMSCOMM¿Ø¼þÏò8̨½ÓÊÕ»ú£¨Òò´ËÎÒÓÃÁË8¸ö´®¿Ú£©·¢Ë͵ÚÒ»¸öÃüÁȻºó¼ÆËã»úÊÕµ½½ÓÊÕ»ú·µ»ØµÄ×Ö·û´®£¬ÔÚ¸Ã×Ö·û´®ÖвéÕÒ²¢ÅжÏÐźÅÊÇ·ñËø¶¨¡£µ«µÚ¶þ¸öÃüÁî¾Í¸ã²»¶®¸ÃÔõô°ìÁË£¬ÎÒ³¢ÊÔÁËÒ»ÏÂÓÖÌí¼ÓÁ˵Ú9¸öMSCOMM¿Ø¼þ£¬Ïëͨ¹ý¸Ã¿Ø¼þÏòij¸ö£¨»òÕß8¸öÈ«²¿£©´®¿Ú·¢µÚ¶þ¸öÃüÁµ«¾Í²»ÐÐÁË£¬ÒªÃ´Ìáʾ¶Ë¿Úû´ò¿ª£¬¸ÄÁËÒ»ÏÂÓÖÌáʾ´®¿ÚÒѾ­ÔÚʹÓã¨ÒòΪÔÚ·¢µÚ¶þ¸öÃüÁîµÄͬʱʱ¼ä¿Ø¼þÔÚ²»Í£µØÏò¸Ã´®¿Ú·¢µÚÒ»¸öÃüÁ£¬ÎÒÒ²Ïë¹ýÔÚ·¢µÚ¶þ¸öÃüÁîʱ°ÑµÚÒ»¸öÃüÁî·¢Ë͹رÕÁË£¬µ«Ò²Ã»·¨£¬ÒòΪʱ¼ä¿Ø¼þÔÚÄÄÀï¿ØÖÆ×Å£¬¶øÇÒÈç¹ûÎҹرÕÁ˵ÚÒ»¸öÃüÁÄÇô¼à¿ØµÄÄ¿µÄ¾ÍʧЧÁË¡£ÏëÇë½Ì´ó¼ÒÕâÖÖÎÊÌâ¸ÃÔõô½â¾ö¡£

ÎÒÔÙ˵¼òµ¥µã¾ÍÊÇ£¬µÚÒ»¸öÃüÁî±ØÐëÒÔÒ»¶¨Ê±¼ä¶ÎÑ­»·²»Í£µØÏòN̨»úÆ÷·¢ËÍ£¨Ò²¾ÍÊÇÏòN¸ö´®¿Ú·¢ËÍ£©£¬ÒÔ´ïµ½¼à¿Ø»úÆ÷ÐźÅËø¶¨µÄÄ¿µÄ£¬¶øµÚ¶þ¸öÃüÁîÊÇÑ¡ÖÐij̨»úÆ÷£¨Õą̂»úÆ÷°üÀ¨ÔÚÉÏÃæµÄN̨»úÆ÷ÖУ©ºóÒªÏÔʾµÄ¹¤×÷״̬¡£
ÒÔÏÂÊDz¿·Ö³ÌÐò
Private Sub Form_Load()
  
  Dim a2, a3, a4, a5, a6, a7, a8 As Long
  Dim b2, b3, b4, b5, b6, b7, b8 As Long
  Dim c2, c3, c4, c5, c6, c7, c8 As Long
  Dim d2, d3, d4, d5, d6, d7, d8 As Long
  Dim e2, e3, e4, e5, e6, e7, e8 As Long
  Dim f2, f3, f4, f5, f6, f7, f8 As Long
  Dim g2, g3, g4, g5, g6, g7,


Ïà¹ØÎÊ´ð£º

¡¾¼±Çó¡¿VBÖÐʹÓÃWScriptµ÷ÓÃÍⲿÃüÁî - VB / »ù´¡Àà

ÔÚÏÂÊÇvbµÄÐÂÊÖ£¬Ïëд¶Î³ÌÐò£¬ÔÚvbÖУ¬Ê¹ÓÃwscriptµ÷ÓÃһЩÍⲿµÄÃüÁµ«ÊdzÌÐòÖ´ÐÐÒ»Ö±ÓдíÎó£¬Çë¸÷λ¸ßÊÖ°ïæ½â´ðÏ£¬Ð»Ð»¡£
´úÂëÈçÏ£º
VB code:

Private Function getFile_CMD(filename, filepath) As Bo ......

VB µÄ PictureBOX ¿Ø¼þ»æͼÎÊÌâ - VB / ¿Ø¼þ

³õѧ£¬´óµ¨ÌáÎÊ£¬Çë¸ßÊÖ²»ÁߴͽÌ
1¡¢¹ö¶¯Ìõµã»÷Óë»æͼ°å£¨ÆÁÄ»,Piceure1£©µÄÒƶ¯ÎÊÌâÒѾ­½â¾ö¡£
  Picture1.Top = -VScroll1.Value + bcW '´¹Ö±Òƶ¯
  Picture1.Left = -HScroll1.Value + bcW ' ......

vbÖÐÈçºÎʵÏÖ¶ÔÏóÊôÐԵĶ¯Ì¬ÉèÖà - VB / »ù´¡Àà

±¾ÈËʹÓõÄÊÇVB6.0°æ±¾
¼ÙÉèÓÐÒ»¸ö¶ÔÏóA£¬AÄÚÓÐÀàÐÍΪBµÄ¶ÔÏóÊôÐÔ¡£ÏÖÔÚµÄÎÊÌâÊÇ£¬ÐèÒªÌí¼ÓÈô¸É¸öB¶ÔÏó×÷ΪA¶ÔÏóµÄÊôÐÔ¡£È磬
 A.B1,A.B2,...
µ«¾ßÌåÌí¼Ó¶àÉÙ¸öB¶ÔÏó×÷ΪA¶ÔÏóµÄÊôÐÔÔòÊÓ¾ßÌåÇé¿ö²»Í¬¶ø²»Í¬ ......

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

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

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

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

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

¿ÉÒÔ!


  ¾À½á£¬

29. vb¿ÉÒÔÕâÑù×ö²»£¿ ( H )¡Ì
 A. ......

VBÔõÑù»ñµÃÊó±ê´¦µÄ³¬¼¶Á¬½Ó - VB / »ù´¡Àà

VBÔõÑù»ñµÃÊó±ê´¦µÄ³¬¼¶Á¬½ÓÄØ£¿
  ÔÚWebBrowser¿Ø¼þÖÐÓÐÕâÑùÒ»¸öʼþ:StatusTextChange(index As Integer, ByVal Text As String)
  ËüµÄText²ÎÊýÕýÊÇÊó±ê´¦µÄ³¬¼¶Á¬½Ó,µ«ÎÊÌâÊÇÈç¹ûÎÒµÄä¯ÀÀÆ÷Õýà ......
© 2009 ej38.com All Rights Reserved. ¹ØÓÚE½¡ÍøÁªÏµÎÒÃÇ | Õ¾µãµØͼ | ¸ÓICP±¸09004571ºÅ