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

VB¹ØÓÚ´®¿Ú²Ù×÷ - VB / »ù´¡Àà

ÓÃVB×öÒ»¸öС³ÌÐò£¬·¢ËͺͶÁÈ¡´®¿ÚÖеÄÊý¾Ý£¬·¢ËÍÊý¾ÝûÓÐÎÊÌ⣬ÔÚ¶ÁÈ¡Êý¾ÝʱÓÐʱ»á³ö´í£¬´®¿ÚÉ豸ÖÐËüÿ´Î¶¼»á·¢ËÍÒ»ÌõÖ¸Áî³öÀ´£¬¶øÇÒÊÇÒÔ¡°#¡±×÷Ϊ¿ª½á·û£¬ÒÔ¡°0D+0A¡±£¨»Ø³µ»»ÐУ©×÷Ϊ½áÊø·û£¬µ«ÓÐʱ»º´æÇøÄÚÓÐЩ²»ÊÇ·ûºÏµÄÃüÁÏÖÔÚÔõÑù´Ó»º´æÇøÀïÒ»ÌõÒ»ÌõµØ¶ÁÈ¡³öÀ´£¿ÏÖÔÚÎÒÖ»Äܰѻº´æÀïÃæµÄÈ«²¿Êý¾Ý¶¼Ò»ÆðÄóöÀ´£¬µ«ÆäÖÐÓкܶ಻ÊÇÎÒÏëÒª£¬¶øÇÒ²»µ¥ÊÇÒ»ÌõÊý¾Ý£¡
VB code:

dim com_string '´æ´¢¶ÁÈ¡Êý¾Ý
Dim t1 As Long, com_String As String
t1 = Timer
Select Case MSComm1.CommEvent
Case comEvReceive 'ÊÕµ½ RThreshold¶¨ÒåµÄ×Ö·ûÊý1×Ö½Ú
Do
DoEvents
Loop While Timer - t1 < 0.05
com_String = MSComm1.Input
End Select



¶ÔÁË£¬»¹ÓÐÒ»¸öÎÊÌ⣬ÔõÑù²ÅÄܰѻº´æÇøÀïµÄÈ«²¿Êý¾ÝÄóöÀ´£¬¾ÍÊÇÎÒÈ¡³öÒ»¸öÊý¾ÝºóÈ»ºóÔÙ´¦Àí£¬µ«¿ÉÄÜ´®¿ÚÉ豸Õâʱ»á·¢¹ýÒ»¸öÊý¾Ý¹ýÀ´£¬µ«´¦ÀíÍêÖ®ºóÓÖÓÐÒ»¸öÊý¾Ý·¢Ë͹ýÀ´£¬ÕâʱÔõÑùÈ¡³öÖмäÄǸöÊý¾Ý£¡

ÒýÓÃ
¶ÔÁË£¬»¹ÓÐÒ»¸öÎÊÌ⣬ÔõÑù²ÅÄܰѻº´æÇøÀïµÄÈ«²¿Êý¾ÝÄóöÀ´£¬¾ÍÊÇÎÒÈ¡³öÒ»¸öÊý¾ÝºóÈ»ºóÔÙ´¦Àí£¬µ«¿ÉÄÜ´®¿ÚÉ豸Õâʱ»á·¢¹ýÒ»¸öÊý¾Ý¹ýÀ´£¬µ«´¦ÀíÍêÖ®ºóÓÖÓÐÒ»¸öÊý¾Ý·¢Ë͹ýÀ´£¬ÕâʱÔõÑùÈ¡³öÖмäÄǸöÊý¾Ý£¡

 MSComm1.InputLen = 0 
'Ϊ 0 ʱ£¬Ê¹Óà Input ½«Ê¹ MSComm ¿Ø¼þ¶ÁÈ¡½ÓÊÕ»º³åÇøÖÐÈ«²¿µÄÄÚÈÝ¡£

ÒýÓÃ
¶ÔÁË£¬»¹ÓÐÒ»¸öÎÊÌ⣬ÔõÑù²ÅÄܰѻº´æÇøÀïµÄÈ«²¿Êý¾ÝÄóöÀ´£¬¾ÍÊÇÎÒÈ¡³öÒ»¸öÊý¾ÝºóÈ»ºóÔÙ´¦Àí£¬µ«¿ÉÄÜ´®¿ÚÉ豸Õâʱ»á·¢


Ïà¹ØÎÊ´ð£º

¡¾¼±Çó¡¿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³¬¼òµ¥form.showµÄÎÊÌâ - VB / ·Ç¼¼ÊõÀà

ΪʲôÎÒÓÃform.showºÍform.hide¶à´ÎÁ¬½ÓÁËÁ½¸ö´°¿ÚÖ»ÄÜ»¥»»Á´½ÓÁ½´Î°¡£¿
´úÂë¿´¿´
ÕÕµÀÀíform.show û´ÎÊýÏÞ¶¨µÄ°É

ÎÒÒ²¿ì·èÁË¡£
Â¥Ö÷ÖªµÀÔõô·¢Ìùô£¿

ÒýÓÃ
ÎÒÒ²¿ì·èÁË¡£
Â¥Ö÷ÖªµÀÔõô·¢Ìùô£¿
Â¥Ö÷Ò² ......

¹ØÓÚVB DIM ds as new DataSetÎÊÌâ - VB / »ù´¡Àà

DIM ds as new DataSet
ÎÒÕâÑùÉùÃ÷ ÔõÀÏÊDZ¨ Óû§¶¨ÒåÀàÐÍ䶨Ò壿 Õâ¸öÐèÒªÒýÓÃʲôÂ𣿣¿
ǰÌáÊÇDataSet¶ÔÏóÒª´æÔÚ,¾ÍÊǶÔÏóä¯ÀÀÆ÷ÖÐÓÐËü.ûÓоÍÒªÒýÓÃ.

datasetÊÇADO.NET¶ÔÏó
Èç¹ûÄãÓõÄÊÇvb.net£¬ÄÇôÔÚ´ ......

vb - VB / ·Ç¼¼ÊõÀà

Ôõô°ÑÒÑÖªµÄÊý¾Ý±£´æ³ÉxmlÎļþ£¬ÏÖÔÚÒÑÖªµÄÊý¾ÝÊÇ
<?mso-application progid="Excel.Sheet"?>
<Workbook xmlns="urn:schemas-microsoft-com:office:spreadsheet"
 xmlns:o=& ......
© 2009 ej38.com All Rights Reserved. ¹ØÓÚE½¡ÍøÁªÏµÎÒÃÇ | Õ¾µãµØÍ¼ | ¸ÓICP±¸09004571ºÅ