VB °æ (¾«»ªÇø)

·¢ÐÅÈË: bloom (©À©Á©Â©Ã©Ä©Æ©Ç¨), ÐÅÇø: VB
±ê  Ìâ: GetSystemTimeAdjustment(Ó²¼þÓëϵͳ)(×ªÔØ)
·¢ÐÅÕ¾: ¹þ¹¤´ó×϶¡Ïã (2000Äê09ÔÂ07ÈÕ18:38:52 ÐÇÆÚËÄ), ×ªÐÅ

¡¾ ÒÔÏÂÎÄ×Ö×ªÔØ×Ô cnTemp ÌÖÂÛÇø ¡¿
¡¾ Ô­ÎÄÓÉ catchy Ëù·¢±í ¡¿
·¢ÐÅÈË: yucheng (ÎÞ»°¿É˵), ÐÅÇø: VisualBasic
·¢ÐÅÕ¾: BBS Ë®Ä¾Ç廪վ (Thu Mar 30 00:08:43 2000) WWW-POST

GetSystemTimeAdjustment 

VBÉùÃ÷ 
Declare Function GetSystemTimeAdjustment Lib "kernel32" Alias "GetSystemTimeAd
justment" (lpTimeAdjustment As Long, lpTimeIncrement As Long, lpTimeAdjustment
Disabled As Boolean) As Long 
˵Ã÷ 
Win32¿ÉʹÄÚ²¿ÏµÍ³Ê±ÖÓÓëÒ»¸öÍⲿµÄʱÖÓÐźÅԴͬ²½£¬·½·¨ÊǶ¨Ê±Ìí¼ÓÒ»¸öУ׼ֵ¡£Õâ
¸öº¯ÊýÖ¸¶¨µÄËùÓÐʱ¼ä¶¼ÒÔ100ns£¨0.1ms£©Îªµ¥Î»µÝÔö 
·µ»ØÖµ 
Long£¬·ÇÁã±íʾ³É¹¦£¬Áã±íʾʧ°Ü 
²ÎÊý±í 
²ÎÊý ÀàÐͼ°ËµÃ÷ 
lpTimeAdjustment Long£¬Ìí¼Óµ½ÄÚ²¿ÏµÍ³Ê±ÖÓµÄʱ¼äÁ¿ 
lpTimeIncrement Long£¬Ð£×¼¼ä¸ôʱ¼ä¡£µÈÓÚÖжÏʱÖÓʱ¼ä 
lpTimeAdjustmentDisabled Boolean£¬Èçʱ¼äµ÷У¹¦Äܹرգ¬ÔòΪTRUE 
ʾÀý 
Dim lpTimeAdjustment&, lpTimeIncrement&, lpTimeAdjustmentDisabled&
GetSystemTimeAdjustment lpTimeAdjustment, lpTimeIncrement, lpTimeAdjustmentDis
abled
Print "Time adjustment: " & lpTimeAdjustment & "Increment: " & 
lpTimeIncrement & "Adjustment Disabled: " & lpTimeAdjustmentDisabled
 


--

--
¡î À´Ô´:£®¹þ¹¤´ó×϶¡Ïã bbs.hit.edu.cn£®[FROM: casi.bbs@smth.org]
--
¡ù ×ªÔØ:£®¹þ¹¤´ó×϶¡Ïã bbs.hit.edu.cn£®[FROM: 202.118.247.254]
[°Ù±¦Ïä] [·µ»ØÊ×Ò³] [Éϼ¶Ä¿Â¼] [¸ùĿ¼] [·µ»Ø¶¥²¿] [Ë¢ÐÂ] [·µ»Ø]
Powered by KBS BBS 2.0 (http://dev.kcn.cn)
Ò³ÃæÖ´ÐÐʱ¼ä£º2.655ºÁÃë