¹ØÓÚvbµÄ±¨¾¯¹¦ÄÜ
Çë½Ì´ó¼Ò¸öÎÊÌâ ÎÒÔÚÓÃvbÉÏλ»úÊÕ¼¯¶à¸öÏÂλµ¥Æ¬»ú´«ÉÏÀ´µÄζÈÊý¾Ý£¬ÎÒÏëÒ»µ©Î¶Ȳ»´ï±ê¾Í³ö±¨¾¯Éù£¬²»ÖªÔÚvbÖÐÈçºÎʵÏÖ±¨¾¯¹¦ÄÜ×î¼òµ¥ÄØ£¿¸Õ½Ó´¥vb »¹ÍûÅóÓÑÃǶà¶àÖ¸µã лл
beep ¶÷ ±ÈÈçÎÒÐèÒª±¨¾¯60S »¹µÃÓö¨Ê±Æ÷°ÉÒýÓà ¶÷ ±ÈÈçÎÒÐèÒª±¨¾¯60S »¹µÃÓö¨Ê±Æ÷°É µ±È»Ê¹ÓÃTimer¼ÆÊ±Æ÷. Private Declare Sub Sleep Lib "kernel32" (ByVal milliseconds As Long) Dim dt As Date dt = Now While DateDiff("s", dt, Now) < 60 Beep Sleep 500 Wend ллlsµÄ´úÂë ÒòΪÎÒÊÇÏ뱨¾¯60sʱ ²»Ó°ÏìϵͳµÄÆäËû¹¦Äܹ¤×÷ ÊDz»ÊÇ¿ÉÒÔÓö¨Ê±Æ÷+beepʵÏÖÄØ ¿ÉÒÔ£¬ÓÃtimer лл¥ÉÏÅóÓÑÃÇ£¡ »¹ÏëÇë½ÌÏ£ºbeep¿ÉÒÔÈÃÖ÷°å·¢³öÄÇÖÖ±¨¾¯µÎµÎÉùÂ𣿠ÎÒдbeep½á¹ûÊÇ´ÓÒôÏìÀ®°È·¢³öÁ˵±µ±Éù£¬¸Ð¾õ²»ºÃÌý ²»Êʺϱ¨¾¯ ¿ÉÒÔ»»³ÉÖ÷»ú·¢ÉùÂ𣿠ÄãÒ²¿ÉÒÔ²¥·ÅÒ»¶ÎÒôÀÖ,ÕâÐèÒªÀ®°È. Ö÷°åÒ²¿ÉÒ԰ηŵÄ.Âé·³µã.×¢:ÒÔÏ´úÂëδ¾²âÊÔ,À´×ÔGOOGLE VB code: '´ò½ø´úÂëÖ®ºóÖ±½ÓÔËÐÐ '//ÖܽÜÂ׵Ļص½¹ýÈ¥ Private Declare Function Beep Lib "kernel32" (ByVal dwFreq As Long, ByVal dwDuration As Long) As Long Private Sub Form_Load() playsnd 587, 100: playsnd 784, 100: playsnd 880, 100: playsnd 988, 100:: playsnd 988
Ïà¹ØÎÊ´ð£º
ÎÒÓг§¼Ò×öµÄASPµÄ¼à¿ØÂ¼Ïñ£¨DVR£©µÄ¾ÖÓòÍø²¥·ÅµÄÔ´³ÌÐòÓë¿Ø¼þ£¬ÏëÒªÓÃASP.net×öÒ»¸öÊÓÆµ»Ø·ÅµÄ³ÌÐò£¨ÀûÓÃËûµÄ¿Ø¼þ£©µ«²»ÖªÈçÏÂÈ¥×ö£¬Íû¸÷λָµã¡£ ÏȸãÇå³þËûÃǵĿؼþÊÇÔõôÓõÄ, È»ºó¾ÍÖ±½ÓÓúÃÁË. ²»¹ý,Èç ......
ÏëÔÚwarcraft3Àï½øÐÐдÆÁ²Ù×÷¡¾Èç¶Ôսƽ̨ÖеÄʤ¸ºÌáʾÐÅÏ¢¡¿£¬Ð§¹û¾ÍÏñÓÎϷƽ̨ÖÐÒ»Ñù£¬ÎÒÊÔ¹ýÔÚÒ»´°¿ÚÖÐдÈëÎÄ×Ö£¬È»ºóÒ»Ö±Èô°¿ÚÇ¿ÖÆ×îǰ£¬ËäÈ»ÄÜʵÏÖÎÄ×ÖÏÔʾ£¬µ«ÊÇÎÄ×ֻ᲻¶ÏÉÁ˸£¬¶øÇÒÓв»È·¶¨BUG£¬Í¨¹ýÂÛ̳ËÑ ......
ÓÃVBÔõôֻÕë¶Ôwindows×Ô´øµÄÎļþµÄÓÒ¼üÌí¼Ó²Ëµ¥ È磨.txt .doc) Õâ¸öÊÇÖ»Õë¶ÔÒÔÕâÁ½¸öΪÀ©Õ¹ÃûµÄÎļþ²Ù×÷ Windows Registry Editor Version 5.00 [HKEY_CLASSES_ROOT\txtfile\shell\[Ëæ±ãÆðÃû]\command] @= ......
Õâ¾ä»°ÎÒ²»Ì«Ã÷°×£¬vbÔ´Âë¸ÃÔõô×ö£¿Ð»Ð» ÖÆ×÷Ò»¸öupdate.exeרÃÅÓÃÀ´Éý¼¶£¬Ö´ÐÐÕâ¸öupdateµÄʱºò£¬³ÌÐòʹÓÃapiº¯ÊýURLDownloadToFile½«http://update.8888.cn/MiniDor/version.iniÏÂÔØÏÂÀ´£¬È»ºóÓ뵱ǰ°æ±¾±È½Ï°æ± ......
ÎÒÔÚÓÃVBдһ¸ö½«ÊÓÆµÎļþÉÏ´«µ½Ô¶³ÌÊý¾Ý¿âµÄС³ÌÐò£¬ÏÖÔÚÏëÒªÓýø¶ÈÌõÀ´ÏÔʾµ±Ç°ÉÏ´«µÄ½ø¶È£¬ÇëÎÊÒªÔõô×öÄØ£¿ÎÒÊǸöÐÂÊÖ£¬ËùÒÔÂé·³´ó¼Ò°ÑÒâ¼ûдÇå³þһЩ£¬ÓдúÂë×îºÃÀ²£¬Ð»Ð»£¡ ÒªÍêÈ«ÕýÈ·±È½ÏÀ§ÄÑ¡£ ¹À¼ÆÏ° ......