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

¹ØÓÚ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.net(vb)²¥·Å¼à¿ØÂ¼ÏñµÄÎÊÌâ

ÎÒÓг§¼Ò×öµÄASPµÄ¼à¿ØÂ¼Ïñ£¨DVR£©µÄ¾ÖÓòÍø²¥·ÅµÄÔ´³ÌÐòÓë¿Ø¼þ£¬ÏëÒªÓÃASP.net×öÒ»¸öÊÓÆµ»Ø·ÅµÄ³ÌÐò£¨ÀûÓÃËûµÄ¿Ø¼þ£©µ«²»ÖªÈçÏÂÈ¥×ö£¬Íû¸÷λָµã¡£
ÏȸãÇå³þËûÃǵĿؼþÊÇÔõôÓõÄ,
È»ºó¾ÍÖ±½ÓÓúÃÁË.
²»¹ý,Èç ......

Çó½ÌÏÂVBÈçºÎ¸øD3DÓÎϷдÆÁ - VB / API

ÏëÔÚwarcraft3Àï½øÐÐдÆÁ²Ù×÷¡¾Èç¶Ôսƽ̨ÖеÄʤ¸ºÌáʾÐÅÏ¢¡¿£¬Ð§¹û¾ÍÏñÓÎϷƽ̨ÖÐÒ»Ñù£¬ÎÒÊÔ¹ýÔÚÒ»´°¿ÚÖÐдÈëÎÄ×Ö£¬È»ºóÒ»Ö±Èô°¿ÚÇ¿ÖÆ×îǰ£¬ËäÈ»ÄÜʵÏÖÎÄ×ÖÏÔʾ£¬µ«ÊÇÎÄ×ֻ᲻¶ÏÉÁ˸£¬¶øÇÒÓв»È·¶¨BUG£¬Í¨¹ýÂÛ̳ËÑ ......

VBÐÞ¸Ä×¢²á±í

ÓÃVBÔõôֻÕë¶Ôwindows×Ô´øµÄÎļþµÄÓÒ¼üÌí¼Ó²Ëµ¥ È磨.txt .doc)
Õâ¸öÊÇÖ»Õë¶ÔÒÔÕâÁ½¸öΪÀ©Õ¹ÃûµÄÎļþ²Ù×÷
Windows Registry Editor Version 5.00
[HKEY_CLASSES_ROOT\txtfile\shell\[Ëæ±ãÆðÃû]\command]
@= ......

Çë¸ßÊÖ°ï¿´¿´Õâ¸övb¸ÃÔõô×ö£¬Ð»Ð»

Õâ¾ä»°ÎÒ²»Ì«Ã÷°×£¬vbÔ´Âë¸ÃÔõô×ö£¿Ð»Ð»
ÖÆ×÷Ò»¸öupdate.exeרÃÅÓÃÀ´Éý¼¶£¬Ö´ÐÐÕâ¸öupdateµÄʱºò£¬³ÌÐòʹÓÃapiº¯ÊýURLDownloadToFile½«http://update.8888.cn/MiniDor/version.iniÏÂÔØÏÂÀ´£¬È»ºóÓ뵱ǰ°æ±¾±È½Ï°æ± ......

ÔõôÓÃVB×öÔ¶³ÌÉÏ´«ÎļþʱµÄ½ø¶ÈÌõ£¿

ÎÒÔÚÓÃVBдһ¸ö½«ÊÓÆµÎļþÉÏ´«µ½Ô¶³ÌÊý¾Ý¿âµÄС³ÌÐò£¬ÏÖÔÚÏëÒªÓýø¶ÈÌõÀ´ÏÔʾµ±Ç°ÉÏ´«µÄ½ø¶È£¬ÇëÎÊÒªÔõô×öÄØ£¿ÎÒÊǸöÐÂÊÖ£¬ËùÒÔÂé·³´ó¼Ò°ÑÒâ¼ûдÇå³þһЩ£¬ÓдúÂë×îºÃÀ²£¬Ð»Ð»£¡
ÒªÍêÈ«ÕýÈ·±È½ÏÀ§ÄÑ¡£
¹À¼ÆÏ° ......
© 2009 ej38.com All Rights Reserved. ¹ØÓÚE½¡ÍøÁªÏµÎÒÃÇ | Õ¾µãµØÍ¼ | ¸ÓICP±¸09004571ºÅ