Ò׽ؽØÍ¼Èí¼þ¡¢µ¥Îļþ¡¢Ãâ°²×°¡¢´¿ÂÌÉ«¡¢½ö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


Ïà¹ØÎÊ´ð£º

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

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

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

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

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

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

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

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

vb Å£Âð - Web ¿ª·¢ / vbScript

vbÊDz»ÊǺÜÅ£°¡ ÔõôÄÇô¶àµÄ²¡¶¾¶¼ÊÇvb×öµÄ°¡ c#Ðв»ÐУ¿
c#ÔÚXPÔËÐв»ÁË£¬³ý·ÇÈñðÈËÏÈ×°ÉÏ.net.
VBÏà¶ÔÓÚC,C++,ASMµÈµÈ£¬¾ÖÏÞÐÔ´ó¶àÁË¡£

±ðÔÙ˵ʲôÓïÑÔ²»ÈçʲôÓïÑԵϰÁË£¬Ö»ÓÐÄã²»»áÓûòÓÃ×Ų»Ë³ÊÖµÄÓ ......

100·Ö£¡¹ØÓÚvbµ÷ÓÃdelphi±àдµÄdllµÄÎÊÌ⣬¼±£¡£¡£¡

¸÷λ¸ßÊָϿì°ï°ïæ¡£
ÏÖÔÚÓÐÒ»¸ödelphiдµÄdll£¬º¯ÊýÖÐÓÐPIntegerµÄ·µ»Ø²ÎÊý£¬ÔÚdelphiÖпÉÒÔÕý³£µ÷Ó㬵«ÊÇÎÒÔÚvbÀïдµÄʱºò¾Í²»ÖªµÀ¸ÃÔõôÀ´µ÷ÓÃÁË¡£
Çë¿´´úÂë
ÒÔÏÂÊÇdelphiÖеĺ¯Êý¶¨ÒåºÍµ÷ÓôúÂ룬ÄÜÕý³£ÔËÐ ......

Vb.net Access CrystalReport - .NET¼¼Êõ / VB.NET

µÚÒ»´Î½Ó´¥CrystalReport
¼±Ñ°ÕÒVb.net Access ͨ¹ý²éѯ³öµÄÊý¾ÝÊä³öµ½CrystalReportµÄÀý×Ó.
ÓеÄÅóÓÑÂé·³·¢À´Ñ§Ï°.¶àл!
¸úÄãµÄÒªÇó²î²»¶à£¬²Î¿¼Ò»Ï£º
http://topic.csdn.net/u/20090823/21/87af02d3-f4ca-480 ......
© 2009 ej38.com All Rights Reserved. ¹ØÓÚE½¡ÍøÁªÏµÎÒÃÇ | Õ¾µãµØÍ¼ | ¸ÓICP±¸09004571ºÅ